EXE mit VB öffnen

[Ganymed]

Hallo,

ich möchte eine extene Anwendung über VB öffnen.

Dies soll über Codierung geschehen.

Hat jemand den passenden Befehl? Mit Open geht es irgendwie nicht.

[Fallin]

Moin!

Probiere es doch über die Shell Funktion!

Syntax: Shell(pathname[,windowstyle])

Der Windowstyle gibt an, wie das Prog geöffnet werden soll (versteckt, mit Focuserhalt...)

[Ganymed]

Hört sich nicht schlecht an!

Danke, das versuche ich mal!

[Schneeflocke]

Hi, du muss erst einen Verweis auf die Excel 10.0 Library setzen, dann kannst du folgendes anwenden:

Dim XL as Excel.Application

Set XL = Excel.Application

XL.visible = True

XL.workbooks.open Pfad

:marine

SF

[Technician]

Original geschrieben von Schneeflocke

Hi, du muss erst einen Verweis auf die Excel 10.0 Library setzen, dann kannst du folgendes anwenden:

Dim XL as Excel.Application

Set XL = Excel.Application

XL.visible = True

XL.workbooks.open Pfad

:marine

SF

Derartiges funktioniert allerdings nur mit Office-Anwendungen.

Der Shell-Befehl öffnet alle Anwendungen.

Um ein beliebiges Dokument (mit der von Windows zugeordneten Anwendung) zu öffnen, kannst du außerdem so vorgehen:

Du erstellst auf der Form ein OLE-Objekt; wenn beim "Zeichnen" des Objekts ein Fenster aufpoppt, auf ABBRECHEN klicken.

Das OLE-Objekt setzt du bei den Eigenschaften auf unsichtbar.

Dann erstellst du dir noch eine Schaltfläche, fügst ihr folgenden Code hinzu

Private Sub Command1_Click()

    OLE1.CreateLink "D:\Daten.dat"

    OLE1.DoVerb

End Sub

und schon öffnet die Schaltfläche die Datei "D:\Daten.dat" (dass man anstelle von "D:\Daten.dat" auch eine Variable setzen kann - das brauch ich wohl nicht näher zu erläutern ).

Grüße,

Technician