Fragen beim Schließen der Datenbank verstört Navigation

[T-LO]

Der Benutzer soll vor dem Schließen einer Anwendung gefragt werden, ob er das auch tatsächlich will. Folgender Code sollte funktionieren, zerstört aber leider die Navigation im linken Rahmen (z.B. Diskussionsdatenbank). 

Hat jemand einen Tipp für mich?

Sub Queryclose(Source As NotesUIDatabase, Continue As Variant)
   Dim ws As New NotesUIWorkspace
   Dim askme As Integer
   askme = ws.Prompt (PROMPT_YESNO, _
   "", "Möchten Sie die Anwendung wirklich verlassen?")
   Continue = (askme=1)
End Sub

[Glombi]

Was heisst denn "zerstört"?

Hast Du die Rahmen auch korrekt benannt, also NotesNavigator für den Navigationsrahmen und NotesView für den Rahmen, der Ansichten anzeigt.

Andreas

[m3]

Ach, die arme verstörte Navigation.

Wie äußert sich denn deren "Verstörung"? Gibts ev. einen Screenshot, weil normal ist das nicht.

[T-LO]

Ich habe zum Test das Skript in eine Standard-Diskussions-DB eingestellt. Sonst habe ich nix geändert.

Die Zerstörung ist die alte Anzeige aller Ansichten im linken Rahmen statt der Seite mit der Gliederung.

[Glombi]

Hast Du die Rahmen auch korrekt benannt, also NotesNavigator für den Navigationsrahmen und NotesView für den Rahmen, der Ansichten anzeigt

[T-LO]

Hallo Glombi,

das ist bei der Standard-Diskussions-DB schon so vorbelegt.

[it898ur]

In welchem Frame läuft denn der Code ?

Die fenster werden in der gleichen Reihenfolge abgebaut wie aufgebaut (links oben nach rechts unten), d. h. hier ist der Navigationsframe wohl schon zu, als der Code den Abbruch erzwingt und Notes versucht das "auszugleichen".
Der Abbruchcode sollte idealerweise im ersten Frame (i. d. R. die Navigationsseite) liegen, damit es keine Problem gibt.

Gruß

André

[T-LO]

Das Skript läuft im Queryclose der Datenbank. Im Queryclose der Seite mit der Navigation ist es zwar ein bisschen unsauber, läuft aber ohne Probleme.

Ich werde das mal als Workaround so einsetzen.