Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

getdir()

02/03/2005 - 18:23 por link | Informe spam
Buenas tardes amigos es mi primer post aki.
bueno estoy tratando de pasar un cursor a excell pero seleccionando la
carpeta y el nombre en un botton tengo
cRuta = getdir() &&& para seleccionar la carpeta
luego en otro tengo
COPY TO &cRuta &&&& pero aki necesito agregarle algo como esto
&&ALLTRIM(thisform.text1.Value) type xls para k en el text1 se coloque el
nombre del archivo a usar.
gracias de antemano y saludos
 

Leer las respuestas

#1 Luis María Guayán
02/03/2005 - 19:15 | Informe spam
Mira el comando PUTFILE() que te será mas útil

Lo que tu quieres hacer, es mejor hacerlo con expresiones de nombre y no con
macrosustitución.

cRuta = GETDIR()
cArchivo = ALLTRIM(ThisForm.Text1.Value)
COPY TO (cRuta + cArchivo) TYPE XL5

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos



"link" escribió en el mensaje
news:
Buenas tardes amigos es mi primer post aki.
bueno estoy tratando de pasar un cursor a excell pero seleccionando la
carpeta y el nombre en un botton tengo
cRuta = getdir() &&& para seleccionar la carpeta
luego en otro tengo
COPY TO &cRuta &&&& pero aki necesito agregarle algo como esto
&&ALLTRIM(thisform.text1.Value) type xls para k en el text1 se coloque el
nombre del archivo a usar.
gracias de antemano y saludos


Preguntas similares