Anónimo
Buscar si existen tablas
Hola experto tengo tablas libres y requiero hacer una consulta con ellas pero antes necesito saber si la tabla existe o no, estoy intentando de esta manera pero no resulta
las variables winif, wfin son de las fechas dos cuadros de textos.
La información me entrega correctamente el problema es que cuando busco en años que no existe tablas, abre la opción de buscar tablas de vfp y no quiero que eso suceda puedes ayudarme gracias
IF file("tabla1")=.f.
WAIT window ' La tabla1 no existe de acuerdo al año de busqueda '+thisform.combo2.value +''
ELSE
SELEC fecha,count(fecha)as total from "C:\Informes\histo\consultas\" + thisform.combo2.DisplayValue + "\tabla1" ;
where between(fecha,ctod(padl(day(winif),2,'0')+"/"+padl(month(winif),2,'0')+"/"+thisform.combo2.DisplayValue),;
ctod(padl(day(wfin),2,'0')+"/"+padl(month(wfin),2,'0')+"/"+thisform.combo2.DisplayValue)) into cursor xx
Endif
las variables winif, wfin son de las fechas dos cuadros de textos.
La información me entrega correctamente el problema es que cuando busco en años que no existe tablas, abre la opción de buscar tablas de vfp y no quiero que eso suceda puedes ayudarme gracias
IF file("tabla1")=.f.
WAIT window ' La tabla1 no existe de acuerdo al año de busqueda '+thisform.combo2.value +''
ELSE
SELEC fecha,count(fecha)as total from "C:\Informes\histo\consultas\" + thisform.combo2.DisplayValue + "\tabla1" ;
where between(fecha,ctod(padl(day(winif),2,'0')+"/"+padl(month(winif),2,'0')+"/"+thisform.combo2.DisplayValue),;
ctod(padl(day(wfin),2,'0')+"/"+padl(month(wfin),2,'0')+"/"+thisform.combo2.DisplayValue)) into cursor xx
Endif
1 Respuesta
Respuesta de davsoft
1
de la forma en que haces podrias cambiar la expresion
from "C:\Informes\histo\consultas\" + thisform.combo2.DisplayValue + "\tabla1"
por from "C:\Informes\histo\consultas\" &thisform.combo2.DisplayValue + "\tabla1"
Por que el hecho de que fox te abre la ventana de OPEN es por que no encuentra la tabla, por eso te recomiendo que uses & en vez de la concatenacion con +, podes leer un poco sobre el uso de & en comandos. Yo haria algo asi
xTabla1=thisform.combo1.displayvalue
xComando = "select * from "+xTabla1
&xComando
Pero no entiendo que contiene combo1, el path o el archivo, y que es tabla1.
from "C:\Informes\histo\consultas\" + thisform.combo2.DisplayValue + "\tabla1"
por from "C:\Informes\histo\consultas\" &thisform.combo2.DisplayValue + "\tabla1"
Por que el hecho de que fox te abre la ventana de OPEN es por que no encuentra la tabla, por eso te recomiendo que uses & en vez de la concatenacion con +, podes leer un poco sobre el uso de & en comandos. Yo haria algo asi
xTabla1=thisform.combo1.displayvalue
xComando = "select * from "+xTabla1
&xComando
Pero no entiendo que contiene combo1, el path o el archivo, y que es tabla1.