I am trying to connect to SAP via RFC objects:
Dim sap As Object
Set sap = CreateObject("SAP.Functions.unicode")
sap.connection.system = "xxxxxxxx"
sap.connection.Client = "700"
sap.connection.User = "USER"
sap.connection.Password = "PASS"
sap.connection.Language = "EN"
If sap.connection.Logon(1, False) <> True Then 'Try Logon
MsgBox "Cannot Log on to SAP"
End If
'*************************************************************
'Define the table specifics
'************************************************************
Dim objRfcFunc As Object
Set objRfcFunc = sap.Add("RFC_READ_TABLE") 'IN THIS LINE MY ERROR OCCURS
Internal application error - runtime error:61704
Any solutions?
It seems like my connection is OK. Could you check my connection variables?
...Logon(1,False)
instead of...Logon(0,False)
? (it's a hWND argument, to refer to a Windows dialog window, but I always saw people use0
; note that the boolean is for silent exceptions) – Sandra Rossi