i am having trouble with my chat client it is coming up and saying unsupported variant type.
so here is my code i have.
Private Sub bntSend_Click()
On Error GoTo t
sock1.SendData txtSend
txtLog = txtLog & "Client : " & txtSend & vbCrLf
Exit Sub
t:
MsgBox "Error : " & Err.Description
sock1_Close
End Sub
that is the code that is causing the problem.
it is the code that sends the text you typed to the other person and that is when the error comes up and when the error comes up it disconnects you from the server.
when you open the client program the ip and port in there is the server i have for the program to run on or you could open the server program and use your computer as the server.
and this is coded in visual basics 6
here is the download too for the server and client