<%Dim Fs,FFile
'DNS du poste du client
const FilePath = "\\W982100\rep\"
Set Fs=CreateObject("Scripting.FileSystemObject")
Set FFile = Fso.GetFile (Filepath & "\cop.pdf")
'ERREUR Fichier introuvable sur cette ligne
FFile.Copy (Server.MapPath ("/rep1/"))%>