Dim oCW set oCW = CreateObject("AAG_CloudWatcher.CloudWatcher") oCW.Device_Start() Set oCW=nothing