Dateien an Dokument anhängen übers Web?

[bandit]

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?

[Glombi]

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

[bandit]

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?

[Glombi]

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

[bandit]

Super hat auch gefunzt!
Mehrere Dateien kann man damit aber nicht anhängen oder?

[Glombi]

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

Andreas

[bandit]

Ok alles klar. Eine Frage habe ich noch: kann ich solche Attechments auch von Notes aus erzeugen bzw. wieder herausnehmen?

[Glombi]

Du könntest einen Notes 2 Client installieren

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

[bandit]

Vielen Dank für die Hilfe!
Mit den normalen Notes Client mitteln geht es also nicht...