Prowl HS3 Script

[bartbakels]

dear all,

hereby one of te first HS3 scripts i would like to share. Its used to send messages to phones or computers by use of PROWL, its quite simple;

Code: Select all

sub Main (byVal msg_short As String)

Dim url
Dim url_response

url = "apikey=YOURAPIKEY&application=HS3&event=" &msg_short 
url_response = hs.URLAction("https://api.prowlapp.com/publicapi/add", "POST", url, "Content-Type: application/x-www-form-urlencoded")

End Sub

save this as xxxx.vb replace the APIKEY

and call it in Homeseer with Main and as parameter the text that you want to send.

regards bart

[Bastiaan]

Thanks a lot, another step in moving over.

[Phaeton]

Ik heb het script iets aangepast voor gebruik met Notify My Android. Je kan er drie zaken aan aanpassen.

API_INVOEREN = hier je API key invoeren
TITEL MELDING INVOEREN = Hier kan je de titel van de melding invoeren
KOP VAN DE MELDING INVOEREN = Hier kan je de kop van de melding invoeren

ik ga proberen om deze variabelen binnen Homeseer in te laten voeren, maar dat kan nog even duren. Voor nu kan iemand hier wellicht al zijn voordeel mee doen?

Code: Select all

sub Main (byVal msg_short As String)

Dim url
Dim url_response

url = "?apikey=APIKEY_INVOEREN&application=TITEL_MELDING_INVOEREN&event=KOP_VAN_DE_MELDING_INVOEREN&priority=0&description=" &msg_short 
url_response = hs.URLAction("https://www.notifymyandroid.com/publicapi/notify" &url, "POST", "", "Content-Type: application/x-www-form-urlencoded")

End Sub

[Snelvuur]

Gebruik zelf "Pushover" dit werkt met zowel android als iphone. Als b.v. iemand dan een script heeft hoef je niet 2 aparte versies te maken (of van telefoon verandert) misschien ook eens het kijken waard. Werkt op zelfde soort principe.