Das Notes Forum
Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: heidiweber am 15.05.06 - 17:08:37
-
Hallo
ich habe auf einer Maske einen Button. Wird dieser Button geklickt, so soll eine neue Maske mit Feldern aus der ursprünglichen Maske generiert werden.
Das ganze soll mit LotusScript finktionieren. Ich habe auch schon die Suche hier im Forum benutzt - aber irgendwie will das nicht...
Hier das Click-Ereignis vom Button:
Set doc = ws.CurrentDocument.Document
Set db = ws.CurrentDatabase.Database
Set newDoc = db.CreateDocument()
newDoc.Form = "projekt"
newDoc.AntragID = doc.UniversalID
ws.EditDocument True, newDoc
Die Felder haben auf beiden Masken die selben Namen, sind berechnet und haben den selben Namen als Formel. Das Häckchen auf der "neuen" Maske: "Formeln übernehmen Werte aus gewähltem Dokument" ist auch an.
Aber trotzdem funktioniert das nicht??
Was muss da noch gemacht werden?
Vielen Dank
cu
Heidi
-
Hallo
ist das Dokument schon gespeichert oder noch nicht?
-
Nein (glaube ich)
ich klicke auf den Button und es wird folgender Code ausgeführt:
Set doc = ws.CurrentDocument.Document
Set db = ws.CurrentDatabase.Database
Set newDoc = db.CreateDocument()
newDoc.Form = "projekt"
newDoc.AntragID = doc.UniversalID
ws.EditDocument True, newDoc
Vielen Dank
-
Wenn's nicht gespeichert ist, sind auch keine Inhalte im Backend. Schau mal in der Eigenschaftsbox die Felder in diesem Dokument nach...da wird nichts vorhanden sein.
Bin mir nicht ganz sicher ob uidoc.fieldgettext ohne Speicherung des Backenddoc. dir die Inhalte liefert. Ansonsten halt das Backendoc. zuerst speichern (call doc.save(true,true))
-
Wenn's nicht gespeichert ist, sind auch keine Inhalte im Backend. Schau mal in der Eigenschaftsbox die Felder in diesem Dokument nach...da wird nichts vorhanden sein.
Das ist nicht ganz richtig.
Man kann schon auch ohne Speicherung auf bestimmte Backend Inhalte zugreifen. In diesem Fall hätte es ausgereicht
die Zeile
ws.EditDocument True, newDoc
zu ergänzen durch
Dim uidoc as notesUidocument
Set uidoc = ws.EditDocument(True, newDoc)
uidoc.FieldSetText "DeinFeld",doc.GetItemValue("DeinFeld")(0)
Gruß Sascha
-
Vielen Dank an euch
Die Idee mit dem Speichern war nicht schlecht :)