Script voor opdelen devicestring.
Posted: Fri Jul 03, 2015 11:45 am
Hoi,
Graag zou ik wat hulp willen hebben bij het volgende. Ik ben bezig met een script om waardes uit een string (Plugwise plug) in een virtual device te krijgen.
Mijn kennis is niet toereikend om de laatste stap te maken. Dit is de string (On -1.546,00W -4,25kWhT -29,31kWh)
Sub Main(Byval Parms As Object)
dim sVal as string = hs.deviceString("442")
dim splitVal() as string
splitVal = sVal.split(" ")
hs.writelog("data",splitVal(0))
hs.writelog("data",splitVal(1))
hs.writelog("data",splitVal(2))
hs.writelog("data",splitVal(3))
hs.setDeviceValue("451", splitVal(1))
End Sub
Het volgende verschijnt in mijn log:
jul-03 11:18:51 Error 1 Running script C:\Program Files (x86)\HomeSeer HS3\scripts\Kwh test.vb :Het doel van een aanroep heeft een uitzondering veroorzaakt.De conversie van tekenreeks -1.546,00W naar type Double is ongeldig.
jul-03 11:18:51 data -29,31kWh
jul-03 11:18:51 data -4,25kWhT
jul-03 11:18:51 data -1.546,00W
jul-03 11:18:51 data On
jul-03 11:18:51 Event Event Script KWH test triggered by the event page 'Run' button.
Het opsplitsen gaat goed alleen lukt het niet om de waarde in VD "451" te krijgen.
Ik hoop dat iemand mij kan helpen met deze laatste stap.
Mvgr Robert
Graag zou ik wat hulp willen hebben bij het volgende. Ik ben bezig met een script om waardes uit een string (Plugwise plug) in een virtual device te krijgen.
Mijn kennis is niet toereikend om de laatste stap te maken. Dit is de string (On -1.546,00W -4,25kWhT -29,31kWh)
Sub Main(Byval Parms As Object)
dim sVal as string = hs.deviceString("442")
dim splitVal() as string
splitVal = sVal.split(" ")
hs.writelog("data",splitVal(0))
hs.writelog("data",splitVal(1))
hs.writelog("data",splitVal(2))
hs.writelog("data",splitVal(3))
hs.setDeviceValue("451", splitVal(1))
End Sub
Het volgende verschijnt in mijn log:
jul-03 11:18:51 Error 1 Running script C:\Program Files (x86)\HomeSeer HS3\scripts\Kwh test.vb :Het doel van een aanroep heeft een uitzondering veroorzaakt.De conversie van tekenreeks -1.546,00W naar type Double is ongeldig.
jul-03 11:18:51 data -29,31kWh
jul-03 11:18:51 data -4,25kWhT
jul-03 11:18:51 data -1.546,00W
jul-03 11:18:51 data On
jul-03 11:18:51 Event Event Script KWH test triggered by the event page 'Run' button.
Het opsplitsen gaat goed alleen lukt het niet om de waarde in VD "451" te krijgen.
Ik hoop dat iemand mij kan helpen met deze laatste stap.
Mvgr Robert