
03/10/2006, 16:16
|
| | Fecha de Ingreso: marzo-2006
Mensajes: 56
Antigüedad: 19 años, 2 meses Puntos: 0 | |
A ver; prueba esto:
Dim Conn, user, pswd, sServer, sConnStr
Dim rsc
user = "user"
pswd = "password"
sServer = "Servidor"
sConnStr = "Provider=MSDAORA.1;"&_
"Data Source=" & sServer &_
";User ID="&user&";Password="&pswd&";"
Set Conn = CreateObject("ADODB.Connection")
Conn.Open sConnstr |