//創(chuàng)建 XMLHTTP 對(duì)象
 var xObj = new ActiveXObject("Msxml2.XMLHTTP");

 //利用 XMLHTTP 對(duì)象發(fā)送數(shù)據(jù)
 xObj.Open("post", "save_xml.asp", false);
 xObj.setRequestHeader("Content-type","text/xml");
 //新建 XMLDOM 對(duì)象
 var xDom = new ActiveXObject("MSXML2.DOMDocument");
 xDom.async = false;
 xDom.loadXML("xxx.xml");
 //這里可以是載入XML文件，也可以是 XMLDom 數(shù)據(jù)對(duì)象
 //發(fā)送數(shù)據(jù)
 xObj.Send(xDom.xml);

 '定義 MSXML DOM 對(duì)象
 Dim objResult
 Set objResult = Server.CreateObject("MSXML2.DOMDocument")

 '載入提交數(shù)據(jù)
 objResult.load(Request)
 objResult.async = false
 '保存提交數(shù)據(jù)
 
 objResult.save(Path)