Преобразование макросов AS400 в HAScript и совместимость с HAScript с помощью Excel VBA - PullRequest
0 голосов
/ 09 ноября 2019

Я недавно разработал Automation между скриптами AS400 и Excel VBA, который вызывает несколько макросов AS400, которые были разработаны в VBScript. Теперь я узнал, что будет установлен новый ПК с Windows, на котором будет работать эмулятор Windows 10, использующий язык HAScript, который сильно отличается от VBScript.

Мой вопрос ко всем, кто имеет опыт работы с языком HAScript. Насколько сложно будет заменить VBScript на HAScript в конфигурации, которую я описал выше?

Sub APVCHDET()

    ' This VBA Script can only be Run after logging onto the AS400 im
    Dim SessObj As Object
    Dim autECLConnList As Object

    Set autECLConnList = CreateObject("PCOMM.autECLConnList")
    Set SessObj = CreateObject("PCOMM.autECLSession")

    ' Initialize the session
    autECLConnList.Refresh
    SessObj.SetConnectionByHandle (autECLConnList(1).Handle)
    SessObj.autECLOIA.WaitForAppAvailable
    SessObj.autECLOIA.WaitForInputReady
    SessObj.autECLPS.SendKeys "FINANDTADNFINANDTADN"
    SessObj.autECLOIA.WaitForInputReady

    ' more to come ...

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...