Bruke ping i et nettverk søknad bidrar til å begrense tilkobling feil og feil . Ping er en prosess hvor datamaskinen sender et signal til en annen datamaskin . Denne datamaskinen kan være en server på et helt eget domene , eller det kan være en datamaskin på det lokale nettverket . Bruken av ping klasse i Microsoft Visual Basic gjør det mulig for programmet å vite om datamaskinen er til stede. Hvis ping ikke er i stand til å finne datamaskinen spesifisert, kan programmereren bruke feilkoder å vise en advarsel til brukeren. Instruksjoner
en
Åpne en ny form fil . I Visual Studio arbeidsområdet , høyreklikker du navnet på prosjektet i Solution Explorer verktøykasse. Velg Legg Form . En ny form vises i arbeidsområdet.
2
Angi IP-adressen eller domenenavnet for datamaskinen du ønsker å pinge . Koden nedenfor tildeler en variabel med et sett IP -adresse . Den timeout variabel forteller datamaskinen når du skal slutte å lete etter et svar fra den eksterne maskinen .
Dim myIP As String = " 192.168.0.1 " Dim timeoutvalue As Integer = 120
3
allokere minne for ping klassen . Før du bruker ping klassen , må det bli kalt og lagret i en variabel .
Dim pingComputer Som Ping = Ny Ping ( )
4
Ping datamaskinen. Følgende kode bruker Send metode for å pinge IP-adressen er angitt i trinn 2 .
Dim theReply Som PingReply = pingComputer.Send ( myIP )
5
Kontroller at kommandoen var vellykket . En vellykket svar returneres til Status eiendom i variabelen theReply . Koden nedenfor er pakket rundt koden som forteller programmet hva du skal gjøre hvis datamaskinen på nettverket svarte .
P Hvis theReply.Status = IPStatus.Success
End If
6
Vise respons. Koden nedenfor viser responsen til konsollen bare hvis ping var vellykket
p Hvis theReply.Status = IPStatus.Success
Console.WriteLine ( . "IP : { 0 }", theReply . Address.ToString ( ) ) Console.WriteLine ( "Tur tid : { 0 }", theReply.RoundtripTime )
End If
