outlook beim beenden unterbrechen??

Hallo,

ich will folgendes realisieren.

Outlook wird beendet, dann erscheint eine Frage, die mit ja/nein beantwortet werden kann und bei nein, soll sich outlook nicht schließen.

Ich habe bisher keinen passenden Ansatz gefunden und es so probiert, was jedoch auch nicht klappt:
1. outlook wird beendet
2. bei application_quit eine msgbox eingebaut
3. bei nein, wird eine batch-file gestartet, die outlook erneut startet

Das klappt jedoch nicht, da outlook ja bei script-ausführung noch nicht beendet ist.
[code]
Private Sub Application_Quit()
Dim Antwort As Integer
Antwort = MsgBox(\“Gesendete Emails verschoben?\“ + Chr(13), vbYesNo + vbExclamation + vbDefaultButton2, \“Warnung: Outlook wird beendet\“)
If Antwort = 7 Then
Dim appident As Object
appident = Shell(\“c:\\outlook.bat\“)
End If
End Sub
[/code]

Wer hat noch eine idee?

grüße
Ayko