Discussion :

[RyoHazuki]

Bonjour,

Dans mon entreprise nous recevons régulièrement des CD contenant des répertoires et des sous répertoires qui contiennent eux même des fichiers PDF.

J'ai donc utilisée cette source :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Public Class DirectoryService
 
	Public Shared Sub CopyDirectory(ByVal sourcePath As String, ByVal destinationPath As String)
		CopyDirectory(New DirectoryInfo(sourcePath), New DirectoryInfo(destinationPath))
	End Sub
 
	Private Shared Sub CopyDirectory(ByVal source As DirectoryInfo, ByVal destination As DirectoryInfo)
		destination.Create()
 
		For Each file As FileInfo In source.GetFiles()
			file.CopyTo(Path.Combine(destination.FullName, file.Name))
		Next
 
		For Each subDirectory As DirectoryInfo In source.GetDirectories()
			CopyDirectory(subDirectory, destination.CreateSubdirectory(subDirectory.Name))
		Next
	End Sub
 
End Class

venant de cette discussion pour copier mes données, le problème et qu'il et possible que des CD différent contiennent a leurs racine des dossier qui ont le même nom mais des contenus différent.

J'aimerai donc ajouter une condition a la copie qui fait que si le dossier existe déjà le dossier que je copie se renommera en dossier bis, bis 2, etc.....

Si quelqu'un a une solution je le remercie d'avance.

[Jean-Marie Grave]

Bonjour Monsieur.

Je vous propose la solution suivante. Choisir d'abord une "lettre d'ajout" par exemple la lettre "s". Avant d'ajouter un CD, vérifier que son chemin d'accès du dossier qui le contient n'est pas utilisé. Si c'est le cas, enregistrer le CD. Sinon, ajouter la lettre au bout du nom de ce chemin d'accès, et cela autant de fois qu'il le faudra pour obtenir un chemin non utilisé, puis enregistrer le CD.

Salutations distinguées.