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 Copier le code

Pages Web

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

Article(s) suivant(s)

Effacer un fichier ou un répertoire

Copier un répertoire en VbScript

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

Ecrire dans un fichier

2