PROBLEMA DE FAT32 Y NTFS ...
Publicado por JUANMA (503 intervenciones) el 01/02/2005 09:38:41
Hola .... tengo los siguientes codigos en una aplicación para exportar e importar archivos, pero tengo un problema:
Entre equipos con extructura de archivos FAT32 funciona bien, pero entre FAT32 y NTFS me da error.
¿Alguien sabe algo de esto?
Lo compilo con VFP6 ... ¿quizas con la versión 8 no me suceda?.
Gracias.
*********************************************************
EXPORTAR:
gExport=GETDIR('','Exportar a')
oShell = createobject("WScript.Shell")
oShell.Run("rar a -vd &eArch &eExp",0,.T.)
IMPORTAR:
gImport=GETFILE(gTipo, 'Nombre de archivo', 'Importar',0,'Importar')
oShell = createobject("WScript.Shell")
oShell.Run("rar e -vd -y &gImport &gImp",0,.T.)
***********************************************************
Entre equipos con extructura de archivos FAT32 funciona bien, pero entre FAT32 y NTFS me da error.
¿Alguien sabe algo de esto?
Lo compilo con VFP6 ... ¿quizas con la versión 8 no me suceda?.
Gracias.
*********************************************************
EXPORTAR:
gExport=GETDIR('','Exportar a')
oShell = createobject("WScript.Shell")
oShell.Run("rar a -vd &eArch &eExp",0,.T.)
IMPORTAR:
gImport=GETFILE(gTipo, 'Nombre de archivo', 'Importar',0,'Importar')
oShell = createobject("WScript.Shell")
oShell.Run("rar e -vd -y &gImport &gImp",0,.T.)
***********************************************************
Valora esta pregunta


0