VB usa ADODB para conectarse a una base de datos SQL remota

CnStr = "Provider=SQLOLEDB;Data Source=" & DbIp & ";DATABASE=" & DbName & ";UID=" & DbUser & ";pwd=" &DbPw

Dirección IP de DbIp

Nombre de la base de datos DATABASE

Nombre de usuario DbUser

Contraseña DbPw

Dim conn como nuevo ADODB.Connection

CnStr = " Proveedor=SQLOLEDB;Fuente de datos=192.168.29.21;DATABASE=dsy;UID=sa;pwd=abc"

Conn.Open cnstr

Sql = "seleccione * del nombre de la tabla " 'Declaración de consulta SQL

Set rs = New ADODB.Recordset 'Crea un nuevo conjunto de registros. Recordset 'Crea una nueva instancia de conjunto de registros

rs.Open Sql, conn, 1, 3 'Los últimos 3 bits se utilizan para determinar los permisos de lectura y escritura

rs = New ADODB.