Ser at dette etterhvert burde ligget undet script. Men jeg har laget flere funksjoner i scriptet. Blant annet :
Public Sub MELSetTemperature(ByVal ParameterValue As String)
Read_keys_from_ini()
HTTPMethod = "POST"
SetParameter = "Settemperature"
debugname = debugname & " - " & SetParameter
EffectiveFlags = 4
URL = "https://app.melcloud.com/Mitsubishi.Wifi.Client/Device/SetAta"
Parameter = "DeviceID=" & strMelDeviceID_Ini & "&" & SetParameter & "=" & ParameterValue & "&HasPendingCommand=" & PendingCommand & "&EffectiveFlags=" & EffectiveFlags
Dim Settemp As String = hs.URLAction(URL, HTTPMethod, Parameter, Header & ":" & strMELContextKey)
If debug Then
hs.WriteLog(debugname, SetParameter)
End If
End Sub
Jeg forsøker å kjøre dette fra en Event og får følgende melding i loggen :
Jeg har forsøkt med Melcloud.MelSetTemperature(24), MelSetTemperature(24), og MelSetTemperature()24, men får samme feilmeldingen
Er dette noe av det samme som :
Takler ikke HS at man kjører sub'er med parameter, slik at man må kjøre suber gjennom main()
Noen som har en løsning ?