Domino 9 und frühere Versionen > ND7: Entwicklung

Anhang auf einer Seite austauschen (LS)

<< < (2/3) > >>

A+S:
Hallo!

Ich habe es jetzt mal mit einer Maske versucht, bin aber auch nicht viel weiter als vorher. Wahrscheinlich habe ich es auch nicht so umgesetzt wie Bernhard es ursprünglich gemeint hat.

Es wird jetzt beim Öffnen der Datenbank direkt die Maske angezeigt. Auf der Maske liegt jetzt direkt der Anhang. Allerdings habe ich die gleichen Probleme wie bei der Seite.
Ich habe es dann mit der NotesNoteCollection versucht. So sieht mein Code bis jetzt aus:

   Dim doc As NotesDocument
   Dim vFileName As Variant
   Dim varFile As Variant
   Dim session As New NotesSession
   Dim ws As New NotesUIWorkspace
   Dim db As NotesDatabase
   Dim nc As NotesNoteCollection   
   Dim Attachment As NotesItem
   
   vFileName = ws.OpenFileDialog(False, "Bitte Datei auswählen:", "Excel-Dateien|*.xls|Alle Dateien|*.*", "I:")
   
   Set db = session.CurrentDatabase
   
   Set nc = db.CreateNoteCollection(False)
   Call nc.SelectAllFormatElements(False)
   nc.SelectForms = True
   Call nc.BuildCollection
   
   Set doc = db.GetDocumentByID(nc.GetFirstNoteId)
   
   'Set Attachment = doc.GetFirstItem("$FILE")

   Set fso=createobject("Scripting.FileSystemObject")
   Set wsh=createobject("WScript.Shell")
   Set varFile=fso.getfile(vFileName(0))
   doc.ReplaceItemValue "DateLastModified", varFile.DateLastModified   
   doc.ReplaceItemValue "$FILE",vFileName
   Call doc.Save(True,False)

Prinzipiell ändert die Routine auch die angegebenen Values. Aber ehrlich gesagt habe ich keine Ahnung wie es jetzt weitergehen soll oder ob der Ansatz überhaupt korrekt ist.

MfG
Kai

koehlerbv:
Damit bist Du tatsächlich an der selben Stelle wie mit der Seite.
Ich meinte: Erzeuge EIN Dokument, basierend auf einer Maske. Und dann die ganz normalen Bordmittel verwenden: NotesRichTextItem, EmbeddedObjects, EmbedObject usw.

Bernhard

A+S:
Ich habe jetzt ein Dokument erstellt, muss jetzt aber mal ganz blöd fragen:

Wie kann ich das Dokument beim Starten der DB anzeigen lassen?  :-[

Driri:
Erstell von dem Dokument einen Dok-Link (Bearbeiten - Als Verknüpfung kopieren - Dokumentverknüpfung) und füg diesen in das "Über diese Datenbank"-Dokument ein.

In den Eigenschaften der DB stellst Du dann auf dem Tab mit der Rakete in den Startbedingungen auf "Erste Dokumentverknüpfung in "Über Datenbank"-Dokument" um.

A+S:
Danke!

Das hat schon mal super geklappt. Mal schauen ob der Rest auch so gut geht.

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete