Das Notes Forum
Domino 9 und frühere Versionen => ND8: Administration & Userprobleme => Thema gestartet von: Hedwig14 am 16.11.10 - 13:13:25
-
Hallo,
folgendes Script habe ich im Postopen eines Dokumentes eingestellt.
Es soll beim Start des Dokumentes ein Dateianhang in das RT-Feld einstellen.
Leider ist der Dateianhang nicht sichtbar. Eine Fehlermeldung bekomme ich nicht.
Was mache ich denn falsch ?
Sub Postopen(Source As Notesuidocument)
Dim w As New NotesUIWorkspace
Dim s As New NotesSession
Dim db As NotesDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim rtitem As NotesRichTextItem
Dim object As NotesEmbeddedObject
Set db = s.CurrentDatabase
Set uidoc = w.CurrentDocument
Set doc = uidoc.Document
Set rtitem = New NotesRichTextItem( doc, "DG_Dateianhang_1" )
Set object = rtitem.EmbedObject( EMBED_ATTACHMENT, "", "c:\GiroPreisÜbersicht.xls")
Call doc.Save(True,True)
Call uidoc.Refresh
-
Im Backend veränderte Richtextitems sind erst nach Schließen und Öffnen des Dokuments sichtbar.
Falls das Dokument bereits existiert, würde ich die Datei im Queryopen anhängen.
Falls das Dokument neu erstellt wird, würde ich das Dokument über eine Schaltfläche erstellen lassen, und darin das Anhängen der Datei vor dem Öffnen des Dokuments durchführen.
-
Hallo,
Ein Call uidoc.Refresh() sollte hier nicht ausreichen.
Das uidoc muss komplett neu geladen werden.
Stellt sich jedoch die Frage, was soll bei einem neuen Dokument passieren, welches der Anwender letztendlich nicht gespeichert haben moechte.
Andreas
-
das stimmt ! Ich möchte erreichen, dass das Dokument mit dem Dateianhang angelegt wird. Möglichst ohne speichern. Wenn der User das Dokument abbricht habe ich sonst Datenmüll produziert.
Aber gibt es eine Möglichkeit den Dateianhang beim Erstellen des Dok. mitzugeben ?
Oder bin ich auf dem Holzweg ?
-
Hallo Peter,
der Dateianhang ist nach dem Speichern im Dokument vorhanden. Aber das steht ganz unten und nicht im RT-Feld ????
-
der Dateianhang ist nach dem Speichern im Dokument vorhanden. Aber das steht ganz unten und nicht im RT-Feld ????
Wie hast Du das Dokument erstellt?
Aber gibt es eine Möglichkeit den Dateianhang beim Erstellen des Dok. mitzugeben ?
Du baust Dir eine Schaltfläche zum Erstellen des Dokuments. Da nimmst Du Dein Script zum Anhängen der Datei mit auf (ohne doc.Save) und dann öffnest Du das Dokument mit workspace.EditDocument
-
Wunderbar es hat geklappt !
Vielen Dank ich bin restlos begeistert !
Gruss
Hedwig !