Das Notes Forum
Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: bandit am 29.04.04 - 09:38:57
-
Ich möchte im Web Dateien an Dokumente anhängen, so wie es ja unter Notes möglich ist z.B. in einem RichText Feld. Ist das irgendwie im Web möglich?
-
In Design Modus einer Maske
Menü Erstellen - Eingebettetes Element - Schaltfläche Datei laden
erzeugt den HTML Code für den File Upload.
Die Datei wird allerdings nicht in einem Feld sondern als V2Attachment gespeichert. D.h. das Ding wird in Notes dann am Ende des Dokuments angezeigt.
Wenn Du HTML kannst (das sollte man zumindest wenn man Web Anwendungen macht), kannst Du auch Durchgangs-HTML verwenden...
Andreas
-
Vielen Dank erstmal, hat gut geklappt!
Allerdings bekomme ich den angehängen Anhang nicht im Web zu sehen später, nur unter Notes. Wie bekomm ich das hin, dass der Anhang auch im Web sichtbar und speicherbar ist?
-
Standardmäßig werden V2Attachments im Web nicht angezeigt, sondern nur im Notes Client.
Damit diese auch im Web sichtbar sind, musst Du ein Feld namens
$V2AttachmentOptions
- Typ Text - implementierten, welches den Wert "1" hat.
Andreas
-
Super hat auch gefunzt!
Mehrere Dateien kann man damit aber nicht anhängen oder?
-
Nein.
Du kannst aber mehrere File Upload Schaltflächen hintereinander einbauen oder ein Tool aus der Sandbox verwenden
siehe dazu
http://www.atnotes.de/index.php?board=3;action=display;threadid=15471 (http://www.atnotes.de/index.php?board=3;action=display;threadid=15471)
Andreas
-
Ok alles klar. Eine Frage habe ich noch: kann ich solche Attechments auch von Notes aus erzeugen bzw. wieder herausnehmen?
-
Du könntest einen Notes 2 Client installieren ;D
Es geht, aber es ist tricky und nutzt ein "Issue" aus:
Beispiel:
Dim ws As New notesuiworkspace
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Dim rtitem As NotesRichTextItem
Dim object As NotesEmbeddedObject
Set uidoc = ws.CurrentDocument
Call uidoc.save
Set doc = uidoc.Document
Set rtitem = doc.GetFirstItem("Anhang" )
Set object = rtitem.EmbedObject ( EMBED_ATTACHMENT, "", "x:\test.txt")
Call doc.Save(True,True,True)
Call uidoc.Save
Der Witz ist, dass das Dokument im backend gespeichert wird bevor das UI Dokument gespeichert wird.
Das Löschen geht auch - siehe in der Hilfe
Call notesEmbeddedObject.Remove
Andreas
-
Vielen Dank für die Hilfe!
Mit den normalen Notes Client mitteln geht es also nicht...