Hallo zusammen,
ich wollte eine normale Verbindung mit einem PC herstellen & einen Text dort hin senden!
Jettzt kommt die Fehlermeldung:
Liegts an den Ports bzw. an Firewall?
Bin da völlig Ahnungslos! Ist mein erster Vesuch mit TCP/IP zu arbeiten!
Gruss
Matze!
ich wollte eine normale Verbindung mit einem PC herstellen & einen Text dort hin senden!
Jettzt kommt die Fehlermeldung:
Der Code:Es konnte keine Verbindung hergestellt werden, da der Zielcomputer die Verbindung verweigerte 192.168.178.21:4000
VB.NET-Quellcode
- Dim stream As NetworkStream
- Dim streamw As StreamWriter
- Dim streamr As StreamReader
- Dim Client As New TcpClient
- Public IP As String
- ...
- Client.Connect(IP, My.Settings.Port)
- ProgressBar1.Value = 40
- If Client.Connected Then
- stream = Client.GetStream
- streamw = New StreamWriter(stream)
- streamr = New StreamReader(stream)
- ProgressBar1.Value = 60
- client_send(TextBox2.Text & vbNewLine & TextBox3.Text & vbNewLine & TextBox4.Text & vbNewLine & TextBox5.Text)
- RichTextBox1.Text = streamr.ReadLine
- If RichTextBox1.Text.Length > 0 Then
- ProgressBar1.Value = 100
- End If
- Else
- MsgBox("Verbidnung konnte nicht mit " & IP & " aufgebaut werden!")
- ProgressBar1.Value = 0
- End If
- End Sub
- Sub client_send(ByVal text As String)
- streamw.WriteLine(text)
- streamw.Flush()
- End Sub
Liegts an den Ports bzw. an Firewall?
Bin da völlig Ahnungslos! Ist mein erster Vesuch mit TCP/IP zu arbeiten!
Gruss
Matze!