Attachmate Reflection VBA自动化错误

时间:2014-04-09 21:44:06

标签: excel vba attachmate-extra

使用Attachmate Reflections Standard Suite 2011 R2,使用excel作为源数据集。我尝试自动化的终端需要F9密钥才能提交信息,但是当我尝试发送该密钥时,我得到“给定的密钥不存在于字典中”错误。我尝试发送到终端应用程序的所有其他密钥似乎工作正常。以下是代码段:

sub TerminalTest()
Dim app As Attachmate_Reflection_Objects_Framework.ApplicationObject
Dim frame As Attachmate_Reflection_Objects.frame  

Set app = GetObject("Reflection Workspace")
Set frame = app.GetObject("Frame")
Set MGlobals.gScreen = frame.SelectedView.Control.Screen
With MGlobals.gScreen
    .SendKeys "A"
    .SendKeys "123"
    .SendKeys "456"
    .SendControlKey ControlKeyCode_Return
    .SendKeys "780ABC"
    .SendControlKey ControlKeyCode_Return
    .SendKeys "ZYX"
    .SendControlKey ControlKeyCode_Return
    .SendKeys "TEST"
    .SendControlKey ControlKeyCode_Return
    .SendControlKey ControlKeyCode_F9
End with
End sub

我有点不知所措,因为反射API文档显示使用ControlKeyCode_F9作为功能键,但代码却抛出错误。

任何帮助都已经过了。

1 个答案:

答案 0 :(得分:1)

因此,即使通过Google,似乎关于Attachemate Reflections的信息也很少。这也得到了这里缺乏反馈的证实,但我希望在未来任何其他人遇到类似令人沮丧的经历的情况下对此进行更新。

Attachmate Reflections 2011安装了4个参考文件:

Attachmate_Reflection_Objects
Attachmate_Reflection_Objects_Framework
Attachmate_Reflection_Objects_Emulation_OpenSystems
Attachmate_Reflection_Objects_Emulation_IbmHosts

他们网站上的文档指示是程序员在VBA中启用所有4个引用以允许自动化。这就是问题所在 - 似乎与Attachmate_Reflection_Objects_Emulation_OpenSystems和Attachmate_Reflection_Objects_Emulation_IbmHosts存在冲突。当两者都启用时,功能键和其他Attachmate内置函数将无法正常工作。通过浏览对象浏览器并注意到明显的差异,我在敲击键盘后发现了错误。

无论如何,我意识到很少有人可能仍然使用Attachmate,但对于那些被他们的公司绳索进入这个应用程序的可怜的流浪汉,也许这会有所帮助

谢谢,