0
私はPervasive 9.2を使用していて、何とかvbscriptを普及型RIFL言語に変換したいと考えています。私は、コードを実行するためにf（x）コンポーネントが実行されるプロセス中にコードを実行したい。 xmlデータのパスまでは、ソースデータがどこにあるかを定義するマクロと、ファイルを保存する別のマクロを使用します。ここでvbscriptを高速インテグレーション言語に変換する
は以下のVBScriptコードです：
Set xml = CreateObject("Microsoft.XMLDOM")
xml.async = False
count_var = 1
If xml.Load("c:\folder1\test.xml") Then
For Each accounts In xml.SelectNodes("//Accounts")
For Each account In Accounts.SelectNodes("./Account")
If count_var > 1 Then
Set accountEnum = xml.createNode(1, "Account" & count_var, "")
For Each child In Account.childNodes
accountEnum.appendChild(child.cloneNode(TRUE))
Next
Accounts.replaceChild accountEnum, Account
xml.save("c:\folder1\test.xml")
else
Set accountEnum = xml.createNode(1, "Account" & count_var, "")
For Each child In Account.childNodes
accountEnum.appendChild(child.cloneNode(TRUE))
Next
Accounts.replaceChild accountEnum, Account
xml.save("c:\folder1\test.xml")
End If
count_var = count_var + 1
Next
count_var = 1
Next
End If
Set node = Nothing
Set xml = Nothing