Fare doppio clic sul file di progetto VB6 sul computer. Il tuo spazio di lavoro VB6 automaticamente carichi e l'editor di VB6 apre.
2
Creare la connessione con il computer remoto . Il codice seguente crea un collegamento al computer " Risorse del computer " :
WMI = GetObject ( " winmgmts : { impersonationLevel = Rappresenta } \\ \\ mycomputer \\ root \\ CIMV2 " ) economici
3
accedi al computer remoto . È necessario effettuare il login con un account di amministratore per interrogare le informazioni dal computer . Di seguito si accede al computer . Digitare nella tua area di lavoro VB6 :
locator = CreateObject ( " WbemScripting.SWbemLocator " ) per
servizio = locator.ConnectServer ( " Risorse del computer ", " root \\ CIMV2 " , " amministratore " , "password" ) economici 4
Visualizza le informazioni del computer remoto . In questo esempio , il nome servizio Windows viene mostrato all'utente . Un servizio è un programma in background che viene eseguito su un computer Windows . Di seguito vengono visualizzate le informazioni del computer :
Set interrogazione
= _ service.ExecQuery ( "SELECT * FROM Win32_Process " ) per
Wscript.Echo " Nome processo : " & query.Name
5
Fare clic sulla voce di menu " File " e selezionare "Salva ". Per verificare il nuovo codice , fare clic sul pulsante "Esegui" VB6 per eseguire il programma sul vostro computer .
Programmazione © www.354353.com