Come accedere alle informazioni di sistema remoto in VB6

April 19

Basic 6 (VB6) programmatori di Visual possono creare applicazioni network-aware che interrogano le informazioni di un computer remoto e visualizzarla per l'utente. Questi programmi vengono creati per gli amministratori di rete che devono gestire diversi computer. Il linguaggio VB6 ha alcune funzioni e strumenti che consentono di richiedere informazioni da un computer remoto sulla rete. È possibile creare questo codice nel tuo editor di Microsoft VB6.

istruzione

1 Fare doppio clic sul file di progetto VB6 sul computer. L'area di lavoro VB6 carica automaticamente e si apre l'editor VB6.

2 Creare la connessione al computer remoto. Il codice seguente crea una connessione al computer "mycomputer":

Set WMI = GetObject ( "winmgmts: {ImpersonationLevel = Rappresenta} \ MyComputer \ root \ CIMV2")

3 Accedere al computer remoto. È necessario eseguire il login con un account amministratore per interrogare le informazioni dal computer. I seguenti vi si connette al computer. Digita nella tua area di lavoro VB6:

Set locator = CreateObject ( "WbemScripting.SWbemLocator")

Set Service = locator.ConnectServer ( "mycomputer", "root \ CIMV2", "amministratore", "password")

4 Visualizzare le informazioni del computer remoto. In questo esempio, il nome del servizio Windows è mostrato all'utente. Un servizio è un programma in background che viene eseguito su un computer Windows. I seguenti messaggi di informazioni relative al computer:

Impostare query = _ service.ExecQuery ( "select * from Win32_Process")

Wscript.Echo "Nome del processo:" & query.Name

5 Fare clic sulla voce di menu "File" e selezionare "Salva". Per testare il nuovo codice, fare clic sul pulsante VB6 "Esegui" per eseguire il programma sul computer.