Problema con visual basic 6.0 y access 2000

Cerrado
cvfo_kaleb
Message postés
1
Date d'inscription
sábado, 19 de abril de 2014
Estatus
Miembro
Última intervención
sábado, 19 de abril de 2014
- 19 abr 2014 a las 03:48
Hola,
tengo un pequeño problemilla con un programa q estoy elaborando en VB, y me preguntaba si me podrian ayudar.
Estoy creando un cajero automatica en visual 6.0, creando un modulo con el siguiente codigo:
Global base As Database
Global path As String
Sub MAIN()
Set base = Workspaces(0).OpenDatabase("C:\banco.mdb")
Form1.Show
End Sub
LA CODIFICACIÓN DEL FORMULARIO DE INGRESO AL SISTEMA ES:
Dim R As Recordset
Set R = base.OpenRecordset("CONTRASENA", dbOpenDynaset)
R.FindFirst " usuario = '" & USUARIO & "' and CLAVE = '" & CONTRASENA & "' "
If R.NoMatch Then
MsgBox "USUARIO O CONTRASEÑA INCORRECTA", vbCritical, "ERROR"
USUARIO = ""
CONTRASENA = ""
Else
Form1.Hide
Form2.Show
End If
R.Close
DB.Close
CONTRASENA = ""
USUARIO = ""
AL EJECUTARLO ME SALE ERROR 91 " VARIABLE DE TIPO OBJECT O LA VBARIABLE DE BLOQUE WITH NO ESTA ESTABLECIDA" ....... ALGUIEN PORFAVOR AYUDARME....