使用Python完成SAP客戶端的打開和系統登陸功能

最近小爬一直思忖著如何將以前寫的一些半自動化程序轉為全自動化,這其中就涉及到SAP的打開和登錄過程。我們都知道,SAP原生的“腳本錄制和回放”功能是在用戶進入到某一個SAP”用戶指定系統“後才可以啟用:

也就是說,從這裡開始,您可以通過腳本錄制,生成用戶名、密碼的輸入和SAP登錄過程的完整代碼;

那麼我們的重點就轉到瞭,如何通過Python完成SAP應用程序的打開並進入特定的”用戶指定系統“,比如下圖中紅圈所示系統:

  PS:由於SAP啟動後選擇不同的視圖,界面會略有不同,下面演示的方法是在”瀏覽器視圖“、”工作區視圖“以及“樹視圖”下演示的,其他啟動視圖下無效,所以如果您希望下面提到的方法在您電腦上生效,請務必確保您登陸後視圖屬於上面提到的視圖中的一種。慶幸的是,SAP客戶端會記錄您的用戶習慣,一旦您完成默認瀏覽視圖的設定,下次程序啟動時,程序會默認使用此視圖。

程序需要首先完成SAP 應用程序的自動啟動,python中的方法有很多種,我用到的方法如下:

 sap_app = r"C:\Program Files (x86)\SAP\FrontEnd\SAPgui\saplogon.exe" #您的saplogon程序本地完整路徑
    subprocess.Popen(sap_app)

然後是用python完成激活SAP“指定用戶系統”,這裡需要您的python安裝win32com等組件,附上官方下載地址:pywin32 224

有瞭它,我們可以輕易通過python來連接本地的win32程序並通過捕獲相應句柄來控制對應的窗口。當然,我們還要借助MicrosoftSpy++來捕獲各個窗口的句柄、ID、類、文本等關鍵信息,用以簡化我們的編程過程。

大體思考過程如下:

比如我現在要進入“R3生產系統”,SAP程序打開後,會默認高亮基於排名規則的第一位的系統,而我們的目標系統“位於第二位,(您可以通過修改排序手段、配合”名稱字段“的修改,讓您希望的系統默認排在第一位,不過小爬沒有這樣做),小爬嘗試去捕獲”R3生產系統“這個元素的句柄,然後完成雙擊操作,可惜通過win32gui.FindWindow、win32gui.FindWindowEx等都未能定位到它,如果您這樣做成功瞭,也歡迎您留言告知。

我們不妨試試一個更簡單直接的方法,對照上圖,先捕獲到③過濾器的句柄,使用sendmessage方法輸入過濾條件(要登陸的系統名稱),激活該條件,此時我們的目標系統②就會自然處於第一位且被”高亮“,然後我們捕獲左上角①(登陸)的句柄,單擊它進入到系統登陸界面,後續的登陸代碼通過原生的SAP腳本錄制方法得到,您也可以使用”Tracker“工具來快速錄制出python下可用的SAP自動化代碼(小爬之前的文章中簡要介紹過該工具);

PS:

程序中要考慮SAP的啟動、系統雙擊打開等都需要一定的時間消耗,所以要添加延遲來解決,而延遲時間的長短可以通過while True的循環配合Try except方法來靈活調整,整個過程用python實現是這樣的:

#-Begin-----------------------------------------------------------------
#-Includes--------------------------------------------------------------
import sys, win32com.client
import win32api,win32gui,win32con,win32ui,time,os,subprocess
#-Sub Main--------------------------------------------------------------
def Main():
    sap_app = r"C:\Program Files (x86)\SAP\FrontEnd\SAPgui\saplogon.exe" #您的saplogon程序本地完整路徑
    subprocess.Popen(sap_app)
    time.sleep(1)
    flt=0
    while flt==0:
        try:
            hwnd = win32gui.FindWindow(None,"SAP Logon 740")
            flt=win32gui.FindWindowEx(hwnd,None,"Edit", None)  #capture handle of filter
        except:
            time.sleep(0.5)
    win32gui.SendMessage(flt,win32con.WM_SETTEXT,None,"R3生產系統")
    win32gui.SendMessage(flt,win32con.WM_KEYDOWN,win32con.VK_RIGHT,0)
    win32gui.SendMessage(flt,win32con.WM_KEYUP,win32con.VK_RIGHT,0)
    time.sleep(0.1)
    dlg = win32gui.FindWindowEx(hwnd,None,"Button", None) #登陸(0)
    win32gui.SendMessage(dlg,win32con.WM_LBUTTONDOWN,0)
    win32gui.SendMessage(dlg,win32con.WM_LBUTTONUP,0)
    
    SapGuiAuto = win32com.client.GetObject("SAPGUI")
    if not type(SapGuiAuto) == win32com.client.CDispatch:
        return
    application = SapGuiAuto.GetScriptingEngine
    if not type(application) == win32com.client.CDispatch:
        SapGuiAuto = None
        return
    
    connection = application.Children(0)
    if not type(connection) == win32com.client.CDispatch:
        application = None
        SapGuiAuto = None
        return
    time.sleep(2)
    flag=0
    while flag==0:
        try:
            session = connection.Children(0)
            flag=1
        except:
            time.sleep(0.5)
    if not type(session) == win32com.client.CDispatch:
        connection = None
        application = None
        SapGuiAuto = None
        return
    session.findById("wnd[0]/usr/txtRSYST-BNAME").text = "username" #此次放入您的SAP登陸用戶名
    session.findById("wnd[0]/usr/pwdRSYST-BCODE").text = "password"  #此次放入您的SAP登陸密碼
    session.findById("wnd[0]").sendVKey(0)
    """下面演示瞭使用mm03查看物料1000000000000的狀態後再退回sap首頁的過程"""
    session.findById("wnd[0]/tbar[0]/okcd").text = "mm03"
    session.findById("wnd[0]").sendVKey(0)
    session.findById("wnd[0]/usr/ctxtRMMG1-MATNR").text = "1000000000000"
    session.findById("wnd[0]").sendVKey(0)
    session.findById("wnd[1]").sendVKey(0)
    session.findById("wnd[0]/tbar[0]/okcd").text = "/n"
    session.findById("wnd[0]").sendVKey(0)
    #>Insert your SAP GUI Scripting code here<
#-Main------------------------------------------------------------------
if __name__ == "__main__":
  Main()
#-End-------------------------------------------------------------------

到此這篇關於使用Python完成SAP客戶端的打開和系統登陸的文章就介紹到這瞭,更多相關Python SAP登陸內容請搜索WalkonNet以前的文章或繼續瀏覽下面的相關文章希望大傢以後多多支持WalkonNet!

推薦閱讀: