
19/05/2005, 14:35
|
 | | | Fecha de Ingreso: agosto-2002 Ubicación: Hangar 18
Mensajes: 1.703
Antigüedad: 22 años, 9 meses Puntos: 16 | |
que para si haces esto?
Function CopyFile(archivo)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Set f2 = fso.GetFile(archivo)
response.write "destfolder = " & destfolder
response.end
f2.Copy (destfolder) >>>AQUÎ MARK EL ERROR
'f2.Copy ("C:\tmp\")
End Function
it's called debugin by the way. |