Script para ejecutar consultas en red local a una base de datos.
Publicado por Victor Hugo Ramírez (1 intervención) el 01/06/2018 03:17:51
¡Hola!
Estoy buscando la solución para hacer un script (ya sea en vb, javascript o algún otro lenguaje) y consultar remotamente (mediante la red local), campos de una base de datos alojada en un servidor.
Requiero hacerlo como éste script de vbs que proporciona el número de serie solicitando la ip del equipo a consultar.
Gracias
Estoy buscando la solución para hacer un script (ya sea en vb, javascript o algún otro lenguaje) y consultar remotamente (mediante la red local), campos de una base de datos alojada en un servidor.
Requiero hacerlo como éste script de vbs que proporciona el número de serie solicitando la ip del equipo a consultar.
1
2
3
4
5
6
7
8
9
10
11
Dim strComputer, objWMIService, colItems, objItem
strComputer = InputBox("Please enter the computer name or IP Address:","Computer Name or IP Address")
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_BIOS",,48)
For Each objItem In colItems
MsgBox "Server Serial: " & objItem.SerialNumber
Next
MsgBox "que vuelva!"Gracias
Valora esta pregunta
0