VBA Excel-与Attachmate EXTRA交互-识别是否没有结果



我正在excel中设计一个工作簿,我将放一个我想运行循环的帐户列表,该循环将调出Attachmate并搜索帐户上的数据。如果没有数据,则结果为空,它不会报告回";无数据";或者类似的东西。所以,如果有数据,我需要它返回一个正数,但如果信息是空白的,我需要返回负数。有没有人对attachmate、excel和vba都有经验,对我如何运行这个循环有任何想法?

基本上,我们使用AttachMate Extra+Excel+VBA所做的是:在实例化AttachMate Extra COM接口后,登录到一个可用的系统>访问该系统的特定资源(Sendkeys等(,等待完成,读取一个(或多个(字符数组特定字段(1到24行(*(1到80列(,然后相应地引导代码。因此,您需要读取通常返回预期访问状态的字符数组。为此,有必要了解该系统的(可能的(各种返回屏幕。一旦您知道在哪里读取返回,就将其加载到一个文本变量中,这将有助于指导代码执行。

一个例子:

strMsg = Trim(oScreen.Area(22, 1, 22, 79, xBlock))

读取第22行,从1到位置79处的字符。从那里开始,代码将按照解释执行。必须提前知道可能的返回消息,以便在构建逻辑时取得更大的成功。

构建一个等待OiA对象响应的例程是非常重要的。Oia是一个标记所需任务已完成的对象。使用它,您的代码会变得更加高效和自信。谁知道呢,一个空白的返回也可能意味着系统崩溃。

我发现:

Sess0.ReadScreen NoDataChk, 1, iRow, 4

If NoDataCheck = " " Then
'Whatever result you need, in my case it is ResultBox = "Not Eligible"
Exit Sub
End If

最新更新