0

我们应用程序的一位用户zean.xml在 location 中有一个名为 xml 的文件 C:\ProgramData\Secon\levrer\8.6.7\team\lead\Captain folder。但现在我觉得我需要用以下内容替换 xml 文件内容作为临时解决方法。我想编写 vbscript 或 bat 文件，以便我可以提供给正在使用这个 xml 文件的用户。任何机构都可以为我提供 vbscript 代码或 bat 文件，以便用以下内容重写 xml 文件

  <?xml version="1.0" standalone="yes" ?> 
 <TestSchema xmlns="http://tempuri.org/TestSchema.xsd">
  <UserZone>
  <Label>All</Label> 
  <ID>8c19c791-32d6-4ad1-8504-c3387b5a0096</ID> 
  </UserZone>
 <ZoneMgGrpCollection>
  <Owner>8c19c791-32d6-4ad1-8504-c3387b5a0096</Owner> 
  <MgGrpID>5f498b70-ee75-4ff0-8808-b9ba492b7f8a</MgGrpID> 
  </ZoneMgGrpCollection>
  </TestSchema>
4

1 回答 1

1

只需添加文本 oa new XML 文件，然后将其复制到另一个文件上。您可以手动或通过脚本进行操作，但我不明白您为什么要通过脚本进行操作，因为这显然是一次性操作。

Const ForReading = 1, ForWriting = 2, ForAppending = 8, CreateIfNeeded = true
Set fso = CreateObject("Scripting.FileSystemObject")
set tf=fso.OpenTextFile ("new.xml",ForWriting,CreateIfNeeded)
tf.write "<?xml version=""1.0"" standalone=""yes"" ?>  "
'repeat this for the other lines
tf.close
fso.CopyFile("new.xml", "C:\ProgramData\Secon\levrer\8.6.7\team\lead\Captain folder\",True)
于 2012-05-22T11:27:58.010 回答