Skip to Content
0
Sep 16, 2005 at 05:18 AM

Error when connection SAP by RFC in VB code

508 Views

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.