problemas con recordset
Publicado por carolina (7 intervenciones) el 12/08/2005 17:37:52
hola a todos, escribo porq tengo un problema, cuando trato de abrir un recordset me dice que no se puede porq no esta abierta la conexion pero yo la abri, que puedo hacer? aqui esta el codigo del procedimiento q estoy usando:
Private Sub Mostrar_Lista(C As Control, SQL As String, parametro_opcion)
Dim conexion As ADODB.Connection
Dim registro As ADODB.Recordset
Dim rs As ADODB.Recordset
Dim s As String
Dim strconexion As String
Set conexion = New ADODB.Connection
strconexion = "Provider=MSDASQL.1;Persist Security Info=False;User ID=postgres;Data Source=PostgreSQL"
conexion.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;User ID=postgres;Data Source=PostgreSQL"
conexion.Open strconexion
Set registro = New ADODB.Recordset
registro.LockType = adLockOptimistic
registro.CursorType = adOpenKeyset
registro.Open s
si alguien puede ayudarme de antemano lo agradezco
Private Sub Mostrar_Lista(C As Control, SQL As String, parametro_opcion)
Dim conexion As ADODB.Connection
Dim registro As ADODB.Recordset
Dim rs As ADODB.Recordset
Dim s As String
Dim strconexion As String
Set conexion = New ADODB.Connection
strconexion = "Provider=MSDASQL.1;Persist Security Info=False;User ID=postgres;Data Source=PostgreSQL"
conexion.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;User ID=postgres;Data Source=PostgreSQL"
conexion.Open strconexion
Set registro = New ADODB.Recordset
registro.LockType = adLockOptimistic
registro.CursorType = adOpenKeyset
registro.Open s
si alguien puede ayudarme de antemano lo agradezco
Valora esta pregunta


0