Recherche d'un caractère invisible dans un stringRésolu

Question

Hello !!!



En fait, je suis en train de cr&#233;er pour le fun un extracteur d'images depuis un fichier quelconque.



Le proc&#233;d&#233; est tr&#232;s simple : J'ai remarqu&#233; que la plupart des fomats de
fichier poss&#232;dent un header. Par exemple, les valeurs hexa des premiers
bits d'un fichier de type Jpeg commenceront par 'FFD8FFE0' soit en
cha&#238;ne string "&#255;&#216;&#255;&#224;" et finira par 'FFD9' soit "&#255;&#217;".



J'ai donc proc&#233;d&#233; ainsi : je r&#233;cup&#232;re tous les octets du fichier
contenant les images, je les stocke dans une variable de type string.
Une fonction recherche dans la variable et r&#233;cup&#232;re tous les octets
contenus entre "&#255;&#216;&#255;&#224;" et "&#255;&#217;" compris. Pour afficher l'image je n'ai
plus qu'&#224; me servir du superbe module d'EBArtSoft permettant d'afficher
une image directement &#224; partir de ses octets. 



Bref, &#231;a fonctionne avec le JPEG mais je bloque avec le format GIF : un
fichier GIF commence par '47494638' soit "GIF8" en string et se termine
par '003B' => probl&#232;me lorsque je veux rechercher la ch&#226;ne
correspondant &#224; '003B' : la valeur ascii du code hexa "00" ne
correspond &#224; aucun caract&#232;re (essayez d'appuyer sur 'Alt' ainsi que 2
fois sur "0"), &#231;a ne donne rien. 



Donc, si quelqu'un a d&#233;j&#224; &#233;t&#233; confront&#233; &#224; un probl&#232;me du genre ou qui connait une soluce...



Merci d'avance

Gobillot · Accepted Answer

Dim s As String
    
    s = "GIF89a" & "blablabla" & Chr$(0) & Chr$(0) & Chr$(&H3B)
    
    MsgBox InStr(s, Chr$(0) & ";")

Daniel

SkyRocKo · Answer

Yeah 



Merci beaucoup 



J'y avais pas pens&#233; ;)



Bonne continuation

cs_casy · Answer

Et la place de  CHR$(0) tu peux aussi utiliser la constante vbNullChar




<hr size="2" width="100%">Si le cerveau &#233;tait assez simple pour que nous puissions le comprendre,

nous serions assez b&#234;te pour ne pas le comprendre malgr&#233; tout.

macgyver49 · Answer

Est-ce que tu peux accepter ta r&#233;ponse?
(Bouton: "R&#233;ponse Accept&#233;e")
Merci.

Titi & Panpan

SkyRocKo · Answer

OK , merci beaucoup pour ces pr&#233;cieux conseils !!!



C'est cool 



++

Recherche d'un caractère invisible dans un string

5 réponses

Discussions similaires