[VB6] Winsock

[inmate]

Hii , also ich habe mein vb6 buch durchgelesen und es wurden unter anderem Winsock client/server besprochen.
Ich wollte mal ne simple funktion machen , wie ich das notepad auf dem anderen PC öffne.

Mein Client:

Private Sub Command1_Click()
Winsock1.SendData "bla"

End Sub

Private Sub Command2_Click()
Winsock1.Close
Winsock1.Connect text1Text, Text2.Text
MsgBox ("Succesfully connected!")

End Sub

Mein Server:

Private Sub Form_Load()
Winsock1.Close
Winsock1.LocalPort = 81
Winsock1.Listen

Me.Hide
End Sub

Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)
Winsock1.Close
Winsock1.Accept requestID

End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim data As String
Call Winsock1.GetData(data, vbString)


If data = "bla" Then
Shell "notepad.exe"
End If
End Sub

Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean)
Winsock1.Close
Winsock1.Listen

End Sub

Doch wenn ich auf den Button klicke der die message bla sendet damit das notepad aufgeht kommt n fehler :"Falsches Protokoll oder Verbindungszustand für die angeforderte Transaktion oder anforderung"

Woran könnte das liegen ?

mfG

[enco]

Das bedeutet, dass keine Verbindung zwischen Client und Server besteht.

[inmate]

Aber laut dem Code sollte ich eine Verbindung bekommen , der angegebene Port ist auch frei.

[enco]

Lasse dir beim Senden vom Client mal Winsock.ConnectionState ausgeben.

[inmate]

VB kennt garkein Winsock1.connectionstat

[inout]

MsgBox ("Succesfully connected!")

Trifft erst zu, wenn beim Clienten das Connect-Event "geraised" wurde.
Und danach kannst du deine Daten auch erst absenden.

//enco meint die Eigenschaft State.

[enco]

//enco meint die Eigenschaft State.

Das kann natürlich sein, habe ewig nichts mit VB6 gemacht. Danke für die Verbesserung ;D

[inmate]

Bei connection stat kommt ne "6"
Was hat das jetzt zu bedeuten ?

mfG

[inout]

6 - SckConnecting bedeutet, dass der Socket sich gerade verbindet, aber noch nicht verbunden ist. Wie gesagt, du musst entweder ne Weile warten und hoffen, dass die Verbindung hergestellt wurde oder einfach auf das Connect-Event reagieren und erst dann deine Daten senden.

[inmate]

Ok ich werde mal rumprobieren danke für eure Hilfe

mfG