Herkese Merhaba,

Logon / Logoff scriptlerle çalışmak çoğu sistem yöneticisinin sevdiği işlemlerden birisidir. Ancak bazı işlemler vardır ki uzun sürer ve logon ya da logoff sırasında bu durumu göz önünde bulundurmak zorunda kalır. Aşağıdaki kod benzer bir ihtiyacı gidermek konusunda sizlere faydalı olabilecektir. Sistem içerisinde saat kontrolü yaparak Sabah 8 ile Akşam 16 arasında scripti çalıştırmayıp diğer saatlerde ihtiyaç duyulduğunda çalışmasını sağlamaktadır.

İyi günlerde kullanın…


On error resume next

Err.Clear

dim objshell

dim startTime

dim endTime

dim useTime

dim nCurrHour

dim sameday

 

' Enable or Disable the time check.

' set 0 to disable time check

' set 1 to enable time check

 

useTime=1

 

' Set if the time check is for the same day.

' set this to 1 if the start and ent time are in the same day.

' set this to 0 if the end time is in the next day.

 

sameday=0

 

' Set start time of the script.

startTime=16

 

' Set end time of the script.

endTime=8

 

nCurrHour=hour(now)

wscript.echo "Current Time: " & nCurrHour

 

if sameday = 0 then

if ( useTime and not ((nCurrHour >= startTime and nCurrHour <= 24) or (nCurrHour >= 0 and nCurrHour < endTime ))) then

wscript.echo "should run in: " & startTime & " and " & endTime

wscript.quit (-1)

end if

else

if ( useTime and not ((nCurrHour >= startTime and nCurrHour <= endTime ))) then

wscript.echo "should run in: " & startTime & " and " & endTime

wscript.quit (-1)

end if

end if

&nbsp;

set objshell = CreateObject("WScript.Shell")

&nbsp;

' Insert here your Application to run

objshell.run "C:\Cobian11\cobiantest.bat"

&nbsp;

if Err.number<>0 then

wscript.echo "Error: " & Err.number & "," & Err.description

wscript.quit Err.number

else

wscript.echo "DONE OK! "

wscript.quit 0

end if