Cómo acceder a la información del sistema remoto en VB6

Visual Basic 6 ( VB6 ), los programadores pueden crear aplicaciones de red que no consultan la información de un ordenador remoto y mostrarla al usuario. Estos programas se crean para los administradores de red que necesitan para gestionar varios ordenadores . El lenguaje VB6 tiene algunas funciones y herramientas que le permiten consultar información desde un ordenador remoto en la red . Se crea este código en tu editor de Microsoft Visual Basic 6 . Instrucciones
1

doble clic en el archivo de proyecto de Visual Basic 6 en el equipo. Su VB6 espacio de trabajo se carga automáticamente y se abre el editor de Visual Basic 6 .
2

Crear la conexión con el equipo remoto. El siguiente código crea una conexión con el ordenador " MiPC ":

Set WMI = GetObject ( " winmgmts : { impersonationLevel = Suplantar } \\ \\ mycomputer \\ root \\ cimv2 ")

3

Inicie sesión en el equipo remoto. Usted debe iniciar sesión con una cuenta de administrador para consultar la información de la computadora. La siguiente sesión en el equipo. Escriba en su espacio de trabajo VB6 :

Configurar localizador = CreateObject ( " WbemScripting.SWbemLocator " )

Set servicio = locator.ConnectServer ( " Mi PC ", " root \\ cimv2 ", " administrador" , "password ")
4

Muestra la información de la computadora remota. En este ejemplo , el primer nombre de servicio de Windows se muestra al usuario . Un servicio es un programa de fondo que se ejecuta en un equipo con Windows . A continuación se muestra la información de la computadora :

Set query = _ service.ExecQuery ( "SELECT * FROM Win32_Process " )

Wscript.Echo " Nombre del proceso :" & query.Name

5

Haga clic en el menú " archivo" y seleccione " Guardar". Para probar el nuevo código , haga clic en el botón VB6 " Run " para ejecutar el programa en su ordenador .