Question

当我尝试下载一些表时，SAP RFC出现了问题。当我尝试创建连接时，出现以下错误：变量类型错误。

我检查了regedit注册表中的RFC，没关系。 IT安装了SAP 7.50，但是我无法使用该版本，因为它不允许我下载一些我需要的表，因此我要求将其降级到7.40版本的SAP。问题就从这里开始。

Public Sub conecta_sap()

    Set ctlLogon = CreateObject("SAP.LogonControl.1")
    Set funcControl = CreateObject("SAP.Functions")
    Set ctlTableFactory = CreateObject("SAP.TableFactory.1")
    Set objWindowsScriptShell = CreateObject("WScript.Shell")
    Set objConnection = ctlLogon.NewConnection

    objConnection.ApplicationServer = "XXXXXXXXXX"
    objConnection.SystemNumber = "30"
    objConnection.Client = "300"
    objConnection.Language = "PT"
    objConnection.USER = "RFC_LANCO"
    objConnection.Password = "XXXXXXXX"
    booReturn = objConnection.logon(0, True)

    If booReturn <> True Then
        MsgBox "Impossível conectar no SAP!"
        End
    End If

    funcControl.Connection = objConnection
    Set RFC_READ_TABLE = funcControl.Add("RFC_READ_TABLE")
    Set strExport1 = RFC_READ_TABLE.exports("QUERY_TABLE")
    Set strExport2 = RFC_READ_TABLE.exports("DELIMITER")
    Set tblOptions = RFC_READ_TABLE.Tables("OPTIONS")
    Set tblData = RFC_READ_TABLE.Tables("DATA")
    Set tblFields = RFC_READ_TABLE.Tables("FIELDS")

End Sub

当我到达此行时： funcControl.Connection = objConnection

我收到以下错误： “执行错误的时间错误'-2147352568（80020008）'：错误的变体类型”

有人可以帮我解决这个问题吗？

谢谢！

具有VBA的SAP RFC连接-错误的变量类型

0 个答案: