Lister de fichiers de dossiers et sous dossiers, mais avec support carractère etRésolu

Question

Salut,



J'ai besoin pour un projet de lister les fichiers de dossiers et sous
dossiers (fichiers musicaux). Jusque l&#224; tout va bien, les sources pour
faire &#231;a son nombreuses sur ce site. Le probleme vient du fait que
toutes les solutions que j'ai essay&#233; (FSO, utilisation dir et
filelistbox, et autres) ne reconnaissent pas les caract&#232;res
&#233;tranger.Exemple : 04 - K&#1044;&#1044;pi&#1060;t.mp3 devient 04 - K??pi?t.mp3. et je ne
peux du coup pas l executer, que ce soit en ligne de commande, ou dans
mon cas, l'envoyer a mon prog de lecture audio. Quelqu'un aurait il une
solution?

Le but n'est pas forc&#233;ment de retrouver le nom a l'identique, mais
juste qu'il soit reconnaissable par n'importe quel autre programme.



Merci d'avance
LTourist

cs_Warning · Accepted Answer

Ce probleme tr&#232;s connu (des Asiatiques :p) vient bien de VB6 qui ne supporte pas l'UNICODE. Si tu veux utiliser les chaines de types unicode il faut utiliser les fonctions de chaine de caract&#232;re qui finissent par W comme ChrW(valUnicode). De m&#234;me pour les API, il te faudra par exemple utiliser:
Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameW" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long

au lieu de 

Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" (ByVal lpszLongPath As String, ByVal lpszShortPath As String, ByVal cchBuffer As Long) As Long

(le A final remplac&#233; par W).

Enfin, si tu veux afficher des caract&#232;res de ce type dans ta form, il faudra malheureusement utiliser uniquement les contr&#244;les Microsoft Forms 2.0 Object Library en rajoutant la reference ActiveX bien entendu.

Bonne chance !!!


Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

cs_DARKSIDIOUS · Answer

Tu as essay&#233; avec la fonction de l'API GetShortPathName pour r&#233;duire le nom du fichier &#224; 8 caract&#232;res ?

_____________________________________________________________________
DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en fran&#231;ais : www.ProgOtoP.com/popapi/

supermotaboy · Answer

oui mais &#231;a me donne une chaine de caract&#232;re vide (enfin en utilisant
le nom donn&#233; par fso) J'y avais pensais aussi et deja essay&#233;, d&#233;sol&#233;
d'avoir oublier de le marquer.

LTourist

supermotaboy · Answer

En utilisant n'importe quel nom (meme celui copier coller depuis windows)

LTourist

supermotaboy · Answer

D&#233;sol&#233; pour tous ces messages a la suite : J'ai regard&#233; et les
programmes qui arrivent sans probleme a lire ce fichier (wmp et
foobar2000) modifie le non de fichier en K&#228;&#228;pi&#246;t. Je sais pas si &#231;a
peut aider pour mettre sur la voie

LTourist

yuri1961 · Answer

Salut LTourist!

Ton probleme va de ton Windows qui ne supporte pas le Cirilic (page de code 866 ou 1251)

Tu as ou bien changer ton Windows ou bien installer les fonts qui
supportent ces symboles (pour utilisation dir et filelistbox only)

supermotaboy · Answer

Sans vouloir te contredire, ces caract&#232;res apparaissent correctement
sous win, donc les polices sont prises en charges non? Il n'y a que vb
qui pose probleme et quelques autres programmes, les autres
transforment les cararct&#232;res r&#233;ticent en des caract&#232;res compr&#233;hensible
par win. Mais si je les vois sous win, alors il supporte le Cirilic non?

merci de ta reponse ^^

cs_DARKSIDIOUS · Answer

Warning : utiliser les contr&#244;les du MS Form 2, c'est bien, mais comment veux tu d&#233;ployer ton application apr&#232;s ???



Les MS Form 2 sont soumis &#224; licence, et il n'est donc pas possible de
d&#233;ployer une application utilisant ces contr&#244;les sans avoir achet&#233; la
licence d'utilisation de ces contr&#244;les qui sont vendus avec la version
d&#233;veloppeur d'Office, qui est bien ch&#232;re !

_____________________________________________________________________
DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en fran&#231;ais : www.ProgOtoP.com/popapi/

supermotaboy · Answer

Merci de la solution Warning!! Cette astuce fontionnent-elle pour
toutes les fonctions utilisant les chaines de caract&#232;res? En ce qui
concerne la diffusion pour le Form 2.0, je ne devrais normalement pas
avoir de probleme, puisque cette application se destine dans un premier
temps a une port&#233;e purement personnelle (pour un projet de pc jukebox
totalement ind&#233;pendant avec ecran LCD Graphique et telecommande). Si je
peux l'utiliser pour concevoir, je peux alors l'utiliser sur ce meme pc
non? Je ne pense pas forcement avoir besoin de les afficher, mais juste
de les stocker en variables tout au plus, est ce possible sans les Form
2.0?



merci de vos reponses

LTourist

cs_Warning · Answer

DarK Sidious> Et c'est pourtant la seule solution, propos&#233; &#224; la fois par miscrosoft et par tous les sites asiatiques. 

Informations: http://support.microsoft.com/kb/193540/fr

Bonne journ&#233;e &#224; tous !


Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

cs_Warning · Answer

supermotaboy> oui pas besoin de MS Forms 2.0 si tu ne compte pas afficher ces caract&#232;res.


Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

supermotaboy · Answer

merci pour le lien Waening, tres utile...Mais je ne comprends pas : si
je souhaite juste les utiliser en tant que variables, je fais comment
alors??? Et si je veux les afficher, l'histoire de license???

LTourist

cs_DARKSIDIOUS · Answer

C'est quand m&#234;me culot&#233; de la part de Microsoft de pr&#233;conis&#233; d'utiliser leurs contr&#244;les sous licence !



supermotaboy : il suffit que tu ai une r&#233;f&#233;rence vers les ms forms pour
que la licence soit demand&#233;e et que tu ne puisse pas d&#233;ployer ton prog
sur un autre pc non &#233;quip&#233; d'office.



Les licences sur le MS FORM sont simples : tu as le droit de l'utiliser
en local (sur ton poste) si tu as Office, mais tu ne peux pas les
distribuer avec ton application => les clients doivent
OBLIGATOIREMENT avoir office d'install&#233; pour que ton prog puisse
fonctionner :(



C'est pour c&#224; que je d&#233;conseille fortement d'utiliser les MS Form dans
ses projets, j'ai d&#233;j&#224; eu ce probl&#232;me pour mon viewer d'api lorsque
j'ai voulu d&#233;ployer la premi&#232;re version alpha, et je peux te dire :
devoir revoir toute ta conception &#224; cause d'une license que tu n'a pas
le droit de distribuer, ca calme !

_____________________________________________________________________
DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) tout en fran&#231;ais : www.ProgOtoP.com/popapi/

supermotaboy · Answer

Je trouve bizarre dans ce cas de fournir les librairies et de permettre
de d&#233;velloper dessus sans avoir office d'install&#233;. D'au autre cot&#233; un
develloppeur ne doit pas forc&#233;ment avoir tous les produits microsoft
pour pouvoir d&#233;velloper il est vrai. Et donc j'en ai besoin ou pas si
je veux les assigner a des variables?

LTourist

cs_Warning · Answer

Non tu n'en a pas besion, par exemple pour placer le caract&#232;re UNICODE &h6521 dans mavar:
Dim MaVar As String
MaVar = ChrW(&H6521)


Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

supermotaboy · Answer

Bah oui mais &#231;a me permet pas d obtenir la bonne chaine de caract&#232;re.
D'autre part, j'ai trouv&#233; un exemple de listage de fichier par api, et
j'ai rajout&#233; w a la fin, et &#231;a n'avait pas l'air de fonctionner, je
vias r&#233;essayer...Je vous tiens au courant

LTourist

supermotaboy · Answer

Je confirme que les fonctions findfirstfile et findnextfile n 'existe
pas avec W a la fin.... Et vu que les Forms 2.0 ne comporte pas de
DirBox ou autre, je ne vois pas comment faire.... :(

LTourist

cs_Warning · Answer

Bien sur que si ils existent ! Je suis en train de te preparer une source...

Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

cs_Warning · Answer

Voila la source de recherche de fichier avec prise en charge UNICODE, amuse toi bien .
http://www.vbfrance.com/code.aspx?ID=34208


Warning
Admin Codes-Sources.com
http://www.decompiler-vb.net/

supermotaboy · Answer

alors &#231;a, &#231;a c'est bien beaucoup gentil, merci beaucoup!!! Pourtant
quand je mettais w a la fin, aucun fichier n'etait trouv&#233; (-1 tout le
temps)... Bon je vais regarder &#231;a de plus pres, encore merci!! Et je
pense qu'il n 'y aura pas que moi que &#231;a va arranger!!!

Par contre maintenant j'ai un second probleme a r&#233;soudre, auxquels je n
avais pas epns&#233;. Une fois le chemin r&#233;cup&#233;rer, le nom de fichier est
utilis&#233; pour ouvrir un fichier (dans le cas pr&#233;sent mp3, mais peut
aussi etre ogg ou mpc) pour r&#233;cuperer ses tags. Seulement pour &#231;a, une
instruction Open est utilis&#233;e, et bien sur la fonction ne retourne rien
puisque open ne supporte pas le unicode. Y a t'il un moyen de proc&#233;der
ou dois abandonner?

LTourist

Lister de fichiers de dossiers et sous dossiers, mais avec support carractère et

20 réponses

Discussions similaires