Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Ping Abfrage
Autor: acid1
Datum: 25.06.08 13:21
Hallo zusammen, ich will in meinem Projekt den Ping abfragen einer ip um zu sehen ob die Hosts datei diese auch richtig übernimmt. getestet hab ich es schon folgt: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles Button1.Click Dim sIP As String = "78.46.67.51" Dim sBuffer As String = _ My.Computer.FileSystem.ReadAllText( _ "C:\WINDOWS\system32\drivers\etc\hosts") If sBuffer.Contains(sIP & " " & "l2authd.lineage2.com") Then MsgBox("Eintrag schon Vorhanden") Else My.Computer.FileSystem.CopyFile( _ "C:\WINDOWS\system32\drivers\etc\hosts", _ "C:\WINDOWS\system32\drivers\etc\hostsalt", _ FileIO.UIOption.AllDialogs, _ FileIO.UICancelOption.DoNothing) Dim file As System.IO.StreamWriter file = My.Computer.FileSystem.OpenTextFileWriter( _ "C:\WINDOWS\system32\drivers\etc\hosts", True) file.WriteLine("78.46.67.51 l2authd.lineage2.com") file.WriteLine("78.46.67.51 nprotect.lineage2.com") file.Close() Process.Start("cmd.exe", "/C ipconfig/flushdns") End If und zwar sollte es nach dem flushdns gemacht werden .... wenn ich aber Public Shared Function PingHostOrIP(ByVal HostOrIP As String) As Boolean Try Return My.Computer.Network.Ping(HostOrIP) Catch End Try End Function einsetze vor End If funktioniert es nicht .... auch einen neuen Button damit zu füttern stößt auf fehler ..... will einfach ping abfragen und dann ne antwort erhalten geht oder geht nicht ... also im prinzip true für funktioniert oder false verbindungsfehler. Also ne kleines ok oder kaputt wär von vorteil.+ Hat jemand ne idee?

Ping Abfrage	1.127	acid1	25.06.08 13:21
Re: Ping Abfrage	811	Dieter	25.06.08 13:24
Re: Ping Abfrage	834	Dieter	25.06.08 13:26
Re: Ping Abfrage	743	acid1	25.06.08 14:35
Re: Ping Abfrage	738	Melkor	25.06.08 14:37
Re: Ping Abfrage	800	acid1	25.06.08 14:42
Re: Ping Abfrage	789	Melkor	25.06.08 14:46
Re: Ping Abfrage	813	acid1	25.06.08 14:50
Re: Ping Abfrage	730	Melkor	25.06.08 15:00
Re: Ping Abfrage	944	acid1	25.06.08 15:04
Re: Ping Abfrage	752	Melkor	25.06.08 15:07
Re: Ping Abfrage	828	acid1	25.06.08 15:09
Re: Ping Abfrage	723	acid1	25.06.08 15:17
Re: Ping Abfrage	741	Melkor	25.06.08 15:20
Re: Ping Abfrage	855	acid1	25.06.08 15:26
Re: Ping Abfrage	744	Dieter	25.06.08 15:11
Re: Ping Abfrage	814	acid1	25.06.08 15:18
Re: Ping Abfrage	806	acid1	25.06.08 14:37

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen