SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Sagutxo en Martes 1 de Marzo de 2005, 22:25

Título: Problema Con Data
Publicado por: Sagutxo en Martes 1 de Marzo de 2005, 22:25
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
  1. Data1.DatabaseName = PathDeBase
  2. Data1.RecordSource = "SELECT * FROM Clientes ORDER BY IdCliente"
  3.  

No se si es posible meterle la pass a la base para que no casque.
Gracias, agur.  :whistling:  :whistling:  :whistling:
Título: Re: Problema Con Data
Publicado por: cpmario en Miércoles 2 de Marzo de 2005, 01:18
Puedes usar algo así

Código: Text
  1. Dim dbContrato As Database
  2. Dim recContrato As Recordset
  3.  
  4. Set dbContrato = DBEngine.OpenDatabase(PathDeBase, False, False, ";Pwd=MiContraseña")
  5. strSQL = "SELECT * FROM Clientes ORDER BY IdCliente"
  6. Set recContrato = dbContrato.OpenRecordset(strSQL, dbOpenDynaset)
  7. Set Data1.Recordset = recContrato
  8.  
  9.  

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.
 :)
Título: Re: Problema Con Data
Publicado por: Sagutxo en Miércoles 2 de Marzo de 2005, 12:10
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:
Título: Re: Problema Con Data
Publicado por: cpmario en Miércoles 2 de Marzo de 2005, 22:44
Explica un poco más, no entendí lo que deseas saber.
 :hola:
Título: Re: Problema Con Data
Publicado por: Sagutxo en Miércoles 2 de Marzo de 2005, 23:51
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:
Título: Re: Problema Con Data
Publicado por: cpmario en Jueves 3 de Marzo de 2005, 05:10
No debe preocuparte la instrucción Set Data1.Recordset = recContrato no debe modificar la funcionalidad de tu programa.
Lo que modificas con el Data1 es la base de datos. Si requieres que el recorset se actualice con lo que modificas con el Data1, solo debes hacer recContrato.Refresh. Esto si usas ese mismo Recorset (recContrato) en otra parte del programa.

 :)
Título: Re: Problema Con Data
Publicado por: Mellileo en Lunes 16 de Enero de 2006, 20:35
Hola Genios:

cpmario tiene razón, pues he probado el código que sugirió para abrir bases de datos de access con contraseña y funciona de mil maravillas.  Puedes abrir y manipular la informacion como quieras (Agrear, Modificar, Eliminar, Seleccionar), es más, puedes modificar el recordset asignado a controles data.

Gracias por el aporte.