TUTOS.EU

Copier un fichier

Copier un fichier en VbScript

Dim objFSO

CheminScriptActuel = Left(wscript.scriptfullname,Len(wscript.scriptfullname)-Len(wscript.scriptname)-1)
CheminFichierSource = InputBox("Entrez le chemin du fichier à copier","Fichier a copier",CheminScriptActuel & "\" & "MonfichierSource.txt")
CheminFichierCible = InputBox("Entrez le chemin du fichier destination","Fichier cible",CheminScriptActuel & "\" & "MonfichierCible.txt")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Call objFSO.CopyFile (CheminFichierSource, CheminFichierCible, True)
Set objFSO = Nothing
Lien vers le fichier : cliquez ici

Pages Web

Site WebDescription
MSDN CopyFile methodMéthode CopyFile décrite sur le MSDN

Article(s) précédent(s)