Access - Datos por codigo

 
Vista:

Datos por codigo

Publicado por yanira (140 intervenciones) el 31/10/2006 15:18:48
Tengo dos tablas en mi base de datos y necesito recorrerlas comparando los datos entre ellas, es decir, tengo en la primera tabla la cedula del cliente y lo mismo en la segunda, para poder insertar un cliente nuevo necesito que una de las tablas compare las cedulas con la otra porque si la ceulda ya esta no deje insertar el campo.
Como hago para recorrer la tabla y para acceder al campo y poder compararlo con el de la otra tabla.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Datos por codigo

Publicado por Salo (152 intervenciones) el 31/10/2006 16:03:30
Para comprobar si existe la cedula puedes hacer

Cedula="Cedula a buscar"
if not isnull(dfirst("Cedula Cliente","Nombre Tabla","Cedula Cliente="& Cedula))then ......

Para recorrer la tabla mediante codigo es un poco mas complejo. Prueba

dim RsTbl1 as recordset,RsTbl2 as recordset
set RsTbl1=currentdb.openrecordset("Nombre Tabla1",dbopensnapshot)
set RsTbl2=currentdb.openrecordset("Nombre Tabla2",dbopendynaset)

RsTbl1.movefirst
do until RsTbl1.eof
RsTbl2.findfirst "Campo Cedula=" & RsTbl1![Campo Cedula]
if not RsTbl2.nomatch then
Lo que quieras hacer si encuentra el campo
endif
RsTbl1.movenext
loop
RsTbl1.close
RsTbl2.close

Recuerda que si los campos son de texto deberas poner en su lugar

RsTbl2.findfirst "Campo Cedula='" & RsTbl1![Campo Cedula] &"'"
Añadir el caracter ' despues del '=' y en medio de las comillas al final

Espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Datos por codigo

Publicado por yanira (140 intervenciones) el 31/10/2006 16:24:58
Voy a probarlo muchas gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar