Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Programm starten
zurück: Ordner anlegen per VBA weiter: Outlook Termin über eine Website einspeisen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
burn112
Heimwerker


Verfasst am:
09. Nov 2006, 15:55
Rufname:

Programm starten - Programm starten

Nach oben
       Version: Office 2003

Hi Leute!

Ich würde gern, wenn ich Outlook starte das gleichzeitig ein anderes Programm auch ausgeführt wird.

Wie kann man das realisieren?

Danke.

_________________
Stur lächeln und winken, denn sie hat nicht das Geringste gesehen.
burn112
Heimwerker


Verfasst am:
13. Nov 2006, 00:29
Rufname:


AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Ich habe inzwischen dafür eine Lösung selber gefunden.
Code:
Private Sub Application_Startup()
Shell ("C:\Ordner\Datei.exe")
End Sub

Was mir jetzt noch fehlt ist das , wenn ich Outlook wieder schließe das dann diese Anwendung auch wieder geschlossen wird.
Code:
Private Sub Application_Quit()
Shell ("C:\Ordner\Datei.exe") ???????
End Sub

Kann mir da einer weiter helfen. In der netten Outlook-Hilfe steht dazu nämlich nichts.

_________________
Stur lächeln und winken, denn sie hat nicht das Geringste gesehen.
Tastenjunkie
VB-Com-Addin Coder


Verfasst am:
15. Nov 2006, 11:22
Rufname:
Wohnort: um Augsburg rum....

AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Hallo Burn112,
das kommt darauf an, wie Deine Applikation getrimmt ist, die Du beenden möchtest. Das beste ist immer, die Applikation mit dem Befehl zu beenden, den die App anbietet, also z.b. App.exe /quit oder ähnliches, wenn vorhanden. Die Alternative ist, den Prozess hart zu beenden, was jedoch nicht selten zu Datenverlusten führt. Wenn Dir das egal ist, dann kannst Du z.B. mit
Code:

taskkill /f /im notepad.exe /t

den Prozess hart abschiessen. Dieser Befehl ist aber nur unter XP Pro vorhanden.
Alternative: mit pskill von Sysinternals. Damit kriegst Du alles weg...
Viel Glück,
Mike
burn112
Heimwerker


Verfasst am:
15. Nov 2006, 18:48
Rufname:

AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Du meinst also in dieser Form:

Code:
Private Sub Application_Quit()
Shell ("C:\Ordner\Datei.exe") / Quit
End Sub


?????????

Also hart möchte ich es eigentlich nicht beenden.

_________________
Stur lächeln und winken, denn sie hat nicht das Geringste gesehen.
Tastenjunkie
VB-Com-Addin Coder


Verfasst am:
15. Nov 2006, 22:19
Rufname:
Wohnort: um Augsburg rum....


AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Hallo,

nein, ich meite eher sowas wie:
Code:

Shell ("C:\Ordner\Datei.exe /Quit")

... wenn Deine .exe sowas unterstützt. Ansonsten wirst Du ums harte Beenden wohl nicht herumkommen... Ist das eine eigengestrickte .exe, oder ist das ein kommerzielles Programm?

Viel Glück,

-Mike
bst
Programmierer


Verfasst am:
16. Nov 2006, 17:27
Rufname: Bernd
Wohnort: Ilsfeld

AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Auch Hallo,

wie wär's mit sowas ?

cu, Bernd
--
Code:
Option Explicit

Private Declare Function OpenProcess Lib "kernel32" ( _
   ByVal dwDesiredAccess As Long, _
   ByVal bInheritHandle As Long, _
   ByVal dwProcessId As Long) As Long
   
Private Declare Function CloseHandle Lib "kernel32" ( _
   ByVal hObject As Long) As Long
   
Private Declare Function TerminateProcess Lib "kernel32" ( _
   ByVal hProcess As Long, _
   ByVal uExitCode As Long) As Long
   
Const PROCESS_TERMINATE = &H1

Sub StartIt()
   Dim lngTaskId As Long
   
   lngTaskId = Shell("notepad.exe")
   SaveSetting "myApp", "mySection", "ToKill", lngTaskId
End Sub

Sub StopIt()
   Dim lngTaskId As Long
   Dim lngHandle As Long
   Dim lngResult As Long
   Dim lngExitCode As Long
   
   lngTaskId = CLng(Val(GetSetting("myApp", "mySection", "ToKill", "0")))
   
   If lngTaskId Then
      lngHandle = OpenProcess(PROCESS_TERMINATE, False, lngTaskId)
      If lngHandle Then
         lngResult = TerminateProcess(lngHandle, lngExitCode)
         lngResult = CloseHandle(lngHandle)
      End If
      SaveSetting "myApp", "mySection", "ToKill", "0"
   End If
End Sub
Tastenjunkie
VB-Com-Addin Coder


Verfasst am:
16. Nov 2006, 21:38
Rufname:
Wohnort: um Augsburg rum....

AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Hi Bernd,
ist ja Interessant, Dein Ansatz.
Wenn ich das so überfliege, machst Du ja aber auch nur eine Art von "taskkill", nur ohne taskkill.exe, oder? Wink
Viele Grüße,
-Mike
bst
Programmierer


Verfasst am:
17. Nov 2006, 09:49
Rufname: Bernd
Wohnort: Ilsfeld

AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

Morgen Mike,

ja.

Einen schönen Tag noch,

Bernd
Gast



Verfasst am:
11. Dez 2006, 09:20
Rufname:


AW: Programm starten - AW: Programm starten

Nach oben
       Version: Office 2003

So gehts!

Code:
Private Sub Application_Quit()
Shell ("C:\Ordner\Datei.exe -stop")
End Sub
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Outlook Kalender: In Excel per VBA Outlook starten 2 ebro 1550 28. Nov 2012, 13:47
ebro In Excel per VBA Outlook starten
Keine neuen Beiträge Outlook Mail: Automatische Backup Programm gesucht 0 H 2002 87 03. Nov 2012, 12:21
H 2002 Automatische Backup Programm gesucht
Keine neuen Beiträge Outlook Mail: Bei Mail durch ext. Programm eine bestimmte Vorlage laden 3 jojolino 191 29. Sep 2012, 12:59
nimenn Bei Mail durch ext. Programm eine bestimmte Vorlage laden
Keine neuen Beiträge Outlook Mail: Senden aus Externen Programm 3 jawo 702 25. Apr 2012, 12:52
Andreas.Fischer Senden aus Externen Programm
Keine neuen Beiträge Outlook Mail: Outlook über remot starten 4 JBS 797 15. Okt 2011, 20:29
JBS Outlook über remot starten
Keine neuen Beiträge Outlook Mail: Wie den Posteingang mit UNGELESENE NACHRICHTEN starten? 4 gerhardmercator 1420 30. Aug 2011, 21:47
Gast Wie  den Posteingang mit UNGELESENE NACHRICHTEN starten?
Keine neuen Beiträge Outlook Kalender: Erinnerungen ohne Outlook zu starten 1 Gast 1411 13. Okt 2010, 19:42
Franzisk@ Erinnerungen ohne Outlook zu starten
Keine neuen Beiträge Outlook Kalender: Outlook Kalender im Hintergrund starten 2 Andre F. 1909 22. Jan 2010, 08:21
Andre F. Outlook Kalender im Hintergrund starten
Keine neuen Beiträge Outlook Mail: Vorlage von Menüleiste aus starten? 3 Gast 1719 05. Feb 2009, 11:47
Christi@n Vorlage von Menüleiste aus starten?
Keine neuen Beiträge Outlook Kontakte: programm zum sync von kontakten? 3 Gast 892 24. Okt 2008, 15:28
Gast programm zum sync von kontakten?
Keine neuen Beiträge Outlook Kalender: Kalenderdaten aus externem Programm lesen 0 Kanari 597 30. Jul 2008, 09:51
Kanari Kalenderdaten aus externem Programm lesen
Keine neuen Beiträge Outlook Hilfe: Outlook beim Windows-Start automatisch starten + minimieren 4 Gast 48458 27. Jun 2008, 23:58
Gast Outlook beim Windows-Start automatisch starten + minimieren
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: CSS Forum