Visual Basic 6 ( VB6 ) programmeurs kunnen netwerk -aware toepassingen die informatie van een externe computer een query te maken en weer te geven voor de gebruiker . Deze programma's zijn gemaakt voor netwerkbeheerders die moeten meerdere computers beheren . De VB6 taal heeft een aantal functies en tools die uw opzoeking informatie laat vanaf een externe computer op het netwerk . U maakt deze code in uw Microsoft VB6 editor . Instructies
1 Dubbelklik op het VB6 project bestand op uw computer . Uw VB6 werkruimte automatisch geladen en het VB6 editor wordt geopend . Kopen van 2 Maak de verbinding met de externe computer . De volgende code maakt een verbinding met de " mycomputer " computer :
Set wmi = GetObject ( " winmgmts : { impersonationLevel = Impersonate } \\ \\ DezeComputer \\ root \\ cimv2 " ) op Twitter < br > 3 Log in op de externe computer . U moet zich aanmelden met een beheerdersaccount om informatie op te vragen van de computer . De volgende logt u in op de computer . Typ het in uw VB6 werkruimte :
Stel locator = CreateObject ( " WbemScripting.SWbemLocator " ) op Twitter Set service = locator.ConnectServer ( " mycomputer " , "root \\ cimv2 " , " administrator " , " wachtwoord" )
4 Geef de externe computer informatie . In dit voorbeeld wordt de eerste Windows servicenaam getoond aan de gebruiker . Een service is een achtergrond programma dat draait op een Windows-computer . Het volgende geeft de computer informatie : Set vraag
= _ service.ExecQuery ( " Select * From Win32_Process " ) Wscript.Echo " Process Name : "
& query.Name
< br > 5 Klik op de " File " menu en selecteer "Opslaan ". Om uw nieuwe code te testen , klikt u op de VB6 " Run" knop om het programma te draaien op uw computer .
|
