Hej!

Kan någon förklara detta.
Nedanstående rader skall skicka ett meddelande till
ett mottagarprogram. När jag kör programmet från
vb (F5) så händer ingenting.

Men när jag kör programmet stegvis med F8
från vb då fungerar det!!!

Varför fungerar det med F8 men inte med knappen start (F5).
Kör jag programmet med start (F5)så kommer inte meddelandet fram men stegar jag det med F8 fungerar det. Obegripligt för mig.

Hoppas på svar
Vänliga hälsningar
Lasse



************************
Private Sub Command1_Click()
Winsock1.RemoteHost = txtAddress.Text
Winsock1.RemotePort = 1000

Winsock1.Connect

Do Until Winsock1.State = sckConnected
DoEvents: DoEvents: DoEvents: DoEvents
If Winsock1.State = sckError Then
MsgBox "Problem att ansluta"
End If
Loop

Winsock1.SendData (txtMessage.Text)

Winsock1.Close
End Sub

winsock.connect och winsock.senddata fungerade inte för mig heller att ha direkt efter varandra... jag löste det med att sätta winsock.senddata på ett annat ställe i koden... tror .connect behöver lite tid på sig för att upperätthålla en anslutning

Tack DoRsal för det tipset
Lasse