Como hago para No duplicar los registro
Publicado por kleiver (1 intervención) el 11/06/2016 18:33:00
Buenas
Me gustaria que me ayudaran con problema tengo un registro de usuarios, quiero que cuando este registrando me diga si ya el usuario existe,
este es el codigo que tengo ahorita
Me gustaria que me ayudaran con problema tengo un registro de usuarios, quiero que cuando este registrando me diga si ya el usuario existe,
este es el codigo que tengo ahorita
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
With rsusuarios
'Buscar Usuario en BD para ver si esta registrado
.Find "usuario='" & Trim(usua) & "'"
If .EOF Or .BOF Then
MsgBox " El Usuario " & usua & " Ya se encuentra Registro", vbInformation, "Aviso"
Text1.Text = ""
Text2.Text = ""
Else
'Guarda Informacion en la BD
.Requery .AddNew!usuario = Text1.Text
!clave = Text2.Text
!nombre = Text3.Text
!apellido = Text4.Text
!direccion = Text5.Text
!telefono = Text6.Text
!fecha = DTPicker1.Value
.Update .Requerylimpiar
End If
End With
End Sub
Valora esta pregunta
0
