пропозиції роботи
konto usunięte
Temat: Logowanie do SAP za pomocą VB w sposób jawny
Założyłem nowy wątek odnośnie logowania do SAPponiżej zamieszczam zmodyfikowany kod (otrzymny dzięki uprzejmości Kacpra).
Kod wywołuje okno logowania (SapGui i loguje do SAPa w sposób jawny)
Sub logowanie()
Call Shell("C:\Program Files\SAP\FrontEnd\SAPgui\saplogon.exe")
Set SapGui = GetObject("SAPGUI")
Set Appl = SapGui.GetScriptingEngine
'zamiast ("NP2 [Eastern Europe]" wprowadź nazwę systemu
Set Connection = Appl.Openconnection("NP2 [Eastern Europe]", True)
Set session = Connection.Children(0)
'poniżej wprowadzamy UserID
session.findById("wnd[0]/usr/txtRSYST-BNAME").Text = "*******"
'Hasło:
session.findById("wnd[0]/usr/pwdRSYST-BCODE").Text = "********"
'jeżeli nie mamy zapisanego domyślnie języka - kod języka logowania
session.findById("wnd[0]/usr/txtRSYST-LANGU").Text = "PL"
session.findById("wnd[0]").sendVKey 0
End Sub
pasuje jeszcze dorobić okno do wpisania hasła, jeżeli nie podamy go w kodzie (tak dla bezpieczeństwa)...może kiedyś dorobię ten moduł
znalazłem kog, który sprawdza - czy jesteś zalogowany - a jeśli nie - to loguje...przerobię i wrzuceBartłomiej C. edytował(a) ten post dnia 11.12.09 o godzinie 07:54
