Конвертировать VBScript в быстрой интеграции языка

Question

Я использую Pervasive 9.2 и хотел бы как-то преобразовать VBScript в язык RIFL. Я хочу выполнить код во время процесса, где для выполнения кода выполняется компонент f (x). Что касается пути к данным xml, я буду использовать макрос, определяющий, где находятся исходные данные, и другой файл для сохранения файла.

Вот код 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

Answer 1

ParseXMLFile(filepath)

документация здесь

http://docs.pervasive.com/products/integration/di/rifl/wwhelp/wwhimpl/common/html/wwhelp.htm

это вернет DOMDocument Object Type

документация здесь

http://docs.pervasive.com/products/integration/di/rifl/wwhelp/wwhimpl/common/html/wwhelp.htm

надеюсь это поможет