Cómo conectarse a MS SQL utilizando VBScript

Visual Basic Scripting , o VBS , le permite conectarse a su base de datos interna para recuperar datos para los usuarios. VBS es utilizado habitualmente por los administradores de red de Windows para configurar las preferencias en el ordenador del usuario y unidades de red . Se conecta a una base de datos con VBS para recuperar las preferencias del usuario almacenados en las tablas de base de datos Microsoft SQL Server. El objeto que se utiliza para conectar se llama " ADO ", que es un objeto de conexión de Microsoft disponible para cada lenguaje de programación Microsoft . Instrucciones
1

Haga clic en el archivo de script VBS y seleccione " Abrir con". Haga doble clic en " Bloc de notas " para abrir el archivo en su editor de texto . Si usted tiene un editor de terceros , haga doble clic en su lugar.
2

Crear las variables de ADO . Las variables de objeto ADO se utilizan para conectarse a la base de datos. El objeto contiene las funciones y propiedades que se utilizan para conectar en un entorno Windows . Escriba el siguiente código en su archivo :

Set conn = CreateObject ( " ADODB.Connection " )

Set rs = CreateObject ( " ADODB.Recordset ")

3

Crear la conexión. El objeto " conexión " que ha creado en el paso 2 le permite conectarse a la base de datos. Debe especificar la base de datos del servidor, nombre de usuario y contraseña. Escriba el siguiente código en el editor:

conn.Open " Provider = SQLOLEDB ; Data Source = sql_server ; Trusted_Connection = Sí ; Initial Catalog = nombre_bd ; ID de usuario = usuario , contraseña = pasar, "
< p > Reemplazar " sql_server " con el nombre del servidor de MS SQL . Reemplazar " nombre_bd " con el nombre de su base de datos , y reemplazar "usuario" y "pass " con el nombre de usuario de SQL Server y la contraseña creada en la base de datos .
4

Recuperar registros de la base de datos. Ahora que usted tiene una conexión , puede consultar las tablas de récords. A continuación se muestra un ejemplo de consulta para el nombre de un empleado :

query = "select nombre de los empleados "

consulta rs.Open , conn, adOpenStatic , adLockOptimistic

reemplazar la consulta variable de cadena con su propia consulta.
5

Pulse " Ctrl" y " S " para guardar los cambios . Haga doble clic en el archivo VBS para ejecutarlo en Windows y probar el nuevo código.