Dear Sir. (Brian H & Bill)
thankyou for ur kind help.
would you plz let me know ur suggestion .
what is difference betwen these code
ActiveHome1.SendAction "sendplc", "a1 alllightson"
ActiveHome1.SendAction "sendplc", "b1 alllightson"
ActiveHome1.SendAction "sendplc", "a1 on"
ActiveHome1.SendAction "sendplc", "b1 on"
another thing.
if we send on command to all unit we should wait to much time for example if we have 20 unit we should wait 20*10sec at least to complete our work.
by the way Mr. Brian H told that
"All Lights On command needs a house code.So maybe you have to send like AAlllightson.
So if you have lets say a House Codes A C and D in use."
I cheeked that code . i don't know why , but it doesn't work for all light . it only works for our last unit that we send a command.
for example if we send on command to a2, allllights command send same command to a2 only.
i find it by this code :
Private Sub ActiveHome1_RecvAction(ByVal bszAction As Variant, ByVal bszParm1 As Variant, ByVal bszParm2 As Variant, ByVal bszParm3 As Variant, ByVal bszParm4 As Variant, ByVal bszParm5 As Variant, ByVal bszReserved As Variant)
Debug.Print bszAction, bszParm1, bszParm2, bszParm3, , bszParm4, , bszParm5, bszReserved
End Sub
recvplc a1 On
recvplc a1 Off
recvplc a1 AllLightsOn
recvplc a1 AllLightsOn
recvplc a2 On
recvplc a2 Off
recvplc a2 AllLightsOn
also another problem.
this code doesn't on a unit:
ActiveHome1.SendAction "sendplc", "A AllLightsOn"
I am locking forward to hear more from you as son as possible.
regards
iraj
