2012-05-21 67 views
0

我們的應用程序的用戶之一有一個名爲zean.xml的xml文件,位於C:\ProgramData\Secon\levrer\8.6.7\team\lead\Captain folder的位置。但現在我覺得我需要用下面的內容替換xml文件內容作爲一種溫和的解決方法。我想寫vbscript或bat文件,以便我可以給正在使用這個xml文件的用戶。任何機構可以提供我的VBScript代碼或bat文件與以下內容如何創建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> 

回答

1

只需添加文本O的新XML文件重寫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)