点击此处---> 群内免费提供SAP练习系统(在群公告中)
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
我是的,我使用sapGui 7.40,并尝试通过sq01中的查询创建用于提取数据的自动脚本。
一切正常,但我无法保存文件路径和名称。
这是我的示例脚本:
如果不是IsObject(application),则
设置SapGuiAuto = GetObject(" SAPGUI")
设置应用程序= SapGuiAuto.GetScriptingEngine
如果,如果不是IsObject(connection),则
结束 连接= application.Children(0)
如果不是IsObject(session),则结束
设置会话= connection.Children(0)
如果,如果是IsObject(WScript),则结束。 br> WScript.ConnectObject会话,"在"上
WScript.ConnectObject应用程序,"在"上结束If
session.findById(" wnd [0]")。maximize
session.findById(" wnd [0]/tbar [0]/okcd")。text =" sq01"
session.findById(" wnd [0]")。sendVKey 0
session.findById(" wnd [0]/mbar /menu[5]/menu[0]").select
session.findById(" wnd [1]/usr/radRAD1")。select
session.findById(" wnd [1]/tbar [0 ]/btn [2]")。press
session.findById(" wnd [0]/tbar [1]/btn [19]")。press
session.findById(" wnd [1]/usr /cntlGRID1/shellcont/shell").currentCellRow = 28
session.findById(" wnd [1]/usr/cntlGRID1/shellcont/shell")。firstVisibleRow = 18
session.findById(" wnd [1]/usr/cntlGRID1/shellcont/s 地狱")。selectedRows=" 28"
session.findById(" wnd [1]/usr/cntlGRID1/shellcont/shell")。doubleClickCurrentCell
session.findById(" wnd [0]/usr/cntlGRID_CONT0050/shellcont/shell")。selectedRows =" 0"
session.findById(" wnd [0]/usr/cntlGRID_CONT0050/shellcont/shell")。doubleClickCurrentCell
session.findById(" wnd [0]/tbar [ 1]/btn [8]")。press
session.findById(" wnd [0]/usr/ctxtSP $ 00005-LOW")。text =" zpf"
session.findById(" wnd [0] /usr/ctxtSP$00006-LOW").text =" mp01"
session.findById(" wnd [0]/usr/ctxtSP $ 00006-LOW")。setFocus
session.findById(" wnd [0] /usr/ctxtSP$00006-LOW").caretPosition = 4
session.findById(" wnd [0]/tbar [1]/btn [8]")。press
session.findById(" wnd [0 ]/usr/cntlCONTAINER/shellcont/shell")。pressToolbarContextButton"&MB_EXPORT"
session.findById(" wnd [0]/usr/cntlCONTAINER/shellcont/shell")。selectContextMenuItem"&XXL"
session.findById( " wnd [1]/usr/radRB_OTHERS")。setFocus
session.findById(" wnd [1]/usr/radRB_OTHERS")。select
session.findById(" wnd [1]/usr/cmbG_LISTBOX" ) .key =" 10"
session.findById(" wnd [1]/tbar [0]/btn [0]")。按
谁能帮助我?
您好,Stefan ,
由于某些原因,上述宏对我来说无法正常工作。 你能请教吗?
这是导出代码的一部分:
"导出到电子表格-导出带有记录的记录时,记录了前2行,并且在运行良好时,打开了无法编写脚本的"另存为"窗口
session.FindById(" wnd [0]/usr/cntlCONTAINER/shellcont/shell")。pressToolbarContextButton"&MB_EXPORT" session.FindById(" wnd [0]/usr/cntlCONTAINER/shellcont/shell")。SelectContextMenuItem"&XXL "
"启动异步过程
设置WshShell = CreateObject(" WScript.Shell")WshShell.Run" C:\ Users \ AAA.LOGON \ Documents \ AAA \ ScriptCA.vbs"
'-Begin ------------------------------------------------------------ ---------------------
设置wshShell = CreateObject(" WScript.Shell")
做
WScript.Sleep 500
循环直到wshShell.AppActivate("另存为")= True
wshShell.Sendkeys"%nNA_SQ00FBL5N_CA10.XML"
'wshShell.Sendkeys"%nNA_SQ00FBL5N_CA10.XML%f"
'-End -------------------------------------------- -----------------------
问题1是我不知道如何使宏按下"保存"按钮,您的建议对我不起作用。
问题2是我在同一个宏中运行3个查询,我想以不同的名称导出XML格式的所有3个文件,并且引用了3个脚本。 运行宏文件时,文件名是随机填充的,而不是根据脚本填充的。 在我看来,第一个文件名被填充两次,然后第二个文件名而不是第三个文件名出现,如果我有第四个查询,第三个文件名将出现。
一周热门 更多>