Lotus Notes / Domino Sonstiges > OLE/COM-Programmierung

Mal wieder das Thema Export nach WORD

<< < (7/12) > >>

klaussal:
Das Doc, das du da bearbeitest, ist schon abgespeichert ?

Was steht lt. Debugger in o.Name ?

C_T:
Hm merkwürdig

im  debugger kann ich unter Variablen kein o finden, jedoch geht er bis zu der zeile

"     Call o.ExtractFile( "c:\test\" & o.Name )"

doch er geht nuir eimal in die Forall schleife, obwohl 4 dokumente in dem rtfeld eingefügt sind...

Axel:
Füge mal in die Schleife die Zeile

Msgbox o.Name

ein.

Dann müsste er dir die Namen der Anhänge anzeigen.


Axel

klaussal:
Folgender Code (nicht schön) funktioniert !


--- Code: ---Sub Click(Source As Button)
Dim rtitem As NotesRichtextItem
Dim doc As NotesDocument
Dim ws As New NotesUIWorkSpace
Dim uidoc As NotesUIDocument
Set uidoc = ws.currentDocument


Set doc = uidoc.document

Set rtitem = doc.GetFirstItem( "rt" )
If ( rtitem.Type = RICHTEXT ) Then
Forall o In rtitem.EmbeddedObjects
If ( o.Type = EMBED_ATTACHMENT ) Then
Call o.ExtractFile( "c:\austausch\" & o.Name )
End If
End Forall
End If
End Sub
--- Ende Code ---

Deshalb wiederhole ich meine Frage:
Ist das Dokument bereits gespeichert ?

C_T:
So ich habe die Textbox eingefügt und diese wird laut debugger zwar ausgeführt, jedoch nicht angezeigt....


Des weiteren ja das DOkument ist gespeichert. Ich rufe diesen Code aus einer Ansicht auf und bearbeite alle markierten Dokumente... Siehe weiter oben...(immernoch selbes Projekt)

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete