Per WinExec Verknüpfte Dateien öffnen

[Stephan Blezinger]

Ich möchte aus einem Programm heraus, z. b. mit den Befehlen <b>Shell</b> (VBA - weiss gehört nicht hierher - ist aber egal) oder <b>WinExec</b> (Delphi) nicht eine Programm(datei) aufrufen (das geht ohne Problem), sondern Verknüpfungen aktivieren, also etwa bei einer DOC-Datei das zugehörige Programm damit starten (also z. B. Word) oder - darum gehts jetzt konkret

mit dem Aufruf von <b>mailto:Email@Adresse</b> das <b>Standard-EMail-Programm</b> starten.

Das geht mit den oben genannte Befehlen nicht.

Wie gehts denn doch?

Für Tips dankt

Stephan Blezinger

[Thomas Melchert]

<p>Hallo,<br>
<br>
such mal hier im Forum nach dem Begriff <b>ShellExecute</b>. Zum o.g. Problem gibt's dazu genügend Beispiele.<br>
<br>
Gruß Thomas</p&gt

[Stephan Blezinger]

ob ich ws falsch mache? - der Suchbegriff <b>ShellExecute</b> ergibt keine Suchergebni

[Patrick Sack]

<br>Hi,...
<br>
<br>also ich habe mal ShellExecute eingegeben und habe 111 Ergebnisse bekommen.
<br>
<br>Folgende Option sollte markiert sein:
<br>Das gesamte Entwickler Forum durchsuchen
<br>
<br>
<br>MfG
<br>P

[Stephan Blezinger]

ich war a weng bleed - 'tschullijung...

tatsächlich - mit ShellExecute funktionierts!

Ich hab in nem Demoprogramm zwar regelmässig Zugriffsverletzungen, aber die werd ich vielleicht in den Griff kriegen.

Preisfrage: Gibts die gleiche Funktion in VBA auch implementiert, oder muss man da auf die API-Funktion zugreifen

[Patrick Sack]

<br>Hi,...
<br>
<br>ich vermute mal du hast das mit dem shell() schon getestet und es hat <br>nicht funktioniert. Dann veruch mal in VB:
<br>Declare Function apiShellExecute Lib "shell32.dll" Alias _
<br> "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As _
<br> String, ByVal lpFile As String, ByVal lpParameters As _
<br> String, ByVal lpDirectory As String, ByVal nShowCmd As _
<br> Long) As Long
<br>und der Aufruf ist analog zum Delphi demo
<br>
<br>MfG
<br>P

[Stephan Blezinger]

<b>Danke Patrick </b>- das isses wohl, was ich benötige!

In der Tat - mit Shell() hats genausowenig funktoniert win mit WinExec() in Delphi - damit kann man offenbar nur Programmdateien aufrufen.

Schöne Weihnachten wünscht

Stephan Blezinge

[Stephan Blezinger]

doch noch ne Frage zu ShellExecute in VB-Umgebungen (ich finde hier kein Forum, das sich damit beschäftigt - schon wieder was übersehen?)

Wie lautet die korrekte Deklaration in <b>16 Bit </b> (Access 2 - sowas gibts noch...)

[Patrick Sack]

<br>Hi,...
<br>
<br>16-Bit
<br>
<br>Declare Function ShellExecute Lib "SHELL" (ByVal _
<br> hwnd As Integer, ByVal lpszOp As String, ByVal lpszFile _
<br> As String, ByVal lpszParams As String, ByVal lpszDir As _
<br> String, ByVal fsShowCmd As Integer) As Integer
<br>
<br>MfG
<br>P

[Stephan Blezinger]

Danke Patrick