Visual Basic 6 ( VB6 ) programmører kan oprette netværk -aware applikationer, der forespørger en fjerncomputers information og vise den for brugeren. Disse programmer er skabt til netværksadministratorer , der har brug for at styre flere computere . Det VB6 sproget har nogle funktioner og værktøjer , som lader dig query oplysninger fra en fjerncomputer på netværket. Du opretter denne kode i din Microsoft VB6 editor. Instruktioner
1

Dobbeltklik på VB6 projekt fil på din computer . Din VB6 arbejdsområde automatisk belastninger og VB6 editor åbnes.
2

Opret forbindelse til fjerncomputeren. Følgende kode opretter en forbindelse til " mincomputer " computer : Hej

Set WMI = GetObject ( " winmgmts : { impersonationLevel = Imiter } \\ \\ mincomputer \\ root \\ cimv2 " )
< br > 3

Log på fjerncomputeren. Du skal logge på med en administratorkonto for at forespørge oplysninger fra computeren. Følgende logger dig ind på computeren. Skrive det i din VB6 arbejdsområde : Hej

Set locator = CreateObject ( " WbemScripting.SWbemLocator " )

Set service = locator.ConnectServer ( " mincomputer " , "root \\ cimv2 ", " administrator" , "password " )
4

Display fjerncomputeren information. I dette eksempel er den første Windows service navn vises til brugeren . En service er en baggrund program, der kører på en Windows-computer. Det følgende viser oplysninger om computeren : Hej

Set query = _ service.ExecQuery ( "Select * From Win32_Process " )

WScript.Echo "Process navn: " & query.Name
< br > 5

Klik på " Filer" menupunktet , og vælg "Gem". For at teste den nye kode , skal du klikke på VB6 "Kør" knappen for at køre programmet på din computer.