Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Scripting Microsoft fichier sur le bureau AllUser

fichier sur le bureau AllUser

5 réponses
Avatar
pûsej
Bonsoir,

Debutant en Vbscript, je voudrais savoir comment creer un script pour copier
un fichier sur le bureau de All User.

Merci de vos réponse.
Signaler un problème avec ce contenu

5 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Do Re Mi chel La Si Do
Bonsoir !

Il suffit de copier le(s) fichier(s) dans :
C:"Documents and Settings""All Users"Bureau


@-salutations
--
Michel Claveau
Avatar
pûsej

Bonsoir !

Il suffit de copier le(s) fichier(s) dans :
C:"Documents and Settings""All Users"Bureau


@-salutations
--
Michel Claveau

Merci pour la reponse,


Mais ce que je veux, c'est le copier en executant un fichier vbscript




Avatar
Do Re Mi chel La Si Do
Bonsoir !


Il n'y a qu'à mettre le code précédent dans un fichier TOTO.BAT
Puis, on lance le script VBS suivant :

WScript.CreateObject("WScript.Shell").Run "%COMSPEC% /C toto.bat",0



@-salutations

Michel Claveau
Avatar
Jacques Barathon [MS]
Si ça t'embête de créer un fichier .BAT intermédiaire, tu peux simplement
faire la copie depuis vbs directement. Voir le script suivant à titre
d'exemple:

http://www.microsoft.com/technet/scriptcenter/scripts/storage/files/stfivb01.mspx

Comme tu débutes en vbscript, je te conseille de creuser les exemples du
Script Center.

Jacques

"Do Re Mi chel La Si Do" wrote in message
news:uFAY5B$
Bonsoir !


Il n'y a qu'à mettre le code précédent dans un fichier TOTO.BAT
Puis, on lance le script VBS suivant :

WScript.CreateObject("WScript.Shell").Run "%COMSPEC% /C toto.bat",0



@-salutations

Michel Claveau





Avatar
Jean-Claude BELLAMY
Dans le message :,
pûsej a pris la peine d'écrire ce qui suit
:

Bonsoir !

Il suffit de copier le(s) fichier(s) dans :
C:"Documents and Settings""All Users"Bureau
[...]

Mais ce que je veux, c'est le copier en executant un fichier vbscript



Set Shell=Wscript.CreateObject("WScript.Shell")
Set fso=WScript.CreateObject("Scripting.FileSystemObject")
Set fldrs=Shell.SpecialFolders
dest=fldrs("AllUsersDeskTop")
srce=".........................."
fso.CopyFile srce, dest, true


--
May the Force be with You!
La Connaissance s'accroît quand on la partage
----------------------------------------------------------
Jean-Claude BELLAMY [MVP] -
http://www.bellamyjc.org ou http://jc.bellamy.free.fr