我们能否使用PowerTerm和VBA/Excel宏实现大型机自动化？

Question

我们有使用Rocket Bluezone的自动化大型机应用程序POC。

PowerTerm手册还说：“高级应用程序接口允许从其他环境进行访问，如C++、Visual Basic和Power Builder。还支持HLLAPI、EHLLAPI和WinHLLAPI。”

任何人都有使用VBA自动化PowerTerm的示例代码。

PowerTerm内置了记录工具..它也有Tools -> Macros -> Visual Basic Editor ..

示例代码..

Sub Login()
    Send ("L TEL1")
    Send "<ENTER>"
End Sub

当您从菜单选项运行时，它与PowerTerm交互。但我需要知道如何使用VBS进行外部呼叫..

Answer 1

您可以使用以下VBS代码从Excel工作簿运行宏：

Dim ObjExcel, ObjWB
Set ObjExcel = CreateObject("excel.application")
Set ObjWB = ObjExcel.Workbooks.Open("Path_To_Excel_Workbook")
ObjWB.Application.Run "Macro_Name"
ObjWB.Close False
ObjExcel.Quit
Set ObjWB = Nothing
Set ObjExcel = Nothing

只需打开一个新的文本文件，复制并另存为.vbs