Dokument automatisch nach einer bestimmten Zeit schließen

[jens1979]

Hallo mal wieder,

Google und Bordsuche hat leider nix ergeben.

Wie kann ich ein Dokument nach einer bestimmten Zeit automatisch schließen? Bzw. ist das überhaupt möglich?

Danke schonmal

Jens

[jens1979]

Ich hab das ganze jetzt mit LS probiert ... aber mir ist irgendwie schleierhaft in welches event ich den packen soll.
Per Button funktioniert das ganze wunderbar.

Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument

Set uidoc = ws.CurrentDocument
Sleep(10)
uidoc.Close

[koehlerbv]

PostOpen sollte funktionieren.

Bernhard

[jens1979]

Leider nicht .... er bleibt in der Ansicht hängen und nach 10 Sekunden reagiert er wieder.

[koehlerbv]

Sorry - das war auch völliger Blödsinn, den ich da geschrieben habe.

Es sollte aber über ein Timer Event gehen. Such' mal in der DesignerHelp nach "Setting up a timer". Im Beispiel wird schon fast genau das beschrieben, was Du machen willst.
Wichtig ist nur, dass Du neben einer globalen Variablen für die abgelaufene Zeit unbedingt auch global ein Handle auf das betreffende UIDoc speicherst. Wenn der Timer zuschlägt, muss ja nicht gerade das zu schliessende Dokument im aktiven Fenster sein (der User könnte ja anders entschieden haben   und dann fällt eine ganz andere Tür automatisch wieder zu).

HTH,
Bernhard