Visual Basic - no se puede utilizar la conexion para realizar esta operacion

Life is soft - evento anual de software empresarial
 
Vista:

no se puede utilizar la conexion para realizar esta operacion

Publicado por Mariel (9 intervenciones) el 17/06/2013 16:39:48
Que tal amigos,
Estoy comenzando con visual basic y ado y se me planteó el primer conflicto que no se cómo resolver, les comento en un módulo coloqué lo siguiente para conectarme a mi base:


Global base As New ADODB.Connection
Global RsUsuarios As New ADODB.Recordset
Global UsuarioActual As String

Sub main()
With base
.CursorLocation = adUseClient
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Base1.mdb;Persist Security Info=False"
FrmLogin.Show
End With
End Sub

Sub Usuarios()
With RsUsuarios
If .State = 1 Then Close
.Open "select * from PERSONAL", base, adOpenStatic, adLockOptimistic ''
End With
End Sub

Luego en el FrmLogin en el evento load coloqué

Private Sub Form_Load()
Usuarios
End Sub

El problema es que me tira el siguiente error:
"No se puede utilizar la conexión para realizar esta operación. Está cerrada o no es válida en este contexto" y al cerrar esta ventana me remite a la línea del Sub Usuarios


.Open "select * from PERSONAL", base, adOpenStatic, adLockOptimistic ''

Qué estoy haciendo mal????
Gracias!
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