在Windows的SAP GUI中，"系统"菜单中有"记录器"，用于记录您的输入并生成VBScript。

它生成以下几行：

设置字段 = FindById（"/img/app/con [0]/ses [0]/wnd [0]/usr/lblRS38M-PROGRAMM"）

@ stefan.schnell您好Stefan。 看来只有您一个人可以在那帮我：）

你好康拉德，

非常有趣的问题和非常有趣的观点。

1 。 我从来没有做过这样的分析。 这是我的示例：

 TStart = Timer（）
 对于i = 1至100
   session.findById（" wnd [0]/usr/txtRSYST-MANDT"）。Text = CStr（i）
 下一个
 TEnd = Timer（）
 MsgBox CStr（TEnd-TStart）'结果0,8

 设置字段= session.findById（" wnd [0]/usr/txtRSYST-MANDT"）
 TStart = Timer（）
 对于i = 1至100
   Field.Text = CStr（i）
 下一个
 TEnd = Timer（）
 MsgBox CStr（TEnd-TStart）'结果0,4
 

使用对象而不是使用ID为findById的对象快大约两倍。

哇...

Sandra Rossi ，然后给出答案，将UI元素缓存在对象中。 我不知道另一种方式。

2。 hit事件适用于以下示例。

 Sub ses_Error（Sess，ErrID，Desc1，Desc2，Desc3，Desc4）
   MsgBox（Desc1＆vbCrLf＆Desc2＆vbCrLf＆Desc3＆vbCrLf＆Desc4）
 结束子

 Sub ses_Hit（Sess，Comp，IObj）
   MsgBox（IObj）'完美的作品
 结束子

 设置SapGuiAuto = GetObject（" SAPGUI"）
 设置应用程序= SapGuiAuto.GetScriptingEngine
 设置连接= application.Children（0）
 设置会话= connection.Children（0）

 如果IsObject（WScript）然后
   WScript.ConnectObject会话" ses_"
 万一

 '-要使用点击事件，必须设置此属性-----------------
 session.findById（" wnd [0]"）。ElementVisualizationMode = True

 MsgBox"按一下即可结束"
 

我无法模拟错误事件，但是我认为此代码示例有效。

如何在运行的脚本中模拟对SAP GUI ActiveX控件的访问拒绝？/p>

让我们知道您的经验。

最诚挚的问候
Stefan

如果您在问题/答案下发表评论并希望定位 除了问题/答案作者以外的其他人，唯一的解决方案是复制/粘贴其超链接的名称，以便该人收到警告（注意：@不起作用）

大家好。 很抱歉收到这么晚的答复。

似乎有误会。

设置ScreenA = Session.FindById（" BLA"）

设置ScreenB = Session.FindById（" BLABLA"）

ScreenB.DoubleClick进入了第二个屏幕。

ScreenB.MoveBack'进入了第一个屏幕。

ScreenA.Text'对象不再可用，因为SAP已清除引用。

设置ScreenA = Session.FindById（" BLA"）'因此，您必须再次查找它，这显然很昂贵。 我经常遇到这种循环操作，您必须在两个屏幕之间切换。

所以最初的问题是，在屏幕切换之间如何保持对ScreenA的引用？

我认为这是主机应用程序（SAP）的局限性，因此应从那里更改。 但是也许存在一些我不知道的解决方法。

https： //people.sap.com/stefan.schnell 您好Stefan。 看来只有您一个人可以在那帮我：）