Lotus Notes Embedded View - Spielen Sie mit ausgewählten Dokument
Wir haben viele Wege zu nutzen Lotus Notes Embedded View in Form für Anwender einfach zu doc Kind verwenden. Lassen Sie uns sagen, dass Sie aus irgendeinem Grund ein Formular mit einer eingebetteten Ansicht, dass eine Reihe von Dokumenten Listen haben. Sie möchten einem der Dokumente in der eingebetteten Ansicht markieren und in den Griff bekommen dieses Dokuments und tun Sie etwas mit ihm. Dies ist, wie ich es gelöst (mit etwas Hilfe bilden die IBM developerWorks Foren).
Schritt 1
In der Ansicht, dass in das Formular eingebettet ist, fügen Sie die folgende Formel Code "Target Frame (Klick)":
@ SetEnvironment ("eViewSelection"; @ Text (@ DocumentUniqueID))
Was hier passiert, ist, dass eine Umgebungsvariable namens "eViewSelection 'gesetzt ist, wenn Sie auf ein Dokument in der Ansicht mit dem Text-Wert des Dokuments eindeutige ID. Im Detail bedeutet dies, dass eine Zeile hinzugefügt oder aktualisiert in notes.ini das sieht etwa so aus:
$ EViewSelection = 00C2635582348362C125737F003C09AD
Schritt 2
Wenn Sie irgendwo auf dem Formular müssen Sie einen Halt des Dokuments (auf einen Wert daraus zu ziehen oder mailen Sie es als Referenz oder etwas anderes) zu bekommen, vielleicht mit Hilfe von LotusScript auf eine Schaltfläche, können Sie es, indem Sie zunächst den Zugang zu dem Wert der Umgebungsvariablen, die beim Anklicken das Dokument in der Ansicht und später, es zu benutzen war. Hier ein Beispiel:
Sub Click (Source As Button)
On Error Goto ErrorHandler
Dim Session As New NotesSession
Dim db As NotesDatabase
Dim selectedDocID Als NotesDocument
Dim selectedDocIDString As String
Set db = session.CurrentDatabase
selectedDocIDString = session.GetEnvironmentString ("$ eViewSelection", False)
Wenn (selectedDocIDString <> "") Then
Set selectedDocID = db.GetDocumentByUNID (selectedDocIDString)
Sonst
Msgbox "Sie haben ein Dokument wählen!"
Exit Sub
End If
'Set-Umgebungsvariable, um leere Zeichenkette bereit zu sein für den nächsten Lauf
Rufen session.SetEnvironmentVar ("$ eViewSelection", "")
Exit Sub
ErrorHandler:
"Protokollfehler
Msgbox "Ein Fehler ist aufgetreten"
Exit Sub
End Sub
Betrachtet 7206 mal von 2220 Zuschauern
