Sistema, codigo solo reconoce primer registro

Cerrado
manuelitoburgos - 1 dic 2011 a las 06:05
dark_zen
Message postés
152
Date d'inscription
lunes, 6 de septiembre de 2010
Estatus
Miembro
Última intervención
martes, 3 de enero de 2012
- 1 dic 2011 a las 08:23
Hola, PORFAVOR AYUDENME , ESTA LINEA DE CODIGO SOLO RECONOCE AL PRIMER REGISTRO DE MI TABLA ZONAS, LO QUE QUIERO HACER ES QUE RECORRA TODA LA TABLA EN ACCESS PARA ASI RECONOCER TODOS LOS REGISTROS QUE CONTIENE EL CAMPO ZONA... QUE ES EN LO QUE ESTOY FALLANDO... POR FAVOR AYUDENME...

Private Sub Command1_Click()

adozona.Recordset.MoveFirst
If adozona.Recordset.EOF = True Then

Adousuario.Recordset.Find "zona=" & Trim(txtzona.Text) & "'"

ElseIf txtzona.Text = adozona.Recordset("zona") Then

MsgBox "ya esta Registrado"
txtzona.Text = ""
cmdguardar.Enabled = False

Else

MsgBox "no esta registrado"

End If

End Sub

1 respuesta

dark_zen
Message postés
152
Date d'inscription
lunes, 6 de septiembre de 2010
Estatus
Miembro
Última intervención
martes, 3 de enero de 2012
106
1 dic 2011 a las 08:23
Adousuario.Recordset.Find "zona='" & Trim(txtzona.Text) & "'"
me parece que le falta un apostrofe
0