Name List1.List(i) As nouveau List1.RemoveItem (i): i = i - 1
End If
i = i + 1 Loop
Exit Sub recup: MsgBox Err.Description end sub
Il existe d'autres produits, comme le purebasic: http://purebasic.com/
et d'autres encore, faut juste se lancer, y'a rien à regretter après :)
Pierre Maurette
Gérard Rigaud, le 06/01/2010 a écrit :
bonjour,
J'aimerais pouvoir renommer les fichiers "ABC-xxxxx.jpg" en "xxxxx-ABC.jpg".
Il y a certainement une solution simple, mais avec les quelques renommeurs que je connais je n'ai pas trouvé.
Je ne suis pas sûr que ce soit très simple. Avec vos renommeurs peut-être y a-t-il une solution en deux passes: "ABC-xxxxx.jpg" -> "xxxxx-ABC-xxxxx.jpg" -> "xxxxx-ABC.jpg" ou "ABC-xxxxx.jpg" -> "ABC-xxxxx-ABC.jpg" -> "xxxxx-ABC.jpg"
Le renommeur que j'utilise de temps en temps le fait très bien en une passe et de deux façons. Il s'agit de <URL:http://www.bulkrenameutility.co.uk/Main_Intro.php>, download ici <URL:http://www.bulkrenameutility.co.uk/Download.php>
J'ai bien noté dans un autre fil que les données sont "tous les noms de fichiers ont la même structure : 3 lettres - nombre à 5 chiffres".
Vous choisissez un répertoire, et vous allez tout de suite dans /Selections (12)/ pour créer un filtre. Si vous cochez /Subfolders/ la liste sera récursive. Vous pouvez filtrer avec /*.jpg/, ou affiner avec par exemple /???-*.jpg/ ou /???-?????.jpg/. Ensuite, sous peine de chercher un moment, il faut savoir que le renommage ne s'appliquera que pour les fichiers sélectionnés dans la colonne /Name/. Il sera visible dans la colonne /New Name/, et ne sera réellement appliqué qu'en cliquant sur le bouton /Rename/ en bas à droite.
Première solution par les RegEx. La seule case à renseigner est /RegEx (1)/. Vous pouvez mettre dans /Match/: ^([A-Za-z ]{3})-([0-9]{5}) et dans /Replace/: 2-1 C'est simple à ajuster, la doc de l'aide, d'une page sur les RegEx Perl, suffit. Ici nous avons 3 lettres insensibles à la casse, le tiret, et 5 chiffres. En fait, en rajoutant un $: ^([A-Za-z ]{3})-([0-9]{5})$ nous serions encore bien plus stricts, mais c'est très redondant avec le filtre des fichiers.
Seconde solution, en bricolant. On efface, resette ou dévalide le /RegEx (1)/ si nécessaire. On va dans /Remove (5)/ et on tape - dans la case /Chars/. Ensuite on va dans /Move Copy (6)/ et on remplit ainsi: /Move fisrt/, /3/, /To end/, /on s'en fiche/, et enfin - dans /Sep/. Ça doit fonctionner.
Sinon, j'ai programme en Python qui me fait du rename, il suffit que je lui colle la bonne fonction, je vous le posterai.
-- Pierre Maurette
Gérard Rigaud, le 06/01/2010 a écrit :
bonjour,
J'aimerais pouvoir renommer les fichiers "ABC-xxxxx.jpg" en "xxxxx-ABC.jpg".
Il y a certainement une solution simple, mais avec les quelques renommeurs
que je connais je n'ai pas trouvé.
Je ne suis pas sûr que ce soit très simple. Avec vos renommeurs
peut-être y a-t-il une solution en deux passes:
"ABC-xxxxx.jpg" -> "xxxxx-ABC-xxxxx.jpg" -> "xxxxx-ABC.jpg"
ou
"ABC-xxxxx.jpg" -> "ABC-xxxxx-ABC.jpg" -> "xxxxx-ABC.jpg"
Le renommeur que j'utilise de temps en temps le fait très bien en une
passe et de deux façons.
Il s'agit de <URL:http://www.bulkrenameutility.co.uk/Main_Intro.php>,
download ici <URL:http://www.bulkrenameutility.co.uk/Download.php>
J'ai bien noté dans un autre fil que les données sont "tous les noms de
fichiers ont la même structure : 3 lettres - nombre à 5 chiffres".
Vous choisissez un répertoire, et vous allez tout de suite dans
/Selections (12)/ pour créer un filtre. Si vous cochez /Subfolders/ la
liste sera récursive. Vous pouvez filtrer avec /*.jpg/, ou affiner avec
par exemple /???-*.jpg/ ou /???-?????.jpg/. Ensuite, sous peine de
chercher un moment, il faut savoir que le renommage ne s'appliquera que
pour les fichiers sélectionnés dans la colonne /Name/. Il sera visible
dans la colonne /New Name/, et ne sera réellement appliqué qu'en
cliquant sur le bouton /Rename/ en bas à droite.
Première solution par les RegEx. La seule case à renseigner est /RegEx
(1)/. Vous pouvez mettre dans /Match/: ^([A-Za-z ]{3})-([0-9]{5})
et dans /Replace/: 2-1
C'est simple à ajuster, la doc de l'aide, d'une page sur les RegEx
Perl, suffit. Ici nous avons 3 lettres insensibles à la casse, le
tiret, et 5 chiffres. En fait, en rajoutant un $: ^([A-Za-z
]{3})-([0-9]{5})$ nous serions encore bien plus stricts, mais c'est
très redondant avec le filtre des fichiers.
Seconde solution, en bricolant. On efface, resette ou dévalide le
/RegEx (1)/ si nécessaire. On va dans /Remove (5)/ et on tape - dans la
case /Chars/. Ensuite on va dans /Move Copy (6)/ et on remplit ainsi:
/Move fisrt/, /3/, /To end/, /on s'en fiche/, et enfin - dans /Sep/. Ça
doit fonctionner.
Sinon, j'ai programme en Python qui me fait du rename, il suffit que je
lui colle la bonne fonction, je vous le posterai.
J'aimerais pouvoir renommer les fichiers "ABC-xxxxx.jpg" en "xxxxx-ABC.jpg".
Il y a certainement une solution simple, mais avec les quelques renommeurs que je connais je n'ai pas trouvé.
Je ne suis pas sûr que ce soit très simple. Avec vos renommeurs peut-être y a-t-il une solution en deux passes: "ABC-xxxxx.jpg" -> "xxxxx-ABC-xxxxx.jpg" -> "xxxxx-ABC.jpg" ou "ABC-xxxxx.jpg" -> "ABC-xxxxx-ABC.jpg" -> "xxxxx-ABC.jpg"
Le renommeur que j'utilise de temps en temps le fait très bien en une passe et de deux façons. Il s'agit de <URL:http://www.bulkrenameutility.co.uk/Main_Intro.php>, download ici <URL:http://www.bulkrenameutility.co.uk/Download.php>
J'ai bien noté dans un autre fil que les données sont "tous les noms de fichiers ont la même structure : 3 lettres - nombre à 5 chiffres".
Vous choisissez un répertoire, et vous allez tout de suite dans /Selections (12)/ pour créer un filtre. Si vous cochez /Subfolders/ la liste sera récursive. Vous pouvez filtrer avec /*.jpg/, ou affiner avec par exemple /???-*.jpg/ ou /???-?????.jpg/. Ensuite, sous peine de chercher un moment, il faut savoir que le renommage ne s'appliquera que pour les fichiers sélectionnés dans la colonne /Name/. Il sera visible dans la colonne /New Name/, et ne sera réellement appliqué qu'en cliquant sur le bouton /Rename/ en bas à droite.
Première solution par les RegEx. La seule case à renseigner est /RegEx (1)/. Vous pouvez mettre dans /Match/: ^([A-Za-z ]{3})-([0-9]{5}) et dans /Replace/: 2-1 C'est simple à ajuster, la doc de l'aide, d'une page sur les RegEx Perl, suffit. Ici nous avons 3 lettres insensibles à la casse, le tiret, et 5 chiffres. En fait, en rajoutant un $: ^([A-Za-z ]{3})-([0-9]{5})$ nous serions encore bien plus stricts, mais c'est très redondant avec le filtre des fichiers.
Seconde solution, en bricolant. On efface, resette ou dévalide le /RegEx (1)/ si nécessaire. On va dans /Remove (5)/ et on tape - dans la case /Chars/. Ensuite on va dans /Move Copy (6)/ et on remplit ainsi: /Move fisrt/, /3/, /To end/, /on s'en fiche/, et enfin - dans /Sep/. Ça doit fonctionner.
Sinon, j'ai programme en Python qui me fait du rename, il suffit que je lui colle la bonne fonction, je vous le posterai.
