Ja hier
also bei mir war es folgendermaßen: Ein (Antwort)Dokument soll über eine eingebettete Ansicht in einem anderen (Eltern)Dokument angezeigt werden und nur dort bearbeitet werden können, wenn das (Eltern)Dokument im Bearbeitenmodus ist.
Ich habe im QueryOpenDocument-Ereignis der zu verwendeten eingeb. Ansicht folgendes gemacht:
'/**
' * Handler für den queryOpendocument Event. Öffnet das Dokument in einer Dialogbox
' */
Public Function queryOpenDocument(Source As Notesuiview, Continue As Variant)
' Errorhandler pipapo
' Variablen pipapo
If [(Eltern)Dokument nicht im Bearbeitenmodus] Then readOnly = True
Do ' stellt sicher, dass eine Eingabeprüfung verwendet werden kann
If workspace.DialogBox( doc."Form"(0),True,True,True,False,False,readOnly,"Titel", doc,True,True) And Not readOnly Then
If Not [eingabeprüfung hier] Then
[Meldung ausgeben]
Else
checked = True
Call doc.save( false, false )
[Änderungen evtl. an (Eltern)Dokument weitergeben]
Call workspace.ViewRefresh()
End If
Else
Exit Do
End If
Loop Until checked
continue = False ' damit das Dokument nicht zusätzlich als eigenes Tab geöffnet wird
End Function
Sollte klappen, sobald du es an deine Bedürfnisse anpasst. Bei mir funktioniert's wunderbar.
Jetzt musst du natürlich sicherstellen, dass dein Dokument nicht anderweitig geöffnet werden kann, als über diese Methode in der Ansicht ---