Dear experts,
VB code:
Set oFunction = CreateObject("SAP.LogonControl.1")
Set oConnection = oFunction.NewConnection
oConnection.Client = "300"
oConnection.Language = "EN"
oConnection.User = "test"
oConnection.Password = "test001"
oConnection.ApplicationServer = "111.111.12.11"
oConnection.SystemNumber = "00"
result = oConnection.Logon(0, True)
Set ofun = CreateObject("SAP.FUNCTIONS")
Set ofun.Connection = oConnection
Set func = ofun.Add("RFC_READ_TABLE")
Error sentence when running:
Set func = ofun.Add("RFC_READ_TABLE")
Error information:
"Runtime error '1001' No connection to SAP system available."
Could you help me?
Thanks and regards,
collysun.