Discussion :

[Aspic]

Bonjour,

j'utilise la fonction rename pour renomer un dossier.

Code VB.Net :

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

1
2
3
4
5
 
Oldpath = "C:\Test_Prog_1\Test_1" 'le dossier que je veux renommer
Newpath = "C:\Test Prog 1\Test 1" 'le nom du nouveau dossier
 
Rename(oldpath, newpath)

Mais j'ai une erreur : ArgumentExeption : ARgument ou appel de procédure non valide !

Voila je comprends pas du tout car j'ai bien respecter les arguments de la foncrion rename.

Merci

[Mehdi Feki]

Salut,

Comment : renommer un répertoire dans Visual Basic
My.Computer.FileSystem.RenameDirectory
FileSystem.RenameDirectory

Regarde la liste des exceptions aussi

[Aspic]

Salut,

Tes exemples sont pour VB.NET 2005 mais c'est pas le plus grave.

En fait je crois que j'ai compris : si mon dossier que je veux renomer = "C:\Test_1\Test_2" et que je veux le renommer en "C:\Test_1\Test 2" la ca marche mais en "C:\Test 1\Test 2" ne marche pas plus car apparement la fonction ne renomme que le dernier sous dossier...

Le probleme c'est que j'utilise une base de données access et access n'aime pas trop les accents et tirets... Je dois donc trouver une fonction qui liste tous mon disque dur et qui renomme un par un les fichiers et dossiers sans accents, tirets et apostrophes. Sinon je suis coincé pour la usite de mon projet

Fonction pour modifier les fichiers :

Code VB.Net :

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

1
2
3
4
5
6
7
8
9
10
 Private Function ModifierNomFichier(ByVal Nom As String) As String
        'fonction qui a pour but de modifier les nom des fichiers pour enlever les caractères speciaux
        Dim NomFichierSansAccentAigu As String = Replace(Nom, "é", "e")
        Dim NomFichierSansAccentGrave As String = Replace(NomFichierSansAccentAigu, "è", "e")
        Dim NomFichierSansApostrophe As String = Replace(NomFichierSansAccentGrave, "'", " ")
        Dim NomFichierSansTiret As String = Replace(NomFichierSansApostrophe, "_", " ")
        Dim NomFichierSansA As String = Replace(NomFichierSansTiret, "à", "a")
 
        Return NomFichierSansA ' retourne le resultat
    End Function

AIdez moi s'il vous plait ! Merci d'avance

[Mehdi Feki]

Tes exemples sont pour VB.NET 2005 mais c'est pas le plus grave.

Fallait le mentionner dans le titre, et n'oublie pas la prochaine fois la coloration syntaxique dans la balise code.

Le probleme c'est que j'utilise une base de données access et access n'aime pas trop les accents et tirets

Tu trouveras plus de réponses dans le sous-forum ADO.Net