0

我需要以人类可读的格式将 XML 回显到命令提示符，最好让它看起来与 XML 完全一样。

当我做

Set fs = CreateObject("Scripting.FileSystemObject")
Set fsInput = fs.OpenTextFile("\\PATH",1)
WScript.Echo fsInput.ReadAll

它给了我一行文本......所以我假设它将 XML 作为一行读取，而不是遍历节点并输出它们。所以这行不通。过去一个小时我一直在谷歌搜索，不幸的是我找不到我需要的东西。

这是我的 XML 的示例

<?xml version="1.0"?> 
<Configuration Date="12/3/2012 4:32:30 PM"> 
   <Sys_Info>
      <Name>CEJHUI34</Name> 
      <Manufacturer>LENOVO</Manufacturer> 
      <Model>7826</Model> 
      <Serial_Number>N/A</Serial_Number> 
      <Operating_System>"Microsoft Windows 7"</Operating_System> 
      <OS_Version>"Professional "</OS_Version> 
      <IP_Address>1.5.1.85</IP_Address>
      <CPU_per_Domain>1</CPU_per_Domain>
      <CPU_Speed_MHz>6984</CPU_Speed_MHz>
      <RAM>3176.45 MB</RAM>
   </Sys_Info> 
   <Configuration-Tasks> 
      <task> 
         <name>All updates loaded</name> 
         <result>PASS</result> 
         <comment></comment> 
      </task> 
     <task> 
        <name>Accounts Setup</name>
        <result>FAIL</result>
        <comment>No Guest account</comment>
     </task>
  </Configuration-Tasks> 
</Configuration >

关于我能做什么的任何想法？

4

1 回答 1

1

而不是单独ReadAll()使用ReadLine()和输出每一行：

Set fs = CreateObject("Scripting.FileSystemObject")
Set fsInput = fs.OpenTextFile("\\PATH",1)

do until fsInput.AtEndOfStream
    WScript.Echo fsInput.ReadLine()
loop

fsInput.Close
于 2012-12-04T09:28:55.123 回答