01/12/2004, 11:01
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: Chapinlandia :-D
Mensajes: 725
Antigüedad: 21 años, 5 meses Puntos: 11 | |
| intenta
WITH thisform
ctabla = allt(.grid1.recordsource)
cCampo = "aca va el nombre del campo"
&& seria algo como
* cCampo = .text2.text
&&puedes sacar el listado de campos con aFields y agregarlos a un combo
cValor = .Text3.value
cCad = "SElect * from " + alltrim(cTabla) + " Where alltrim(trans(" + cCAmpo+"))=["+alltrim(trans(cValor))+"] into cursor cBusqueda"
&cCAd
.grid1.recordsource = "cBusqueda"
.grid1.setfocus
endwith |