This is the discussion thread for the Z-Wave lock events script located here:
http://board.homeseer.com/showpost.p...47&postcount=1
Cheers
Al
http://board.homeseer.com/showpost.p...47&postcount=1
Cheers
Al
If this is your first visit, be sure to check out the FAQ. You must register before you can post.
IMPORTANT: Your first post will be checked for appropriate content. This may take a bit of time.
Sub Main(ByVal Parms As Object) Dim ParmArray() as String ParmArray = Parms.tostring.split("|") 'split parameter into an array Dim subject = ParmArray(0) Dim message = ParmArray(1) Dim priority = ParmArray(2) Dim sound = ParmArray(3) Try [b]Dim CO(7) As Object 'changed from CO(6)[/b] CO(0) = "All Clients" 'must be matched with a device name already in the plugin or 'All Clients' CASE SENSITIVE CO(1) = message 'message body CO(2) = subject 'message text CO(3) = priority 'low/normal/high/emergency CO(4) = sound 'message sound from list already in HomeSeer - must match CO(5) = Nothing CO(6) = Nothing [b]CO(7) = Nothing[/b] hs.PluginFunction("Pushover 3P", "", "Pushscript", CO) Catch ex As Exception hs.WriteLog("", "Exception in script: " & ex.Message) End Try End Sub
User Code 1 Entered (1),2015-09-11,19:12:41 User Code Entered (20),2015-09-11,19:12:53 User Code Entered (20),2015-09-11,19:13:04 Tamper Lock-Out (96),2015-09-11,19:14:50
Comment