Suppression de caractères
bimbo777
Messages postés
63
Date d'inscription
mercredi 25 janvier 2006
Statut
Membre
Dernière intervention
17 janvier 2007
-
31 août 2006 à 09:50
Sicyons Messages postés 25 Date d'inscription jeudi 21 octobre 2004 Statut Membre Dernière intervention 31 août 2006 - 31 août 2006 à 11:08
Sicyons Messages postés 25 Date d'inscription jeudi 21 octobre 2004 Statut Membre Dernière intervention 31 août 2006 - 31 août 2006 à 11:08
2 réponses
cs_makito
Messages postés
47
Date d'inscription
mardi 31 octobre 2000
Statut
Membre
Dernière intervention
21 février 2008
31 août 2006 à 10:43
31 août 2006 à 10:43
Salut, ce que tu peux faire, c'est une fonction qui recoit en paramètre le nom de ton fichier, et qui retourne le nouveau nom sans les caractères spéciaux.
Dans cette fonction, tu parcours le nom de ton fichier caractère par caractère et si celui-ci est différent d'un caractère spécial tu l'ajoutes à la trame de retour de ta fonction
Dans cette fonction, tu parcours le nom de ton fichier caractère par caractère et si celui-ci est différent d'un caractère spécial tu l'ajoutes à la trame de retour de ta fonction
Sicyons
Messages postés
25
Date d'inscription
jeudi 21 octobre 2004
Statut
Membre
Dernière intervention
31 août 2006
31 août 2006 à 11:08
31 août 2006 à 11:08
Salut !
Bizarre, tes fichiers. Qui a eut la bonne idée de les nommer ainsi ? :)
Bon, essaie ceci (si tu es en VB .NET 2005) :
Dim strDossier, strCheminFichier, strNomActuel, strNouveauNom As String
strDossier = "CHEMIN DE TON DOSSIER"
For Each strCheminFichier In My.Computer.FileSystem.GetFiles(strDossier)
strNomActuel = My.Computer.FileSystem.GetName(strCheminFichier)
strNouveauNom = strNomActuel.Replace(Chr(13), "")
My.Computer.FileSystem.RenameFile(strNomActuel, strNouveauNom)
Next
J'ai fais ça à la va-vite, j'espère que ça marche. Ca ne marchera de toutes façons QUE sur la version 2005 de .NET ("My" n'existait pas avant).
Précise moi si tu n'es pas sos 2005.
Tâtot bien !
Bizarre, tes fichiers. Qui a eut la bonne idée de les nommer ainsi ? :)
Bon, essaie ceci (si tu es en VB .NET 2005) :
Dim strDossier, strCheminFichier, strNomActuel, strNouveauNom As String
strDossier = "CHEMIN DE TON DOSSIER"
For Each strCheminFichier In My.Computer.FileSystem.GetFiles(strDossier)
strNomActuel = My.Computer.FileSystem.GetName(strCheminFichier)
strNouveauNom = strNomActuel.Replace(Chr(13), "")
My.Computer.FileSystem.RenameFile(strNomActuel, strNouveauNom)
Next
J'ai fais ça à la va-vite, j'espère que ça marche. Ca ne marchera de toutes façons QUE sur la version 2005 de .NET ("My" n'existait pas avant).
Précise moi si tu n'es pas sos 2005.
Tâtot bien !
