0

人間が読める形式のXMLをコマンドプロンプトにエコーする必要があります。できれば、XMLとまったく同じように見えるようにする必要があります。

私がする時

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

それは私に1行のテキストを与えます...それで私はそれがノードを横断してそれらを出力する代わりに1行としてXMLを読むと思います。したがって、これは機能しません。この1時間グーグルをしていて、残念ながら必要なものが見つかりません。

これが私の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 に答える