Visual Basic - DAO

Life is soft - evento anual de software empresarial
 
Vista:

DAO

Publicado por Albert (5 intervenciones) el 18/08/2005 22:52:00
hola todos
mi problema es con DAO
kisiera saber como encontrar un dato en una fila de una columna de una db
si bien podria hacerlo asi
BUSKEDA = "SELECT CODIGO FROM ARTICULOS WHERE CODIGO = " TEXT1
RS = DB.OPENRECORDSET(BUSKEDA) ' EL OBJ RS NO TOMA SI EL RESULTADO ES = A STRING
Lo q quiero es encontrar un codigo si existe y despues leer todos los campos.
espero q m ayuden porq necesito mucho
cualquier ayuda les aradesco mucho
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:DAO

Publicado por rodrigo (140 intervenciones) el 19/08/2005 01:40:24
si es en DAO sería asi:

dim mibase as database
dim tabla as recordset
dim codigo as string
set mibase=workspaces(0).opendatabase("c:\mibase.mdb")' por ejemplo
set tabla= mibase.openrecordset("select * from productos",dbopendynaset)

codigo=text1.text
tabla.findfirst ("codigo =" & codigo)
if tabla.nomatch=false then
text2.text=tabla!descripcion
text3.text=tabla!precio
else
msgbox "el codigo no existe"

end if

que te sirva. chau


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