如何在vbscript中创建的XML中添加空格/格式?

时间:2011-05-04 12:49:24

标签: xml vbscript asp-classic

我正在使用vbscript将表单数据写入XML文件:

    Set objRecord = objDom.createElement("story")
    objRoot.appendChild objRecord


    Set objField = objDom.createElement("first")
    objField.Text = Request.Form("fName")
    objRecord.appendChild objField

有效,但输出没有像XML文件那样的格式:

    <story><first>Jennifer</first></story><story><first>David</first></story><story><first>Austin</first></story><story><first>Steve</first></story>

我正在努力实现:

    <story>
        <first>Jennifer</first>
    </story>
    <story>
        <first>David</first>
    </story>

感谢您的任何见解

1 个答案:

答案 0 :(得分:2)

Oleg says您可以使用Javascript以这种方式打印现有的 XML文件:

  var reader = new ActiveXObject("Msxml2.SAXXMLReader.4.0");
  var writer = new ActiveXObject("Msxml2.MXXMLWriter.4.0");        
  writer.indent = true;
  writer.standalone = true;
  reader.contentHandler = writer;            
  reader.putProperty("http://xml.org/sax/properties/lexical-handler", writer);
  reader.parseURL("source.xml");

这应该很容易转换为VBScript。