Wir
beginnen mit einem einfachen Beispiel: Eine VB.NET Funktion wird aufgerufen und
gibt den Text "Hello VB!" zurück.
Sie gehen dazu wie folgt vor:
Legen Sie ein neues VB.NET Projekt an oder verwenden Sie ein bestehendes Projekt
Implementieren
Sie folgende Funktion, z.B. in einer Klasse "testclass.vb":
1
2
3
4
5
6
7
Public Function hellovb() As String
Dim returnstring As String = "Hello VB!"
Return returnstring
End Function
Geben Sie nun
den Pfad zu der DLL im GuiXT Profile an:
Kopieren Sie alle verwendeten DLL-Dateien in dieses Verzeichnis.
Wichtig: Die Datei guinet.dll, die im GuiXT Setup enthalten ist, muss sich ebenfalls in diesem Verzeichnis befinden.
Achtung: Beim Aufruf einer Funktion wird die DLL in den Speicher
geladen und die entsprechende Datei kann nicht überschrieben werden.
Beenden Sie erst alle SAP GUI Fenster, um eine geänderte Version zu
verwenden.
In einem
GuiXT Script oder InputScript rufen Sie die VB.NET Funktion über das
Schlüsselwort "CallVB" auf:
CallVB
msg = utilities.testclass.hellovb
message
"&V[msg]" -statuslineDas heißt:
Die VB.NET-Funktion "hellovb" der Klasse "testclass" der
Klassenbibliothek "utilities.dll" wird aufgerufen und das Ergebnis in die GuiXT-Variable V[msg] gestellt.
Falls Sie an dem Rückgabewert nicht
interessiert sind, dann können Sie eine VB.NET-Funktion einfach mit
CallVB
hellovb
aufrufen.
Als Ergebnis
erscheint eine SAP GUI - Nachricht mit dem Text aus der VB.NET Funktion: