Copier un fichier vers c:\...documents & Settings

Question

Bonjour à tous,

Débutante en VB6 je bute pour copier un fichier (en l'occurence ici un template) vers

c:\Documents and settings\ user \Application Data\Microsoft\Templates\

Il faut que le nom de l'utilisateur s'applique à n'importe qui.

Je passe par copyfile et cela marche très bien sur n'importe quel autre chemin mais je n'arrive pas à récupérer la bonne syntaxe pour ce cas particulier.

Merci de votre aide.

Flygirl

cs_moustachu · Answer

Essaye de voi là :
http://www.vbfrance.com/article.aspx?ID=4504

Les dernières lignes doivent pouvoir t'aider.

flygirl · Answer

Merci.

Flygirl

flygirl · Answer

Merci merci beaucoup Moustachu, tu m'as beaucoup aidé et j'ai trouvé. Alors pour ceux que cela intéresse (je ne sais pas si c'est la méthode la plus simple mais elle fonctionne) :

Objectif : récupérer le nom de l'utilisateur de la machine et copier un fichier vers le répertoire c:\Documents & Settings \[nom utilisateur\application data\...\templates

Autre impératif que cela fonctionne sur n'importe quel poste.

sub cmdcopie_click()

variable pour récupérer le nom utilisateur  dans la base de registre
Dim MonIdentite as string 

Set WshShell = CreateObject("WScript.Shell")                 
Set monfichier = CreateObject("Scripting.FileSystemObject")

MonIdentite = WshShell.regread("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\logon User Name")

monfichier.CopyFile "R:\INFO\TEST\Modeles\Classeur.XLT ", "c:\Documents and settings" & MonIdentite & "\Application Data\Microsoft\Templates"

Unload Me
MsgBox "La copie des fichiers est réussite", vbOKOnly

End Sub

cs_hhafid · Answer

Merci je cherchais une m&#233;thode pour pouvoir utiliser filecopy

et d'apr&#232;s votre exemple. je me suis bien tir&#233;

lerci encore aux pro de VBFRANCE

Copier un fichier vers c:\...documents & Settings

4 réponses

Discussions similaires