This works in VB6
ActiveHome1.SendCommand "sendplc", "e8 StatusRequest"
You can pick up the response in the ReceiveAction procedure of the ActiveHome1 component (using the ahscript.dll)
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
You should pick up two responses when working with a 2way module. The first response comes from sending the command. The second response (event) should occur after the 2way module sends its response. The CM15A should pick up the response and it should be reported in the ReceiveAction procedure.
Immediate Window results:
-----------------------------------------------------------------------
recvplc e8 StatusRequest
recvplc e8 StatusOff
-----------------------------------------------------------------------
This worked on an AM14A (2-way appliance module) : also worked with the RR501 Transceiver Module.
Hank
