Visual Basic - Error de conexion...

Life is soft - evento anual de software empresarial
 
Vista:

Error de conexion...

Publicado por aldo (111 intervenciones) el 12/05/2004 19:18:11
Hola:
me sale el error: 3709. "No se puede utilizar la conexion para realizar esta operacion. Esta cerrada o no es valida en este contexto."

Es una base en Access pasada a 97 para poder trabajarla. Y tengo un modulo donde hago la conexion...

Set dbAccess = New Connection
dbAccess.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\prestaciones.mdb;Persist Security Info=False"

En el formulario hago lo siguiente...

Dim rsTab AS ADODB.Recordset
Set rsTab = New Recordset
rsTab.Open "select max(codpres) as maxi from cordoba", dbAccess, adOpenDynamic, adLockOptimistic

Y me tira el error antes descripto...
Cabe aclarar que en el menu Proyecto\Referencias tengo configurado el Microsoft Activex Data Objects 2.7 Library

Alguien me puede ayudar??
Gracias por su tiempo...
Aldo
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Error de conexion...

Publicado por Richard (25 intervenciones) el 12/05/2004 21:11:33
hey Aldo mira lo q veo es que no has declarado la conexion en el modulo y recuerda q en el modulo tienes q declarar una conexion y un recordset este ultimo s el q abre las tablas y hace las modificaciones eso s asi como lo tienes con la salvedad de esta linea de codigo:

"Dim dbConexion as ADODB.Connection "
Set dbConexion = New ADODB.Connection

intenta a ver! espero sea lo q necesitas! saludos!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error de conexion...

Publicado por aldo (111 intervenciones) el 12/05/2004 22:23:39
lo tengo asi, como vos me lo aclaras...
la verdad, no se que esta pasando.
Disculpame la molestia y gracias de todos modos
saludos
Aldo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error de conexion...

Publicado por Richard (25 intervenciones) el 12/05/2004 23:04:28
bueno... tranquilo de todsa maneras revisa este codigo asi s q yo lo utilizo con ado 6.0

ASI DECLARO
Option Explicit (PARA LLAMAR AL MODULO EN TU CASO)
Dim VAR1 As New ADODB.Connection
Public VAR2 As New ADODB.Recordset
Dim VAR3 As String

Private Sub Form_Load()
EN LA VAR1 CONECTO
VAR1.Open "Provider=Microsoft.Jet.OLEDB.4.0;;Data Source = quimicos.mdb" & ";" & "Jet OLEDB:Database Password = 123"
ChDir App.Path

VAR3 = "SELECT * FROM Tinfo_organismos "
VAR2.Open VAR3, VAR1, adOpenKeyset, adLockOptimistic
Text1.Text = VAR2!codorga
Text2.Text = VAR2!nomorga
Text3.Text = VAR2!weborga
Text4.Text = VAR2!telforga
Text5.Text = VAR2!email

SUERTE....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Error de conexion...

Publicado por Francisco (65 intervenciones) el 13/05/2004 23:22:11
Microsoft.Jet.OLEDB.4.0 el el proveedor necesario para Acces 2000.
Si tienes una base de datos Acces 97, debes usar:
Provider=MICROSOFT.JET.OLEDB.3.51

Suerte!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar