How can I insert a small pause between these commands? I'm thinking they're running too fast for the devices to update properly, essentially running on top of each other as far as the devices are concerned. The result is that many devices will have the same data.
Code:
Sub Main(Parm As Object) hs.SetDeviceString(899, hs.DeviceString(898), True) hs.SetDeviceString(898, hs.DeviceString(897), True) hs.SetDeviceString(897, hs.DeviceString(896), True) hs.SetDeviceString(896, hs.DeviceString(895), True) hs.SetDeviceString(895, hs.DeviceString(843), True) hs.SetDeviceString(843, hs.DeviceString(842), True) hs.SetDeviceString(842, hs.DeviceString(840), True) hs.SetDeviceString(840, hs.DeviceString(833), True) hs.SetDeviceString(833, hs.DeviceString(841), True) hs.SetDeviceString(841, hs.DeviceString(186) & " " & hs.DeviceString(187) & " " & hs.DeviceLastChangeRef(186), True) End Sub
Comment