I am fiddling with RAPI, look at this code:
I allways get the disconnect event, but never the connect event. What's wrong?
Sub Globals
End Sub
Sub App_Start
FormMain.Show
rapi.New1
rapi.Connect
End Sub
Sub rapi_Connected
Msgbox("PDA connected")
End Sub
Sub rapi_Disconnected
Msgbox("PDA not connected")
End Sub
End Sub
Sub App_Start
FormMain.Show
rapi.New1
rapi.Connect
End Sub
Sub rapi_Connected
Msgbox("PDA connected")
End Sub
Sub rapi_Disconnected
Msgbox("PDA not connected")
End Sub
I allways get the disconnect event, but never the connect event. What's wrong?