TRAITEMENT DES PHOTOS (PAR REPERTOIRE)
jdleboucq
Messages postés
2
Date d'inscription
samedi 3 février 2007
Statut
Membre
Dernière intervention
3 février 2007
-
3 févr. 2007 à 08:31
conseildg Messages postés 86 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 mars 2007 - 5 févr. 2007 à 19:07
conseildg Messages postés 86 Date d'inscription lundi 16 décembre 2002 Statut Membre Dernière intervention 18 mars 2007 - 5 févr. 2007 à 19:07
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/41351-traitement-des-photos-par-repertoire
https://codes-sources.commentcamarche.net/source/41351-traitement-des-photos-par-repertoire
5 févr. 2007 à 19:07
Pour les suivants, ne serait-il pas mieux de remplacer dans le titre sur le site « traitement » par « renommer » ou « nommage » ?
5 févr. 2007 à 05:20
Ok je vais regarder le probleme et corriger cela
Didier72
Ok je n avais effecitvement pas songé au nom du lecteur je vais corriger la source
Merci a tous deux.
Bye
4 févr. 2007 à 13:55
Voilà comment j'ai modifié la partie utile pour que cela fonctionne avec des Labels:
On Error GoTo gestion_erreur
lecteur = Drive1.Drive
lect = Left(lecteur, 2)
Select Case lect
Case "a:"
Z = MsgBox("Veuillez choisir un autre lecteur", vbOKOnly, " Videotheque")
Exit Sub
File1.Path = lect
End Select
File1.Pattern = "*.jpg;*.bmp;*.gif;*.htm"
Dir1.Path = lect
Exit Sub
Bye
4 févr. 2007 à 13:44
Le problème de reconnaissance d'un autre Disque reste présent:
Cela doit venir du fait que si tu mets un Label au Disque celui-ci n'est plus reconnu dans la Case.
Exemple:
Si ta partition ou autre disque dur est le d: --> C'est ok sans Label
Mais
Si ta partition ou autre disque dur est le d: [DONNEES] --> marche pas avec le label DONNEES.
Voir comment prendre en compte ta fenêtre Drive1 Drivebox pour qu'il reconnaissance l'info ..!!!
Merci
Bye
4 févr. 2007 à 12:17
Toutefois,
- il faudrait que le n° ajouté soit toujours à 3 caractères, sinon les photos sont déclassées : 1, 11, 12, 13, 14, 15, 16, 17, 18, 19, 2, 20, 21, etc...
- l'ascenseur du répertoire disparaît après l'affichage des fichiers.
3 févr. 2007 à 19:34
Dans le code je gère les lecteurs de A à K (mais pas le B) normalement dans le select case lecteur je recupère la lettre de ton disque pour en afficher les répertoires. Si tu sélectionnes un lecteur de CD ou de DVD le logiciel t'envoies un message si le lecteur est vide. Quelle est la lettre du lecteur que tu sélectionnes ? j'ai pas de partition donc j'ai pas rencontré de problème mais je vais me pencher dessus...... Bon finalement c'était pas grand chose... je me suis servi d'un DVD pour les tests et la ca semble tourner. je modifie les sources en conséquence.
Merci
Bye
3 févr. 2007 à 15:16
Trés utile...
Mais je rencontre un problème lors du choix d'une autre partiton ou disque dur que la c:. Le détails des dossiers de cette partition ou disque dur ne s'affichent pas ??
Merci
Bye
3 févr. 2007 à 10:33
slts!
____________________________________________
Toujours + de VB et d'APi => API @ la Loupe
http://xav.prog.power.free.fr
3 févr. 2007 à 08:31