objet ADODB.Stream

[nicolas13170]

Bonjour,

En Vbscript, j'utiliser l'objet ADODB.Stream afin de lire des fichiers et de les modifier.

J'effectue une boucle sur tout les fichiers existant. Mais je rencontre un problème récurent avec ce code:

Code :

1
2
3
4
5
6
7
8
9
encodage = "UTF-8" 'ou bien iso-8859-1
 
objStream.Open     
objStream.LoadFromFile fichier.Path    
objStream.Charset = encodage
objStream.Position = 0
chaineDansFichier = objStream.ReadText
MsgBox Mid(chaineDansFichier,1,15)
objStream.Close

Lorsque je lis (via ma msgbox) la valeur de mes 15 premier caractères, TOUJOUR SUR LE PREMIER FICHIER, il y a 2 caractères en plus qui s'insèrent (ce n'est pas les bom de l'utf-8 car cela fait le même principe avec de l'ansi). Quand l'encodage = 'UTF-8', il rajoute ?? par exemple. Lorsque ma boucle en est au 2eme fichier, il n'y a plus ces caractères.

Une idée ?

Merci beaucoup.

Cordialement