



Public Function Weekend(byref intNumberOfDaysOff) as Object
–--for count = 0 to intNumberOfDaysOff
–------DoSomething()
–----–if count < intNumberOfDaysOff then
–--–----–WScript.Sleep(Int((43200000 – 14400000) * rnd + 14400000)
––----else
––----––WScript.Sleep(Int((32400000 – 25200000) * rnd + 25200000)
–----–end if
----next
----Weekend = “Go back to Work”
End Function






More Options ...
Categories
Tag Cloud
Blog RSS
Comments RSS


Void « Default
Life
Earth
Wind
Water
Fire
Light 