Domino 9 und frühere Versionen > ND8: Entwicklung

Beim Kopieren eines Dokuments in Ansicht soll altes Dokument markiert bleiben

<< < (2/2)

iukhdh:
Nur zur Vollständigkeit:

Bei Todes Code hat noch im oberen Bereich ein wenig gefehlt, so funktioniert es einwandfrei. Es war die View noch nicht berechnet

Sub Click(Source As Button)
   
   Dim session As New notessession
   Dim db As notesdatabase   
   Dim col As NotesDocumentCollection
   Dim doc As notesdocument
   Dim doc2 As notesdocument
   Dim nuiw As New NotesUIWorkspace
   Dim nuiview As NotesUIView
   
   Set db = session.currentdatabase
   Set nuiview = nuiw.CurrentView
   
   'holt die ausgewählten Dokumente
   Set col = db.UnprocessedDocuments

...
   
   '************************************
   Call doc2.Save(True,False)
   
   Call nuiview.SelectDocument(doc)   
   Call nuiw.ViewRefresh
   
End Sub

Navigation

[0] Themen-Index

[*] Vorherige Sete