connect???

[haravinth]

How do i find out if a client connected to a server??

if its connected i want to display a message box says "You are now connected" else i want to display "You are not connected"

[Nightwalker83]

Try:

Private Sub Command2_Click()
Winsock1.Connect Text1, 7000
Timer1.Enabled = True
End Sub
 
Private Sub Timer1_Timer()
'Get the winsock state
If Timer1.Interval = 1 Then
Me.Caption = Winsock1.State
End If
End Sub