Programación General > Visual Basic 6.0 e inferiores

 Problema Con Data

(1/2) > >>

Sagutxo:
Salu2.

   ¿Hay alguna forma de meter un recordsource de un DATA cuando la DB tiene pasword?

Anteriormente sin pas lo hacía así:
En el load del form ponía esto


--- Código: Text ---Data1.DatabaseName = PathDeBaseData1.RecordSource = "SELECT * FROM Clientes ORDER BY IdCliente" 
No se si es posible meterle la pass a la base para que no casque.
Gracias, agur.  :whistling:  :whistling:  :whistling:

cpmario:
Puedes usar algo así


--- Código: Text ---Dim dbContrato As DatabaseDim recContrato As Recordset Set dbContrato = DBEngine.OpenDatabase(PathDeBase, False, False, ";Pwd=MiContraseña")strSQL = "SELECT * FROM Clientes ORDER BY IdCliente"Set recContrato = dbContrato.OpenRecordset(strSQL, dbOpenDynaset)Set Data1.Recordset = recContrato  
Mi base de datos se llama Contrato, cambia los nombres de las variables según tus necesidades. En lugar de "MiContraseña" escribe la de tu base de datos.
 :)

Sagutxo:
Salu2. Ante todo gracias por tu contestación, pero ahora me asalta otra duda.

   Si se cambia un registro se modifica en la Tabla de la DB? porque por la forma parece que no.

Gracias. :whistling:  :whistling:  :whistling:

cpmario:
Explica un poco más, no entendí lo que deseas saber.
 :hola:

Sagutxo:
Salu2, a ver si soy capaz.

  Aver, tu metes la tabla en un recordset

Set recContrato = dbContrato.OpenRecordset(strSQL, dbOpenDynaset)
y seguido el recordset en el DATA

Set Data1.Recordset = recContrato

si yo modifico un registro en el data, este no se modifica en la tabla de recContrato, ¿o me equivoco?

Gracias.
 :comp:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente