---

Hallo zusammen,

ich habe ein .net Programm und will daraus eine andere dll aufrufen.
Habe dies gefunden:

Public Function Execute ( _
libName As String, _
className As String, _
methodName As String, _
inputArgs As Object() _
) As Object

Also über sess.Execute(....)

Nun verzweifle ich ein bisschen daran.
Hat jemand ein Beispiel?

Danke.

------------------
Gruß

Michael

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Michael,

Willst Du eine Funktion aus einer .NET dll ausführen?

Dann funktioniert bei mir das folgende ganz hervorragend:

Code:

---

Assembly applicationLibAssy = Assembly.LoadFrom("<Pfad u. Name dll>"));
Type mainClass = applicationLibAssy.GetType("<Namespace u. Klassenname>");
mainClass.GetMethod("<Methodenname>").Invoke(null, new Object[] { <Argumente> });

---

(Sorry für's C#)

Gruß
Jan

------------------
Ingenieurbüro Jan Böttcher
www.ib-boettcher.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi habe jetzt folgendes probiert

        Dim dll As String = kr_konfig_dir & "\api\vb_dot_net\Einzelteilnummer.dll"
        Dim dummyobj(0) As Object
        dummyobj(0) = "1"

        Try
            sess.Execute(dll, "baseform", "", dummyobj)
        Catch ex As Exception
            lw.Open()
            lw.WriteLine(ex.Message)
        End Try

Das dummyobj ist weil ich keine iputArgs habe. Aber ohne geht es scheinbar nicht.

Jetzt bekomme ich folgende Exeption:
Exception while invoking method in managed code

Ideen? - Danke :-)

------------------
Gruß

Michael

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo little_ug,
mit ner *.exe funktioniert das Beispiel.
Vielleicht ja auch mit ner *.dll .
Habs nicht probiert.

"Learning by Doing" ist angesagt.

###############################################################################
Try
    'declare filename for Process()
    convertcmd.StartInfo.FileName = "*.exe"
    'declare arguments for Process()
    'convertcmd.StartInfo.Arguments = <MyArguments>
    'declare windowstyles for Process()
    convertcmd.StartInfo.WindowStyle = ProcessWindowStyle.Normal

    'start Process()
    convertcmd.Start()
    'if error occurs, check for reasons...
        Catch e As Win32Exception
        '...if executable file is not found...
        If e.NativeErrorCode = ERROR_FILE_NOT_FOUND Then
          '...throw error-messagebox
          System.Windows.Forms.MessageBox.Show((e.Message + ". Check the path."))
        Else
          '...permissions to execute the translator...
  If e.NativeErrorCode = ERROR_ACCESS_DENIED Then
  '...throw error-messagebox
  System.Windows.Forms.MessageBox.Show((e.Message + ". You do not have permission to save the destination file."))
End If
    End If
End Try
'wait for exit of Process()
convertcmd.WaitForExit()
'theSession.Parts.Work.Close(False, Part.CloseModified.CloseModified, Nothing)

###############################################################################

Gruß

Rolf

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Rolf,

funktioniert leider auch nicht....

------------------
Gruß

Michael

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Michael,

der dritte Parameter bei Session.execute() darf nicht leer sein. Da muß der Name einer Methode (Function oder Sub) drin stehen, die ausgeführt werden soll.
Daneben könnte es auch bei den Argumenten Probleme geben, wenn Typ und Anzahl nicht zur aufgerufenen Methode passen.

Der einfachste Weg ist jedoch, die dll zu referenzieren, genau so, wie es mit den NX- dll's geschieht. Referenz eintragen und über den Root- Namespace Klasse, Methode und gegebenenfalls die Argumente angeben, z.B.

Dim res As Rückgabetypderfunktion = root_namespace.class_name.function_name(arguments)

Gruß, Michael

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP