How do I place the Number of days into a virtual device. Below is my attempt at trying to get the script to work.
It works OK until the last line...... I trying to place the value of days till Gary's Birthday into z2.
Sub main()
Const Device = "z2"
Dim s 'equals days till Gary's Birthday
s = DateDiff("d", Now , "20-Oct")
hs.WriteLog "Info", "There are " & s & " days until Gary's Birthday."
hs.SetDeviceString Device, & s
End Sub
It works OK until the last line...... I trying to place the value of days till Gary's Birthday into z2.
Sub main()
Const Device = "z2"
Dim s 'equals days till Gary's Birthday
s = DateDiff("d", Now , "20-Oct")
hs.WriteLog "Info", "There are " & s & " days until Gary's Birthday."
hs.SetDeviceString Device, & s
End Sub
Comment