So I am trying to debug some simple scripts and on every error I have to re-start HS3 or I get the script can't start because it's already running.
Example:
Jan-06 3:15:51 PM Warning Not running script since its already running: C:/Program Files (x86)/HomeSeer HS3/scripts/Sonos-Volume-Test.vb Single instance option enabled in event properties
Jan-06 3:15:51 PM Event Running script in background: C:/Program Files (x86)/HomeSeer HS3/scripts/Sonos-Volume-Test.vb
Jan-06 3:15:51 PM Event Event Trigger "Test Events Sonos Test Script"
Jan-06 3:15:51 PM Event Event Test Events Sonos Test Script triggered by the event page 'Run' button.
Jan-06 3:15:21 PM Warning VB.Net script exception(0), re-starting: Object reference not set to an instance of an object.
This is what I am trying to run:
Thank for any help or comments.
Example:
Jan-06 3:15:51 PM Warning Not running script since its already running: C:/Program Files (x86)/HomeSeer HS3/scripts/Sonos-Volume-Test.vb Single instance option enabled in event properties
Jan-06 3:15:51 PM Event Running script in background: C:/Program Files (x86)/HomeSeer HS3/scripts/Sonos-Volume-Test.vb
Jan-06 3:15:51 PM Event Event Trigger "Test Events Sonos Test Script"
Jan-06 3:15:51 PM Event Event Test Events Sonos Test Script triggered by the event page 'Run' button.
Jan-06 3:15:21 PM Warning VB.Net script exception(0), re-starting: Object reference not set to an instance of an object.
This is what I am trying to run:
Code:
Public Sub Main() Dim value As Integer = 40 Dim DeviceRef As Integer = hs.GetDeviceRefByName("Sonos Office Volume") Dim CurVol As Integer = hs.DeviceValue(DeviceRef) hs.writelog("Sonos Script", "Current Volume is: " & CurVol) If CurVol < 30 Then hs.SetDeviceValue(DeviceRef, value) hs.writelog("Sonos Script", "Volume set to: " & value) End If End Sub
Comment