Welche IP Adresse braucht wer bei TCP Dateitransfer?

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von nikeee13.

    Welche IP Adresse braucht wer bei TCP Dateitransfer?

    Hallo,
    ich arbeite immo an einem Programm, das mit TCP Dateien überträgt. Ich dachte, es kommt zu Off Topic, da es nix mit dem Code selbst zu tun hat. Nun mein Problem: Ich finde nicht heraus, welche IP der Server braucht, und welche der Client. Der Server soll die Dateien empfangen. Brauche ich beim Server die Internet IP (z. B. 79.198.243.194) oder die (ich glaub die heißt) lokale IP (z. B. 192.168.1.3) oder reicht da auch die 127.0.0.1?

    Wenn der Server in deinem Netzwerk ist brauchst du die interne "lokale" IP. Ist der Server außerhalb brauchst du die "Internet IP". Localhost (127.0.0.1) geht nur wenn das Programm auf dem Server direkt liegen würde, also sinnlos.

    Der Client braucht die "Internet IP" des Servers. Der Server erhält bei der Anfrage ja automatisch die Clienten IP

    Server:

    VB.NET-Quellcode

    1. Imports System, System.Net, System.Net.Sockets, System.IO
    3. Public Class Form1
    4. Dim client As TcpClient
    5. Dim listener As TcpListener
    6. Dim tread As New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf listening))
    7. Dim stream As NetworkStream
    9. Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    10. Try
    11. listener.Stop()
    12. tread.Abort()
    13. Catch
    14. End Try
    15. Application.Exit()
    16. End Sub
    18. Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    19. listener = New TcpListener(New IPAddress("192.168.1.200"), 6343)
    20. tread.Start()
    21. End Sub
    23. Sub listening()
    24. listener.Start()
    25. client = listener.AcceptTcpClient()
    26. stream = client.GetStream()
    27. Dim Buffer(1) As Byte
    28. Dim fs As New System.IO.FileStream("C:\Hans.exe", FileMode.Append, FileAccess.Write)
    29. While True
    30. Try
    31. stream.Read(Buffer, 0, 1)
    32. fs.Write(Buffer, 0, 1)
    33. fs.Flush()
    34. stream.Flush()
    35. Catch ex As Exception
    36. MsgBox(ex.Message)
    37. Exit While
    38. End Try
    39. End While
    40. fs.Close()
    41. tread.Abort()
    42. End Sub
    43. End Class


    Client:

    VB.NET-Quellcode

    1. Public Class Form1
    3. Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
    4. TextBox1.Text = Application.ExecutablePath
    5. End Sub
    7. Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
    8. Dim ip As String = InputBox("ServerIP:")
    9. Dim Port As String = InputBox("Port:")
    10. Dim client As New System.Net.Sockets.TcpClient()
    11. client.Connect(ip, Port)
    12. Dim Stream As System.Net.Sockets.NetworkStream = client.GetStream()
    13. Dim Buffer(1) As Byte
    14. Dim Stream2 As New System.IO.FileStream(TextBox1.Text, System.IO.FileMode.OpenOrCreate, System.IO.FileAccess.Read)
    15. ProgressBar1.Maximum = Stream2.Length
    16. Dim TestString As String = String.Empty
    17. While True
    18. Try
    19. Stream2.Read(Buffer, 0, 1)
    20. Stream.Write(Buffer, 0, 1)
    21. Stream.Flush()
    22. ProgressBar1.Value += 1
    23. If Stream2.Position = Stream2.Length Then
    24. MsgBox("Fertig")
    25. Exit While
    26. End If
    27. Catch ex As Exception
    28. MsgBox(ex.Message)
    29. Exit While
    30. End Try
    31. End While
    32. End Sub
    33. End Class

    Wenn ichs mit 127.0.0.1 an mich selbst sende gehts. Hab die Output Datei einfach mal Hans.exe genannt. Ich nenn sie halt einfach Internet-IP :D

Facebook
Telefonspende