Help Please!

[weisi]

I have problem with my Mobile VB application. How do I change VB's winsock to Mobile VB's AFClientsocket?

The error message is:

run-time error "450"
wrong number of arguments or invalid property assignments


Code:

Private Sub cmdConnect_Click()

'
' Connect to the localhost on port 10101.
Call lstEvents.AddItem("Connecting to 127.0.0.1")

With AFClientSocket1
Call .Close

.RemoteHostIP = "127.0.0.1"
.remotePort = 10101
Call .Connect

End With
'

End Sub

What is the problem with this coding?

[bonobonovic]

Here your are:

Option Explicit

Private Sub AFGraphic1_MouseMove(ByVal x As Long, ByVal y As Long)
AFClientSocket1.SendString x & ";" & y, Len(x) + Len(y), 100
End Sub

Private Sub Form_Load()
AFClientSocket1.Connect "127.0.0.1", 1002, 100
End Sub