16/12/2007, 09:38
|
| | | Fecha de Ingreso: julio-2005 Ubicación: Salamanca
Mensajes: 54
Antigüedad: 18 años, 9 meses Puntos: 0 | |
| Re: comprobar registros en tabla!!!
en el evento keyaascii cuando presiones enter (13)
yo lo compruebo asi
rs1.Open "SELECT * FROM CLIENTE WHERE RUN = '" & MaskEdBox1 & "'", Conexion, adOpenDynamic, adLockOptimistic
' ahi seleciono toda la tabla y pregunto si lo que ingrese esta dentro de esta
If rs1.BOF And rs1.EOF Then
'la recorro y si esta me avisa que existe
Else
ass = MsgBox(" El Cliente Ya Esta Resistrado Desea Ver sus Datos ", vbYesNo + vbQuestion + vbDefaultButton1, "Ingreso de Clientes ")
' pregunto que quiero hacer
rs1.Close
' cierro el recorset
'MODIFICA EL CODIGO Y OJALA TE SIRVA Y TE RESULTE LO QUE QUIERES HACER |