No duplicar claves
Publicado por Rafa Torres (1 intervención) el 28/04/2014 22:58:29
Tengo el Visual Basic 6.0 y no uso codigo para conectar a una base de datos, lo hago desde las propiedades.
Hago un ciclo que recorre todos los registros con un do while loop, asi:
al momento de comparar, siempre me sale que el numero que voy a capturar es el mismo, es decir siempre el primer registro va a ser igual, si pongo el setfocus a otro text o me arroja un error al ejecutar ado.Recordset.Move First
Como se le podrá hacer???
Hago un ciclo que recorre todos los registros con un do while loop, asi:
1
2
3
4
5
6
7
8
9
10
11
12
13
Do While Not ado.Recordset.EOF
If ado.Recordset.Fields("Numero") = val(Text7.Text) Then
mismo = 1
End If
Text1.SetFocus
ado.Recordset.MoveNext
Loop
If mismo = 1 Then
MsgBox "Ya existe"
Else
ado.Recordset.AddNew
ado.Recordset.update
End If
al momento de comparar, siempre me sale que el numero que voy a capturar es el mismo, es decir siempre el primer registro va a ser igual, si pongo el setfocus a otro text o me arroja un error al ejecutar ado.Recordset.Move First
Como se le podrá hacer???
Valora esta pregunta


0