Enviar datos a caja de texto de tabla
Publicado por Edison (1 intervención) el 19/03/2009 19:30:49
Hola a todos, tengo una tabla que se llama "datos" de la siguiente forma:
_________________________
caja valor
_________________________
2 34
3 45
6 56
8 78
_________________________
de las cuales en mi formulario tengo 10 cajas de texto: txt1,txt2,txt3......txt10, y cuando llamo una consulta de la tabla "datos" necesito que en la caja de texto que corresponda se reemplace el dato, por ejemplo:
del primer registro deberia reemplazar el dato 34 en la caja de texto txt2
en el segundo registro deberia reemplazar el dato 45 en la caja de texto txt3
en el tercer registro deberia reemplazar el dato 56 en la caja de texto txt6.
y asi sucesivamente de acuerdo al dato del columna caja deberia corresponder al txt y su correspondiente valor debria de ser insertado.
He intentado con el siguientes codigo, pero no resulta:
select datos
go top
if reccount()>0
do while !eof()
var1="thisform.txt"+alltrim(str(datos.caja))".value"
var1=datos.valor
select datos
skip
enddo
endif
Necesito por favor si me pueden ayudar en esto, les agradezco anticipadamente.
_________________________
caja valor
_________________________
2 34
3 45
6 56
8 78
_________________________
de las cuales en mi formulario tengo 10 cajas de texto: txt1,txt2,txt3......txt10, y cuando llamo una consulta de la tabla "datos" necesito que en la caja de texto que corresponda se reemplace el dato, por ejemplo:
del primer registro deberia reemplazar el dato 34 en la caja de texto txt2
en el segundo registro deberia reemplazar el dato 45 en la caja de texto txt3
en el tercer registro deberia reemplazar el dato 56 en la caja de texto txt6.
y asi sucesivamente de acuerdo al dato del columna caja deberia corresponder al txt y su correspondiente valor debria de ser insertado.
He intentado con el siguientes codigo, pero no resulta:
select datos
go top
if reccount()>0
do while !eof()
var1="thisform.txt"+alltrim(str(datos.caja))".value"
var1=datos.valor
select datos
skip
enddo
endif
Necesito por favor si me pueden ayudar en esto, les agradezco anticipadamente.
Valora esta pregunta


0