Copier fichiers en chemin UNC

Version imprimable

21/11/2011, 16h42
bbor99

Copier fichiers en chemin UNC

Salut à tous,

Je souhaite copier des fichiers dont le chemin de la source est en chemin UNC (ex \\Monserveur\Monpartage\dossier\*.*)

J'utilise la fonction :

Code:

File.Copy(source, destination)

Mais j'ai un message d'erreur :

Citation:

Caractères non conformes dans le chemin d'accès.

Apparament, File.Copy ne connait pas les chemin UNC.

Existe-t-il une autre solution pour copier mes ficchiers.

Merci
21/11/2011, 17h00
tomlev

C'est pas les chemins UNC qui marchent pas, c'est les caractères génériques ('*' et '?'). Il faut mettre le nom d'un fichier, pas un filtre.
21/11/2011, 17h03
bbor99

Merci pour cette réponse.

Mais comment je fais alors pour copier tous les fichiers d'un dossier ?
21/11/2011, 17h14
Pol63

tu copies le dossier, ou alors tu fais un getfiles() sur le dossier pour connaitre les fichiers contenus

Code:

1
2
3
4
5
6
var files = Directory.GetFile(FolderStructure,Filter,SearchOption.AllDirectories);
                    foreach (var item in files)
                    {
 
                       File.Copy(item,destination);
                    }

Si quelqu'un peu traduire en VB.Net.

22/11/2011, 09h49
tomlev

Citation:

Envoyé par WOLO Laurent

Si quelqu'un peu traduire en VB.Net.

http://www.developerfusion.com/tools.../csharp-to-vb/

Merci beaucoup tomlev, ca donne ca.

Code:

1
2
3
4
5
6
 
Dim files = Directory.GetFiles(FolderStructure, Filter, SearchOption.AllDirectories)
For Each item As var In files
 
	File.Copy(item,destination)
Next

Citation:
Envoyé par WOLO Laurent
Merci beaucoup tomlev, ca donne ca.
Code:

1 2 3 4 5 6 Dim files = Directory.GetFiles(FolderStructure, Filter, SearchOption.AllDirectories) For Each item As var In files File.Copy(item,destination) Next
En fait ce convertisseur est pas mal, mais il est loin d'être infaillible :aie:
Il faut enlever As var, qui n'a pas de sens et ne compile pas
Code:

1 2 3 4 5 Dim files = Directory.GetFiles(FolderStructure, Filter, SearchOption.AllDirectories) For Each item In files File.Copy(item,destination) Next

22/11/2011, 10h11
WOLO Laurent

En effet, jai pas fait attention, mon cher ami.

Merci à tous pour tout.

J'ai juste modifié votre code par:

Code:

1
2
3
4
5
6
7
Sub CopyFile(ByVal sourcePath As String, ByVal destPath As String)
        Dim files = Directory.GetFiles(sourcePath)
        For Each item In files
            Dim fName As String = item.Substring(sourcePath.Length + 1)
            File.Copy(Path.Combine(sourcePath, fName), Path.Combine(destPath, fName), True)
        Next
    End Sub

Merci encore

22/11/2011, 10h51
tomlev

N'oublie pas le bouton :resolu: si c'est OK ;)