Recordset
Publicado por Jonathan (85 intervenciones) el 23/05/2007 08:20:18
hola tengo un problema necesito sacar todos los registros de una tabla a un formulario, este es mi codigo
Set rs = db.OpenRecordset("SELECT distinct [NOMBRE CLIENTE],CODIGOFrom Pedidos")
While Not rs.EOF
Me.NOMBRE_CLIENTE = rs.Fields("NOMBRE CLIENTE")
Me.CODIGO = rs.Fields("CODIGO")
Me.F = varF
Me.INT = varINT
Me.PV = varPV
Me.T = varT
Me.TEL = varTEL
Me.W = varW
Me.W_I = varW_I
Me.WEB = varWEB
Me.WI = varWI
rs.movenext
wend
todos los me. son textbox.
esto solo me escribe el ultimo registro en los textbox como hago para que me escriba todos los que estan en la tabla pedidos agradeceria vuestra ayuda gracias
Set rs = db.OpenRecordset("SELECT distinct [NOMBRE CLIENTE],CODIGOFrom Pedidos")
While Not rs.EOF
Me.NOMBRE_CLIENTE = rs.Fields("NOMBRE CLIENTE")
Me.CODIGO = rs.Fields("CODIGO")
Me.F = varF
Me.INT = varINT
Me.PV = varPV
Me.T = varT
Me.TEL = varTEL
Me.W = varW
Me.W_I = varW_I
Me.WEB = varWEB
Me.WI = varWI
rs.movenext
wend
todos los me. son textbox.
esto solo me escribe el ultimo registro en los textbox como hago para que me escriba todos los que estan en la tabla pedidos agradeceria vuestra ayuda gracias
Valora esta pregunta


0