Error con acceso a los registros de una tabla

Gabriel
17 de Enero del 2006
Que tal amigos la verdad recurro a ustedes para pedirles su valiosa ayuda, desde hace dias e tenido un problema, estoy haciendo un programa y lo primero que me muestra es una clave de acceso pues bien le hice las lineas de codigo las cuales son estas:

Text1 = Format(Text1, ">")

login = Text1

Password = Text2

Text2.DataField = "password"

Text1.DataField = "login"

Text1.Text = Data1.Recordset.Fields("login").Value

Text2.Text = Data1.Recordset.Fields("password").Value

a = Data1.Recordset.BOF

b = Text2

If (a = False) And (b = Password) Then

Load bienvenido

bienvenido.Show

Unload Form5

Else

Text2.DataField = ""

Text1 = ""

Text2 = ""

Text3 = ""

MsgBox "Clave Erronea, intente luego", vbExclamation + vbOKOnly, "Información"

Text4 = Text4 + 1

If Text4 > 2 Then

End

End If

End If

End If

Me.Text1.SetFocus



el problema esta es q solamente me toma un solo registro de tres que tengo en la base de datos y sinceramente no veo por q no me toma los tres , si saben por que este asunto les agradesco sus comentarios...

mvallejos
17 de Enero del 2006
Por lo que se ve en el código, no te mueves por el recordset del data, solo te quedas parado en el registro actual.

Saludos