Hallo zusammen,
trotz MSDN und anderen Informationsquellen komm ich leider nicht an mein Ziel und hoffe, Ihr könnt mir helfen.
Ich hab ein Tool geschrieben, welches die IP-Adressen eines Rechners aus der System.Net.Dns.GetHostAddresses(System.Net.Dns.GetHostName()) ausliest:
Soweit funktioniert alles sehr gut.
Nun möchte ich in einem weiteren Programmteil genau diesen String aus der Messagebox benutzen, um ihn in einer Textdatei darzustellen.
Leider finde ich keine Möglichkeit dies funktionierend in meine WriteAllText einzufügen:
Lieben Dank für eure Mühen,
Matthias aka pindoyu
trotz MSDN und anderen Informationsquellen komm ich leider nicht an mein Ziel und hoffe, Ihr könnt mir helfen.
Ich hab ein Tool geschrieben, welches die IP-Adressen eines Rechners aus der System.Net.Dns.GetHostAddresses(System.Net.Dns.GetHostName()) ausliest:
VB.NET-Quellcode
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IP_Button.Click
- For Each add As System.Net.IPAddress In System.Net.Dns.GetHostAddresses(System.Net.Dns.GetHostName())
- MessageBox.Show("Die IP lautet: " & add.ToString, "IP Addresse für " & System.Net.Dns.GetHostName)
- Next
- End Sub
Soweit funktioniert alles sehr gut.
Nun möchte ich in einem weiteren Programmteil genau diesen String aus der Messagebox benutzen, um ihn in einer Textdatei darzustellen.
Leider finde ich keine Möglichkeit dies funktionierend in meine WriteAllText einzufügen:
VB.NET-Quellcode
- My.Computer.FileSystem.WriteAllText("C:\Rechner.txt", "Bericht von " & Environment.UserName & ":" & vbCrLf & vbCrLf & Problembeschreibung_input.Text & vbCrLf & vbCrLf & vbCrLf & vbCrLf & "Daten zur verwendeten Hardware:" & vbCrLf & vbCrLf & "Computername / Hostname: " & Environment.MachineName & vbCrLf & "anderer Hostname: " & Hauptfenster.tcl_hostname.Text & vbCrLf & "Benutzername: " & Environment.UserName & vbCrLf & vbCrLf & "IP-Adresse: " & ????(Was muss hier nun hin?)????, True)
Lieben Dank für eure Mühen,
Matthias aka pindoyu