Rossana
11 de Julio del 2004

Sabrán si ADO trabaja con el método NoMatch

En el siguiente código aparace el error en las variables, el error es: "No se ha definido el tipo definido por el usuario."
Si quito las variable ya no me produce ese error, pero aparece otro en el método NoMatch diciendo "No se encontró el método o miembre de los datos"

Dim Clave1 As Index
Dim Clave2 As Index
Dim Clave3 As Index


Private Sub cmdguardar_Click()

TABLA3.Index = "Clave1" 'se establece como índice de la tabla vehículo el nº de placa
TABLA3.Seek "=", txtplaca 'Se establece como índice el contenido del txtplaca


If TABLA3.NoMatch = False Then 'si el índice se encuentra entonces
MsgBox "Ya hay un automóvil con la misma placa", vbInformation
Else
......

yayita1502
11 de Julio del 2004

Te paso un ejemplo:
Dim dbBase as Database
Dim rstVendedor as Recordset
Set dbBase = OpenDatabase(App.Path & "" & "Ventas.mdb")

rstVendedor.Index = "pkVendedor"
rstVendedor.Seek "=", 10

if rstVendedor.NoMatch then
MsgBox "Registro no encontrado"
else
rstVendedor.Edit
rstVendedor.Fields("NombreVendedor")= "Otro"
rstVendedor.Update
End If
dbBase.Close

Te recomiendo que utilices sentencias en SQL que son mucho más rápidas de ejecutar.
Espero haberte ayudado.
Suerte.
Yayita