Discussion :

[nitro97130]

Bonjour à tous,

J'ai créer un petit script qui remplit un fichier XML mais le problème est que le script ne copie pas les "é" ou "è".
Ce problème survient lorsque j'utilise la fonction f.writeline
Comment puis-je régler ce problème?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

f.writeline "    <Channel>Espace libre C: Système</Channel>"

Merci d'avance. ^^

[SfJ5Rpw8]

Ce code ne devrait pas poser de problème.. comment crée tu ton fichier xml ? comment visualise tu son contenu ?

[nitro97130]

Ba c'est ce que je me suis dit sa devrait pas poser de problème :/
Mon script se charge de créer le XML et je le visualise avec Notepad++

[ced600]

Peux tu mettre ton script en entier ?

[nitro97130]

Oui sans soucis.

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
Const ForReading = 1, ForWriting = 2
 
Dim fso, f, MyFile, oShell
 
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("test_avril.xml", ForWriting, True)
 
f.WriteLine "<?xml version=""1.0"" encoding=""utf-8"" standalone=""yes""?>"
f.writeline "<CSVImport>"
f.writeline "  <Version>8.0.2.7</Version>"
f.writeline "  <Date>"
f.writeline "    <Start>2011-04-01-07-00-00</Start>"
f.writeline "    <End>2011-04-30-07-00-00</End>"
f.writeline "  </Date>"
f.writeline "  <Sensor ID=""2592"">"
f.writeline "    <Legend>BFCDC01 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2599"">"
f.writeline "    <Legend>BFCDC02 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2609"">"
f.writeline "    <Legend>Citrix 01 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2616"">"
f.writeline "    <Legend>Citrix 02 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2623"">"
f.writeline "    <Legend>Citrix 03 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2630"">"
f.writeline "    <Legend>Citrix 04 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2637"">"
f.writeline "    <Legend>Citrix 05 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2644"">"
f.writeline "    <Legend>Citrix 07 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2651"">"
f.writeline "    <Legend>Citrix 08 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2658"">"
f.writeline "    <Legend>Citrix 09 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2665"">"
f.writeline "    <Legend>Citrix 10 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2672"">"
f.writeline "    <Legend>Citrix 11 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Sensor ID=""2679"">"
f.writeline "    <Legend>Citrix 12 Espace libre C: Système</Legend>"
f.writeline "    <Channel>Espace libre C: Système</Channel>"
f.writeline "  </Sensor>"
f.writeline "  <Series ID=""0"">"
f.writeline "    <Text>Espace libre C: Occupé</Text>"
f.writeline "    <Color>-3721216</Color>"
f.writeline "  </Series>"
f.writeline "  <Series ID=""1"">"
f.writeline "    <Text>Espace libre C: Système</Text>"
f.writeline "    <Color>-8992723</Color>"
f.writeline "  </Series>"
f.writeline "  <Titles ID=""0"">"
f.writeline "    <Text>Espace Disque Dur Système</Text>"
f.writeline "    <Color>-16777216</Color>"
f.writeline "    <Font>[Font: Name=Microsoft Sans Serif, Size=16, Units=3, GdiCharSet=1, GdiVerticalFont=False]</Font>"
f.writeline "  </Titles>"
f.writeline "  <Titles ID=""1"">"
f.writeline "    <Text />"
f.writeline "    <Color>-16777216</Color>"
f.writeline "    <Font>[Font: Name=Microsoft Sans Serif, Size=8,25, Units=3, GdiCharSet=0, GdiVerticalFont=False]</Font>"
f.writeline "  </Titles>"
f.writeline "</CSVImport>"
msgbox "fini"
 
wscript.quit(1)

[ced600]

Le problème est simple est compliqué à la fois, mais la solution reste simple.
OpenTextFile ouvre le fichier en encodage "Windows : 1252" qui n'est pas de l'UTF8, encore une fois microsoft établit ses standards et n'utilise pas les existant.
Donc si tu stipules dans le XML que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

encoding=""utf-8""

, notepad++ va l'ouvrir avec cet encodage qui n'est pas le véritable encodage du fichier. Chez cela affiche des cractères spéciaux et dans ton cas rien.
Une solution est de mettre à la place

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

encoding=""1252""

.
Alors sous windows tout s'affiche bien.

Par contre si tu dois exporter sur d'autres environnements le fichier tu retrouvras le même problème.
Donc une autre solution serais de dire à OpenTextFile d'ouvrir le fichier avec l'encodage UTF-8. Je n'ai pas regardé les possibilités de ce coté là. Je te laisse chercher si besoin.

[nitro97130]

AAAh merci beaucoup.
Effectivement en modifiant l'encodage en 1252, mes caractères spéciaux sont apparus.
Je vais chercher pour faire le OpenTextFile ouvrir le fichier avec l'encodage UTF-8 sa pourras servir.

Merci beaucoup !^^

[nitro97130]

Effectivement sa pose problème quand on change d'environnement ou avec quel programme il sera utilisé.

[ced600]

Regarde ici :
http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx

[nitro97130]

Je n'ai finalement pas eu besoin de passer par un convertisseur 1252 à UTF-8 j'ai tout simplement convertit le code de mon script avec Notepad++ en UTF-8(sans BOM).
Mes caractères spéciaux sont restés intactes et mon logiciel qui charge les XML a pu le faire sans soucis.

Merci pour votre aide. ^^