From: Manfredi Emmanuel (emmanuel.manfredi@Bordeaux.Cemagref.fr)
Date: 14/11/2002 - 13:35
oups, ili y a une petite erreur:
var DocXML2 = DocXML.transformNode(DocXSL);
il faut évidement
var DocXML2 = DocXML1.transformNode(DocXSL);
-----Message d'origine-----
De : Manfredi Emmanuel [mailto:emmanuel.manfredi@bordeaux.cemagref.fr]
Envoyé : jeudi 14 novembre 2002 14:33
À : 'xml-tech@xmlfr.org'
Objet : [xml-tech] Re: Associer un XML et un XSL
essaye ce fichier javascript (.js):
var FicXML1 = "tonFichierEntrée.xml";
var FicXSL = "tonFichier.xsl";
var FicXML2 = "tnFichierSortie.xml";
var DocXSL = ChargerDoc(FicXSL);
var DocXML1 = ChargerDoc(FicXML1);
var DocXML2 = DocXML.transformNode(DocXSL);
var strProcess = '<?xml version="1.0" encoding="ISO-8859-1" ?>';
DocXML2 = strProcess + DocXML2;
CreerFichier(FicXML2, DocXML2);
function ChargerDoc(MyDoc) {
var oDoc = new ActiveXObject("Microsoft.XMLDOM");
var XmlReturn = "";
oDoc.async="false";
//oDoc.validateOnParse = false;
//oDoc.preserveWhiteSpace = true;
oDoc.load(MyDoc);
if (oDoc.parseError.errorCode!=0) {
XmlReturn = "Voici les différentes propriétés de
l'erreur:\n";
XmlReturn = XmlReturn + "Fichier: " + MyDoc + "\n";
XmlReturn = XmlReturn + "Code: " + oDoc.parseError.errorCode
+ "\n";
XmlReturn = XmlReturn + "Raison: " + oDoc.parseError.reason
+ "\n";
XmlReturn = XmlReturn + "Ligne: " + oDoc.parseError.line +
"\n";
XmlReturn = XmlReturn + "Colonne: " +
oDoc.parseError.linePos + "\n";
XmlReturn = XmlReturn + "Position: " +
oDoc.parseError.filePos + "\n";
WScript.Echo(XmlReturn);
return null;
} else {
return oDoc;
}
}
function CreerFichier(Fichier, Doc) {
var fso = new ActiveXObject("Scripting.FileSystemObject");
var of = fso.CreateTextFile(Fichier, true, false);
of.writeLine(Doc);
of.close();
}
function CreerFichierWord(InHTML, outDOC) {
var fso = new ActiveXObject("Scripting.FileSystemObject");
var infile = fso.GetFile(InHTML).path;
var outfile = fso.GetAbsolutePathName(outDOC);
var fileFormat = wdFormatDocument = 0;//wdFormatHTML = 8;
var ofname = outfile.substr(outfile.lastIndexOf("\\"));
var tmpfld = fso.GetSpecialFolder(2);//TEMP_FOLDER
var word = new ActiveXObject("word.Application");
var doc = word.Documents.Open(infile, false);
word.Documents(infile).saveAs(tmpfld.Path + ofname, 0);// ,
fileFormat);
doc.close();
fso.CopyFile(tmpfld.Path + ofname, outfile, true);
fso.DeleteFile(tmpfld.Path + ofname);
word.Quit();
}
cordialement
-----Message d'origine-----
De : Eric.Reiter@ic.lu [mailto:Eric.Reiter@ic.lu]
Envoyé : jeudi 14 novembre 2002 14:18
À : xml-tech@xmlfr.org
Objet : [xml-tech] Associer un XML et un XSL
Bonjour
Je dispose d un XML et d XSL qui transforme l XML en un autre fichier XML.
Je souhaiterais que cette association puisse se faire par un programme
(VB??) pour que le fichier resultant puisse etre stocke sur le disque de mon
PC.
Pourriez vous me dire ou je peux trouver une application de ce genre sur le
web (car cela doit bien exister mais je n ai pas trouve!!)?
merci
eric
--
Devenez redacteur <XML>fr et contribuez au developpement du
xml francophone (http://xmlfr.org/infos/redacteurs/) !
Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
Cette liste est a votre disposition pour discuter en francais de
tout sujet technique lie a XML.
Pour resilier votre abonnement, envoyez un message contenant
la commande "unsubscribe" a xml-tech-request@xmlfr.org
(mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
--
Devenez redacteur <XML>fr et contribuez au developpement du
xml francophone (http://xmlfr.org/infos/redacteurs/) !
Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
Cette liste est a votre disposition pour discuter en francais de
tout sujet technique lie a XML.
Pour resilier votre abonnement, envoyez un message contenant
la commande "unsubscribe" a xml-tech-request@xmlfr.org
(mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
--
Devenez redacteur <XML>fr et contribuez au developpement du
xml francophone (http://xmlfr.org/infos/redacteurs/) !
Liste de diffusion "xml-tech@xmlfr.org" (http://xmlfr.org).
Cette liste est a votre disposition pour discuter en francais de
tout sujet technique lie a XML.
Pour resilier votre abonnement, envoyez un message contenant
la commande "unsubscribe" a xml-tech-request@xmlfr.org
(mailto:xml-tech-request@xmlfr.org?Subject=unsubscribe)
Archive générée par hypermail 2.1.3 le 28/06/2004 - 11:06 UTC
webmaster@xmlfr.org
| 
