SAP 使用 RFC_CALL_TRANSACTION RFC VB 捕獲數據

Question

我變成了一個錯誤代碼 1001，一個 SAP Remote 錯誤？

我用谷歌搜索了很多，但沒有找到任何東西。 也許有人知道這里的問題是什么。 我使用 SAP 720。

System.Runtime.InteropServices.COMException (0x000003E9): SAP Remote Function Call bei Microsoft.VisualBasic.CompilerServices.LateBinding.LateGet(Object o, Type objType, String name, Object[] args, String[] paramnames, Boolean[] CopyBack) bei Microsoft.VisualBasic.CompilerServices.NewLateBinding.LateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack) ...

這是我的代碼：

    Public FunctionCtrl As Object
    Function login_Call()
    Try

        Dim conn As Object
        FunctionCtrl = CreateObject("SAP.Functions")
        conn = FunctionCtrl.Connection


        conn.System = XXX
        conn.ApplicationServer = XXX
        conn.SystemNumber = XXX
        conn.Client = "XXX"
        conn.user = XXX
        conn.Password = XXX
        conn.Language = XXX
        'needed for frontend dialog
        conn.RfcWithDialog = True

        'log on with logon dialog
        If Not conn.Logon(0, 1) Then
            Dim WsShell
            Dim intText As Integer
            WsShell = CreateObject("WScript.Shell")
            intText = WsShell.Popup("Logon not succesful." & vbCrLf & _
                               "will be closed automatically in one minute...", 60)
            'conn = Nothing
            Anmeldung_Call = False
            Exit Function
        End If
        Anmeldung_Call = True

    Catch ex As Exception

        Anmeldung_Call = False
    End Try
    Me.Text = DateTime.Now.ToString()
End Function

Sub Open_IW73()
    Dim BdcTable As Object
    Dim RfcCallTransaction As Object
    Dim Messages As Object
    Dim count As Integer

    'call transaction IW73
    RfcCallTransaction = FunctionCtrl.Add("RFC_CALL_TRANSACTION")
    RfcCallTransaction.Exports("TRANCODE") = "IW73"
    RfcCallTransaction.Exports("UPDMODE") = "S"
    BdcTable = RfcCallTransaction.Tables("BDCTABLE").....

錯誤出現在這一行：“RfcCallTransaction = FunctionCtrl.Add("RFC_CALL_TRANSACTION")”

謝謝

Answer 1

我有同樣的錯誤。 人們提出了不同的修復方法，例如使用 SAP.functions.Unicode。 對我來說只是簡單地更改為“RFC_CALL_TRANSACTION_USING”。 我不確定這些命令之間的確切區別，所以要小心。 到目前為止，它一直對我有用。