Liebe/-r Experte/-in,
ich versuche mit VBA eine Verbindung in unserem Netzwerk zu SAP herzustellen.
Dazu habe ich zum Testen der Verbindung folgenden Code benutzt:
Function SAPBUCHUNG()
’ on error resume next
SAP_USER = „xxxxxxxxxxxxxx“
SAP_MANDANT = „yyyyyyyyyyyyyyy“
SAP_SYSTEM = „zzzzzzzzzzzzzzzzzz“
SAP_SYSTEMNUMBER = „qqqqqqqqqqqqqqqqq“
SAP_CODED_PWD = „pwpwpwpwpwpwpw“
Set FunctionCtrl = CreateObject(„SAP.Functions“)
Set sapConnection = FunctionCtrl.Connection
sapConnection.ApplicationServer = SAP_SYSTEM
sapConnection.SAPRouter = SAP_Router
sapConnection.SystemNumber = SAP_SYSTEMNUMBER
sapConnection.Client = SAP_MANDANT
sapConnection.Language = „DE“
sapConnection.RFCWithDialog = „0“
sapConnection.User = SAP_USER
sapConnection.Password = SAP_CODED_PWD
If Not sapConnection.logon(0, True) Then
MsgBox „Error on Logon.“
Else
MsgBox „Logon successfull“
End If
If ( loggedOn ) Then
sapConnection.LogOff
End If
MsgBox „Logout“
End Function
Ich erhalte allerdings als Rückmeldung (Laufzeitfehler) u.a. folgendes:
Code: 800A01AD
Fehler: ActiveX-Komponenten kann kein Objekt erstellen: ‚SAP.Functions‘
Ich habe leider keine Ahnung, wo ich den Fehler suchen muss - im Script, in der SAP-GUI-Installation, in der Micrsosoft-Installlation.
Kann mir hier jemand einen Tipp geben?
Danke im Voraus,
Ptonka