Bonjour,

Depuis mon post de toute à l'heure j'ai beaucoup avancé.
OBJECTIF : afficher dans un label du texte thai contenu dans un fichier xml.

J'arrive bien à mettre du thai dans mon label depuis l'éditeur graphique avec une saisie du thai par mon clavier.(charset=222 et font=tahoma).

J'arrive à crée un xml qui contient l'en tête d'encodage en thai et à l'ouvrir dans IE.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
<?xml version="1.0" encoding="iso-8859-11"?>
Par contre quand j'ouvre mon xml avec DOM il me renvoie des ??? à la place des caractères et donc quand j'alimente le texte de mon label à partir du résultat de la lecture de la balise j'ai des ?.

Pour récupérer le texte de ma balise j'ai fais cette fonction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Function chargeTextesXML(groupe As String, balise As String) As String
    Dim xmlDoc As New MSXML2.DOMDocument
    Dim xmlLog As MSXML2.IXMLDOMElement
    Dim retour As String
    '
    'charge le fichier xml à ouvrir
    If xmlDoc.Load(App.Path & "\Langue\textes.xml") = True Then
        'on récupère la valeur des 2 balises bluetooth
        Set xmlLog = xmlDoc.getElementsByTagName(groupe)(0)
        retour = xmlLog.selectSingleNode(balise).Text
    Else
        retour = ""
    End If
    chargeTextesXML = retour
End Function
puis pour alimenter mon label via la fonction de lecture du XML je fais
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
monLabel.caption = chargeTextesXML("monNoeud", "maBalise")
Merci d'avance pour toute aide