Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Wiesel am 12.11.09 - 09:07:57
-
Hallo!
Ich möchte aus einem geöffneten Dokument die Inhalte in ein anderes zu öffnendes Dokument packen.
Das ist grundsätzlich auch kein Problem. Nur die Kontrollkästchen machen mir ein Problem. Wenn hier nur ein Wert eingetragen ist, wird es übertragen. Wenn mehrere Werte vorhanden sind und ich mir das mal per MsgBox anschaue, dann werden die Werte per Semikolon getrennt. Das Kontrollkästchen trennt ja aber nach Komma. Wie kriege ich Mehrfachwerte nun übertragen?
Hier mal mein Script aus einer Schaltfläche:
Sub Click(Source As Button)
Dim S As New NotesSession
Dim DB As NotesDatabase
Dim NewDoc As NotesDocument
Dim Doc As NotesDocument
Dim WS As New NotesUIWorkspace
Dim UIDoc As NotesUIDocument
'Neues Dokument erstellen
Set DB = S.CurrentDatabase
Set NewDoc = DB.CreateDocument
NewDoc.Form = "Vorlage"
'Call NewDoc.Save(True,True,True)
Set UIDoc = WS.CurrentDocument
Set Doc = UIDoc.Document
'Felder übertragen
NewDoc.txtStatus = "in Arbeit"
NewDoc.chkDezernent = UIDoc.FieldGetText("chkDezernent") NewDoc.txtPersonen = UIDoc.FieldGetText("txtPersonen")
NewDoc.txtBetreff = UIDoc.FieldGetText("txtBetreff")
'Dokument zum Bearbeiten anzeigen
Call WS.EditDocument(True,NewDoc)
Call UIDoc.save
Call UIDoc.Close
End Sub
Das Feld chkDezernent ist das Kontrollkästchenfeld.
Wie setzt man das um?
Danke und erkältete Grüße,
Wiesel
-
Hallo,
Koenntest Du nicht einfach mit
doc.CopyItem(...)
das ganze loesen?
Andreas
-
NewDoc.chkDezernent = doc.GetItemValue("chkDezernent")
-
Hallo tks!
DAs klappt super! Da werden die Sachen ja quasi "blind" übertragen :o)