Discussion :

[qmike]

bonjour
je souhaite copier certains fichiers contenus dans un dossier

en exécutant le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
For Each Fichier in FSO.GetFolder(dossier_source).Files
 
	If InStr(Fichier.Name,"3420") = 6 Then
	   '   Wscript.Echo ">>>> " & Fichier.Name
		  F = Fichier.Name
		  Wscript.Echo F
		 FSO.FileCopy "c:\test\F" ,"c:\3420\F", true 
	End If
 
Next

un message d'éxécution "ne gere pas la méthode " ne permet pas la copie des fichiers concernés
j'ai effectue des recherches sur le net , concernant le FileCopy
je n'ai rien trouver que la façon de copier des fichiers stockés dans une variable

j'ai aussi tenté ceci mais idem message d' erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

FSO.FileCopy "c:\test\" &F  ,"c:\34200\" &F , true

merci pour vos réponses

[SfJ5Rpw8]

Utilise copy : la deuxiéme méthode ici :

Comment copier un fichier ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Fichier.Copy "c:\test\F\NouveauNom.txt"

[qmike]

bonjour
merci pour ta réponse
j'ai essayé ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
For Each Fichier in FSO.GetFolder(dossier_source).Files
 
	If InStr(Fichier.Name,"3420") = 6 Then
	   '   Wscript.Echo ">>>> " & Fichier.Name
 
		  Ch = Fichier.Path 'Permet d'obtenir le chemin et le nom du fichier 
		  Wscript.Echo F
		 Wscript.Echo Ch
		 Fichier.Copy   "Ch c:\3420\NouveauNom.txt "
	End If
 next

mais il me met le message Nom ou numéro incorrect
merci pour vos réponses

[SfJ5Rpw8]

C'est quoi ce ch ... tu as vu l'équivalent dans mon code ? supprime le ..

[qmike]

bonjour
merci pour ta réponse
Effectivement j'ai bien la copie d'un fichier

avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
For Each Fichier in FSO.GetFolder(dossier_source).Files
 
	If InStr(Fichier.Name,"3420") = 6 Then
 
		  F = Fichier.Name  ' Stocke le nom du fichier 
 
		  Wscript.Echo F
 
 
		 Fichier.Copy "c:\3420\F", False 
	End If
 next

Malheureusement le fichier copié dans le répertoire c:\3420 se nomme F

et je pensais que F me prendrait le nom du fichier source
comme ce nom est stocké dans la variable F
merci pour vos réponses

[SfJ5Rpw8]

Pour utiliser la valeur contenue dans une variable, il ne faut pas la placer entre guillemets car dans ce cas tu utilise son nom ...


sort ton F des guillemets...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Fichier.Copy "c:\3420\" & Fichier.name, False

[qmike]

bonjour
Unn énorme merci pour ce coup de main
cela fonctionne
J'avance grace à toi
Un trés bon Week End