|  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man gör en Ping från Visual Basic

    Operativsystemet Windows innehåller en DLL fil som du använder i ditt Visual Basic-kod för att pinga en nätverksserver . Den ping Förfarandet returnerar ett svar du kan använda i koden för att identifiera om datorn är online och tillgänglig på nätet . Du måste inkludera Windows DLL -filen i din egen VB -kod fil . Efter DLL ingår , kan du pinga alla datorer i nätverket . Instruktioner
    1

    Klicka på Windows " Start " -knappen , och välj " Alla program ". Klicka på " Microsoft Visual Basic , " klicka sedan på " Visual Basic 6 . " Öppna din VB -projektet .
    2

    Dubbelklicka på filen i listan över filer källkoden för ditt projekt . Filen öppnas i din VB editor
    3

    Kopiera och klistra in följande kod till toppen av din fil för att inkludera Windows DLL i ditt VB -projektet : .

    Privat deklarera Funktion IcmpSendEcho Lib " icmp.dll " _

    ( ByVal IcmpHandle As Long , _

    ByVal DestinationAddress As Long , _

    ByVal RequestData As String , _

    ByVal RequestSize As Long , _

    ByVal RequestOptions så länge , _

    ReplyBuffer Som ICMP_ECHO_REPLY , _

    ByVal ReplySize As Long , _

    ByVal Timeout As Long ) As Long

    koden måste kopieras i sin helhet , eller VB kompilatorn returnerar ett fel . Koden omfattar " ICMP.DLL " funktion från Windows -operativsystemet som pingar en dator från skrivbordet
    4

    Lägg till följande kod för att pinga fjärrdatorn : .

    Call IcmpSendEcho ( hIcmp , IPadress , " ping " , Len ( 50 ) , 0 , Svara , Len ( Svara ) , 20 ) katalog

    Ersätt " IPadress " med IP-adressen för fjärrdatorn .

    5

    Hämta reprisen från kommandot ping . Följande kod bestämmer om ping lyckades :

    mypingresponse = Reply.Status

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur man läser en mapp och visa innehåll som länkar m…
    ·Hur man skiljer mellan anropande proceduren & Funktion …
    ·Hur man skapar en Array i Visual Basic
    ·Visual Basic reglage och funktioner
    ·Hur Kopiera Array i VB6
    ·Hur du uppdaterar ComboBox på Förändring av övrigt …
    ·Hur man använder en matris i Vb.Net
    ·Lägga till en färgpalett att VB6
    ·Hur man förbereder en Data Rapport i VB 6
    ·Hur man gör moduler i VB6
    Utvalda artiklarna
    ·Hur Sammanställ en körbar JAR Fil
    ·Hur man kompilerar C + + i JGrasp
    ·VBA Search & Word Replacement
    ·Hur att dölja en Holder Image Plats
    ·Hur du väljer Senaste MySQL automatisk ökning i PHP
    ·Java 1.5 Tutorial
    ·Ett PHP- skript för att backa upp en MySQL databas
    ·Hur man skickar MIME-huvuden
    ·Hur man beräknar tid mellan två datum i PHP
    ·Visual Basic 6 Steg - för-steg
    Copyright © Dator Kunskap http://www.dator.xyz