Domino 9 und frühere Versionen > Entwicklung

Anhang von einem Dokument in ein anders kopieren

(1/3) > >>

rar:
Hallo Leute,

ich habe ein Dokument mit 4 Bodyfeldern. Irgendwo in diesem Bodywirrwarr steht etwas Text und ein Anhang.
Mein Ziel ist den Anhang in ein rtf eines neuen Dokumentes zu kopieren.
Bei meinen Versuchen bin ich auf 2 Probleme gestoßen:

1.) Ich habe es mit dem folgendem Code probiert:
strTemp = Environ("Temp") +"\c.daten.notes\"
Set rtItem = New NotesRichTextItem( docNew , "Body" )
Forall x In doc.EmbeddedObjects
   If x.Type = EMBED_ATTACHMENT Then
      Call x.ExtractFile( strTemp + x.Source )
      Call rtItem.EmbedObject( EMBED_ATTACHMENT, "" , strTemp + x.Source )
   End If
End Forall
Beim Forall kommt aber die Fehlermeldung Type mismatch. In der Hilfe wird aber die Kombination Forall und doc.EmbeddedObjects verwendet. ???

2.) Muss ich echt den Anhang lösen um ihn in ein anderes Dokument zu kopieren oder gibt es eine einfachere Lösung?

lG
-daniel

koehlerbv:
Nimm NotesItem.CopyItemToDocument (notesDocument, newName$). Dann brauchst Du Dich um die Attachments nicht mehr zu kümmern, wenn welche drin sind.

HTH,
Bernhard

rar:
Ich habe aber 4 Bodyfelder, von denen ich nur das eine mit dem Anhang brauch. Und davon nur das Attachement (ohne Text)...

Wenn ich das NotesItem befülle, brauch ich ja das GetFirstItem.
Ein GetNextItem gibt es doch nicht?!
Irgendwie läufts heut bei mir nicht  :-\

-daniel

koehlerbv:
Sorry, dann habe ich Dich mistverstanden. Dann musst Du doch den Anhang lösen - eines der Items spearat wirst Du nicht via LS greifen können.

Bernhard

rar:
Danke. Somit ist die 2te Frage beantwortet.

Wenn ich aber den Anhang lösen möchte, stoß ich auf den blöden Type mismatch beim Forall....
Wie kann ich denn sonst noch auf den Anhang zugreifen?

Navigation

[0] Themen-Index

[#] Nächste Seite