Domino 9 und frühere Versionen > Entwicklung

object.filesize

(1/2) > >>

juebri:
Hallo,

ich habe einen Agenten in einer Datenbank erstellt, der Dateien aus einem Pfad in RT-Felder eines neuen Notes-Dokuments erstellt.

...
   Dim session As New NotesSession()
   Dim view As NotesView
   Dim doc As NotesDocument
   Dim db As NotesDatabase
   Set db = session.CurrentDatabase
   Set doc = db.CreateDocument
   doc.Form = "Dateiarchiv"   
....

   'Für jede Datei wird ein eigenes RT-Feld erstellt   
   Redim Datei(Ubound(DateiArray ))   
   For index = Lbound( DateiArray ) To Ubound(DateiArray )
      Set Datei(index) = doc.CreateRichTextItem("Datei" & index)
   Next

....

   'Die Dateien werden in die erstellten Felder kopiert
   If Isarray( DateiArray ) Then
      Redim Dateianhanggroesse(Ubound(DateiArray ) )
      
      For index = Lbound( DateiArray ) To Ubound(DateiArray )
         Set object = Datei(index).EmbedObject(EMBED_ATTACHMENT, "", TempOrdner & DateiArray(index))
         Print |Datei angehängt: | & TempOrdner & DateiArray( index )
      Next
   End If


Wenn ich nun in der Schleife des vorstehenden Absatzes folgenden Code eintrage:

msgbox object.name
msgbox object.filesize

dann wird der Name des Objekts angezeigt, als Dateigröße aber 0.

In dem Array Dateianhanggroesse(Ubound(DateiArray ) ) sollen nämlich die File-Größen hinterlegt werden.

Warum wirft der mit nicht die Filegröße aus.

Hat jemand eine Idee?

ata:
... versuch es mal mit CStr( object.FileSize )...

ata

koehlerbv:
Wurde Dein Doc denn schon gespeichert, wenn Du die Dateigrösse ermittelst ? Sonst ist die nämlich logischerweise 0.

Bernhard

juebri:
Das Dokument wurde noch nicht gespeichert, wird erst am Ende der Routine erfolgen. Nur, warum wirft object.name den Namen des Dateianhangs aus (auch wenn das Doc noch nicht gespeichert ist)?

Semeaphoros:
Warum nicht? Der ist ja schon bekannt. Die Dateilänge ist tatsächlich erst beim Speichern notwendig und ich vermute mal, dass Notes bei einem neuen Attachement die Datei tatsächlich erst beim Speichern einliest.

Andere Frage, woher kommen denn diese Attachements? Die müssen ja irgendwo im Dateisystem herumliegen und da liesse sich ja die Dateigrösse des Originals auslesen?

Navigation

[0] Themen-Index

[#] Nächste Seite