Folgende Aufgabe
Es soll eine Verbindung mittels Visual Studio 2017 (Vb.Net) hergestellt werden.
Folgen Konstellation ist vorhanden Win10 X64
SapGui 760 P5
In dem VB Projekt habe ich die folgenden Referenzen gesetzt
Interop.SAPFEWSELib.dll
Interop.SapROTWr.dll
Wenn ich nun Testweise eine Verbindung herstelle
(Sap Gui ist gestartet und eine Session aktiv) bekomme ich jedoch immer nur Nothing bei der Variable „SapGuilRot“ ?
Hier der Code ich verstehe es echt nicht mehr.
Mit nem blöden VBA klappt es sofort.
Thema verschoben und CodeTags gesetzt ~VaporiZed
Es soll eine Verbindung mittels Visual Studio 2017 (Vb.Net) hergestellt werden.
Folgen Konstellation ist vorhanden Win10 X64
SapGui 760 P5
In dem VB Projekt habe ich die folgenden Referenzen gesetzt
Interop.SAPFEWSELib.dll
Interop.SapROTWr.dll
Wenn ich nun Testweise eine Verbindung herstelle
(Sap Gui ist gestartet und eine Session aktiv) bekomme ich jedoch immer nur Nothing bei der Variable „SapGuilRot“ ?
Hier der Code ich verstehe es echt nicht mehr.
Mit nem blöden VBA klappt es sofort.
VB.NET-Quellcode
- Imports SAPFEWSELib
- Imports SapROTWr
- Imports System
- Imports System.Collections.Generic
- Public Sub SAP_Connect()
- Dim sapROTWrapper As SapROTWr.CSapROTWrapper = New SapROTWr.CSapROTWrapper()
- Dim SapGuilRot As Object = sapROTWrapper.GetROTEntry("SAPGUI")
- Dim engine As Object =
- SapGuilRot.[GetType]().InvokeMember("GetScriptingEngine",
- System.Reflection.BindingFlags.InvokeMethod, Nothing, SapGuilRot,
- Nothing)
- Dim connection As GuiConnection = (TryCast(engine, GuiApplication)).OpenConnection("BOX DESCRIPTION")
- Dim session As GuiSession = TryCast(connection.Children.ElementAt(0), GuiSession)
- End Sub
Thema verschoben und CodeTags gesetzt ~VaporiZed
