[ASP] Astuce pour type encodage

Version imprimable

Bonjour,

Voila je vais essayer de vous expliquer mon problème:

Dans une page ASP je prends en entrée un fichier XML que je retourne dans flux XML en sortie de ma page:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 ' chargement du fichier XML oXML.load(strNomFichierXml) call gererErr("") Response.ContentType="text/xml" Response.Expires = "-1" Response.CharSet ="ISO8859-1" Response.write "<?xml version='1.0' encoding='ISO-8859-1' ?>" ' affichage du flux XML Response.Write oXML.xml Response.End
Mon fichier XML ne possède pas d'entete et est du style:
Code:

1 2 3 4 5 <contexte> <nom>titi</nom> <prenom>titi</prenom> ... </contexte>
En sortie j'ai donc bien mon XML affiché comme suit:
Code:

1 2 3 4 5 6 7 <?xml version='1.0' encoding='ISO-8859-1' ?> - <contexte> <nom>toto</nom> <prenom>toto</prenom> ... </contexte>
Mon problème intervient si je trouve un accent dans le fichier XML pris en entré. en effet, la fonction 'Response.Write oXML.xml' ne peut pas afficher le XML puisqu'a ce stade la l'encodage n'est pas spécifié dans la page XML en entrée, cette encodage n'est déclaré qu'après pour l'affichage du flux XML de sortie ....
J'ai alors desuite pensé a rajouter l'encodage dans les fichiers XML d'entrée, en rajoutant en entete:
Code:

1 2 "<?xml version='1.0' encoding='ISO-8859-1' ?>"
Et la plus de problème d'accent, mais le fichier XML de sortie n'est plus formaté correctement, j'ai l'ecriture suivante:
Code:

1 2 3 4 5 6 <?xml version="1.0" encoding="ISO-8859-1" ?> <?xml version="1.0" ?> - <contexte> ... </contexte>
Alors que je ne veux pas l'affichage de la 2eme balise de parametrage, le fichier n'etant plus formaté correctement mon traitement n'est plus valable.
J'espere avoir été assez clair.
Merci pour vos lumieres.

Bonjour,

Je reviens vers vous car j'ai une piste mais ca ne semble pas marcher.
Avant de renvoyer le flux XML en fait un "Response.Write oXML.xml", j'utilise l'objet MXXMLWriter pour écrire les paramètres du XML à générer car apparament c'est comme ca qu'il faut faire.
J'ai ecrit le code suivant:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 oXMLW.output = oXML oXMLW.encoding="ISO-8859-1" oXMLW.startDocument ' Création de la racine<br> oXMLW.startElement "","","Root",Nothing Response.Write oXML.xml oXMLW.endDocument Set oXMLW = Nothing Response.End
Je pense ne pas bien utiliser startDocument, endDocument. En sortie j'obtiens toujours <?xml version="1.0"?> alors qu'en utilisant oXMLW.encoding="ISO-8859-1" je pensais obtenir en en-tete <?xml version='1.0' encoding='ISO-8859-1'?>
quelqu'un a une idée ?
Merci

A titre d'info, voici la manip pour parer au problème. Il suffit en fait simplement de lire le fichier XML en entrée comme n'importe quel fichier texte et de l'afficher tel quel.

Code:

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
 
	'Création d'un objet du DOM XML
	set oXML = server.CreateObject("Microsoft.XMLDOM")
	call gererErr("")
 
	'Paramétrage du flux de réponse
	Response.ContentType="text/xml"
	Response.Expires = "-1" 
	Response.CharSet ="ISO-8859-1"
 
             ' declaration des objets de lecture du fichier XML
	Set fs=Server.CreateObject("Scripting.FileSystemObject")
	Set f=fs.OpenTextFile(strNomFichierXml)
 
	' on ecrit toutes les lignes du fichier lu
	do while f.AtEndOfStream = false
		Response.Write(f.ReadLine)
	loop
	f.Close
 
	' fermeture des objets
	Set f=Nothing
	Set fs=Nothing
 
	Response.End