SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Bases de Datos => Mensaje iniciado por: Lucer en Lunes 30 de Enero de 2006, 12:55

Título: Conexion A Postgres
Publicado por: Lucer en Lunes 30 de Enero de 2006, 12:55

Bueno, la conexion ya la he hecho (mediante ADO y ODBC), pero no consigo que el recorset me funcione como es devido. Aqui os dejo el codigo a ver si alguien me puede hechar una mano.

Private Sub Form_Load()

Dim Conexion As ADODB.Connection
Dim Mitabla As ADODB.Recordset

Set Mitabla = New ADODB.Recordset
Set Conexion = New ADODB.Connection

Conexion.ConnectionString = "DSN=Mi base"
Conexion.Open

Mitabla.Open "peliculas", "DSN=Mi base", adOpenStatic, adLockOptimistic

End Sub


Gracias

Título: Re: Conexion A Postgres
Publicado por: ElberGon en Sábado 4 de Febrero de 2006, 12:09

Pues intenta esto puede ser que te sirva:


Private Sub Form_Load()

Dim Conexion As ADODB.Connection
Dim Mitabla As ADODB.Recordset

Set Mitabla = New ADODB.Recordset
Set Conexion = New ADODB.Connection

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Mitabla.CursorLocation=adUseClient  'estoesloqueteleagregechecaloyavahaservir

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Conexion.ConnectionString = "DSN=Mi base"
Conexion.Open

Mitabla.Open "peliculas", "DSN=Mi base", adOpenStatic, adLockOptimistic

End Sub