Cita:
Iniciado por orharo2003 
Sr. Le pido de la manera más atenta que cheque en las Faqs antes de preguntar.
2 páginas atras respodí lo mismo:
Function ReportFileStatus(filespec)
Dim fso, msg
Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(filespec)) Then
msg = filespec & " exists."
Else
msg = filespec & " doesn't exist."
End If
ReportFileStatus = msg
End Function
Hola!!! tengo un problema similar y espero que puedan ayudarme!!!
Estoy intentando copiar un archivo de un lugar a otro con el FSO y me arroja un error despuès de copiar el archivo ???
lo extraño es que sì està copiando el archivo donde yò quiero pero luego me arroja un error y no co`ntinnua copn la aplicaciòn!!!
estoy usando algo asì!!!
set confile = createObject("scripting.filesystemobject")
if confile.FileExists(archivo_ori) then
set fich = confile.CopyFile(archivo_ori, archivo_des, true)
end if
... otras instrucciones
copia el archivo pero me arroja error y no se ejecuta ninguna instruccion luego de que copia el archivoª!!!
alguien tiene alguna sugerencia???