Foros del web, para los que viven de bits

elpeshe · 07-jul-2004, 14:53

Hola, amigos
Tengo una conexion en vb6, intento conectar a un dsn de una bd que esta en otra maquina, ademas esta bd access tiene una clave.
Como seria la cadena de conexion dsn con clave

Gracias

estelam2004 · 08-jul-2004, 07:55

en declaraciones generales:
Public WithEvents conex As ADODB.Connection

en el Form_Load:
Set conex = New ADODB.Connection
Dim RuTa As String
RuTa = App.Path

With conex
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + RuTa + "\Base_Datos.mdb;Jet OLEDB:Database Password=" & "Clave" & ";"
.CursorLocation = adUseClient
.Open
End With

07-jul-2004, 14:53	#1 (permalink)
elpeshe Fecha de Ingreso: julio-2004 Mensajes: 1	Conexion con clave Hola, amigos Tengo una conexion en vb6, intento conectar a un dsn de una bd que esta en otra maquina, ademas esta bd access tiene una clave. Como seria la cadena de conexion dsn con clave Gracias

08-jul-2004, 07:55	#2 (permalink)
estelam2004 Fecha de Ingreso: mayo-2004 Ubicación: Av. FFAA, Caracas Mensajes: 29	Si aun necesitas la conexion con clave en declaraciones generales: Public WithEvents conex As ADODB.Connection en el Form_Load: Set conex = New ADODB.Connection Dim RuTa As String RuTa = App.Path With conex .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + RuTa + "\Base_Datos.mdb;Jet OLEDB:Database Password=" & "Clave" & ";" .CursorLocation = adUseClient .Open End With

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado