Page 1 of 1
script
Posted: Fri Aug 01, 2008 5:35 pm
by Edwin
Hallo,
vraagje,ik heb een virtueel device H1 hoe kan ik die via een script op "on" zetten?
is er ergens een site waar k dat homeseer scripting kan leren,met simpele voorbeelden.
b.v.d
groeten edwin
script
Posted: Fri Aug 01, 2008 5:58 pm
by TANE
Edwin,
Homeseer help file heeft zelf voldoende script voorbeelden
volgende voorbeeld komt van de help
sub main()
' set the dim value of device B2 to 60%
hs.SetDeviceValue "B2",60
end sub
script
Posted: Sat Aug 02, 2008 3:57 pm
by Edwin
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by Chak</i>
<br />Edwin,
Homeseer help file heeft zelf voldoende script voorbeelden
volgende voorbeeld komt van de help
sub main()
' set the dim value of device B2 to 60%
hs.SetDeviceValue "B2",60
end sub
script
Posted: Sun Aug 03, 2008 1:25 am
by Digit
Wellicht een hele omweg, maar dat komt dan doordat ik HS niet genoeg ken:
Als je in die commandline nou met de tool wget (zoek indien nodig op internet hiernaar) de HS-webserver zou kunnen aanroepen, dan moet dat kunnen. Misschien in combinatie met TenHsServer? (doorzoek dit forum)
script
Posted: Sun Aug 03, 2008 7:46 am
by Edwin
<blockquote id="quote"><font size="1" face="Verdana, Arial, Helvetica" id="quote">quote:<hr height="1" noshade id="quote"><i>Originally posted by Digit</i>
<br />Wellicht een hele omweg, maar dat komt dan doordat ik HS niet genoeg ken:
Als je in die commandline nou met de tool wget (zoek indien nodig op internet hiernaar) de HS-webserver zou kunnen aanroepen, dan moet dat kunnen. Misschien in combinatie met TenHsServer? (doorzoek dit forum)
script
Posted: Sun Aug 03, 2008 8:44 am
by TANE
Edwin,
vanuit vbscript kan je binnen homeseer bijna alles doen.
Ik heb zelf niet voldoende ervaring om je verder te helpen.
beste is om even op HS forum te vragen.
er zullen vast wel genoeg voorbeelden zijn.
script
Posted: Sun Aug 03, 2008 9:37 am
by Droezel
Je kan een vbscriptje maken, bijvoorbeeld zonetrigger.vbs.
Code: Select all
Dim hs
Set hsi = createobject("HomeSeer2.application")
hsi.SetHost "localhost"
rval = hsi.Connect("default","default")
if rval <> "" then
msgbox rval
end if
Set hs = hsi.GetHSRef
'trigger event
hs.TriggerEvent("zonetrigger_event")
'or set device
hs.SetDeviceValue "A1", ...
Via commandline kan je dit script laten aanroepen met het commando:
script
Posted: Sun Aug 03, 2008 7:10 pm
by Edwin
Ik ga is kijken of dit werkt,Bedankt!
groeten edwin