Moin Moin!
Ich such mir hier nen Wolf in der Hilfe..
ich will nen notesitem auf Platte ablegen....
(nen Bild aus nem Richtext Feld)
Hat wer ne Idee?
Moin Moin!
Ich such mir hier nen Wolf in der Hilfe..
ich will nen notesitem auf Platte ablegen....
(nen Bild aus nem Richtext Feld)
Hat wer ne Idee?
Hol dir den Anhand per GetEmbeddedObject und dann kannst du es per ExtractFile auf der Platte speichern
Jo, besten Dank!
Bin ich jetzt blind, oder muß man da zwingend den namen des objekts angeben?
weil der ist mir nicht bekannt..
Ja muss man oder du gehst durch die Eigenschaft EmbeddedObjects des Dokumentes bzw des RichTextItems durch
jo, danke dir!
Arks, nun wirds doch kompliziert..
ich krieg keine Infos zu dem Item...
Also nochmal von vorne - vll zäum ich das Pferd ja mal wieder von hinten auf:.
Ich habe n dokumente die jeweils ein richtextfeld haben in das per c&p ein Bild eingefügt wurde (und nur das bild, nichts weiter).
dieses Bild würd ich nun gerne auf platte speichern.
Hat wer nen Lösungsansatz?
Hi!
das hab ich aus der Hilfe! Vielleicht hilft das weiter.
Nimmt alle EmbeddedObjects das angebebenen RichTextFeldes und speichert das Objekt auf Platte. Wenn nur ein Bild drin ist...
Dim doc As NotesDocument
Dim rtitem As Variant
'...set value of doc...
Set rtitem = doc.GetFirstItem( "Body" )
If ( rtitem.Type = RICHTEXT ) Then
Forall o In rtitem.EmbeddedObjects
If ( o.Type = EMBED_ATTACHMENT ) Then
Call o.ExtractFile( "c:\samples\" & o.Source )
Call o.Remove
Call doc.Save( False, True )
End If
End Forall
End If
Findest du unter: NotesRichTextItem
Eigenschaft: EmbeddedObjects
Jo, danke für deine Mühe..
aber da schmeißt er immer direkt nen Fehler da die Eigenschaft "EMBEDDEDOBJECTS" der Variant leer ist.
Auch unter doc/items/%Feldname% steht klar drin das das Feld nichts enthält.
Strange^10.
Hab jetzt mal selber ne Maske erstellt mit einem RT Feld.
Hab mit druck nen screen gemacht und den dann per strg-v eingefügt.
Auch ohne erfolg - kam ich auf diesem Wege nicht wieder ran...
Muß ich am Ende das RT Feld binär auslesen?
Es kann auch sein, daß die Dateien nicht an einem RichTextItem sondern am Dokument hängen.
Überprüf also auch mal beim Dokument die Eigenschaft EmbeddedObjects
Ebenfalls leer.....
zum mäuse melken....
Dann ist der Anhang wohl in einer nicht standardisierten Variante abgespeichert.
Dann ist meines Wissens die C-Api die einzige Möglichkeit da ran zukommen
Ist mein Notes zerschossen?
Wenn einer Zeit hat kann er es ja mal testen.
eine maske mit nem rt feld.
aus der zwischenablage nen Screenshot einfügen (nicht als anhang).
dann versuchen das dingen auszulesen..
ich will einfach nicht wahrhaben das bei mir irgendwas anders sein soll als sonst.
Nein ist es nicht.
Ein per Copy & Paste eingefügtes Bild kann nicht direkt per Script auf die Platte gespeichert werden.
Hierfür müsstest du wie schon gesagt über C-Api Funktionen arbeiten
Aber ein Anhang ist etwas anders wie ein einbegettetes Bild!
Ihr redet gerade aneinander vorbei.
Ohne Garantie, ob es funktioniert!
Eventuell bekommst Du es mit Base64 Decode / Encode hin. Mir war bisher der Aufwand zu groß und ich habe es nicht wirklich gebraucht - habe also nicht damit herumexperimentiert.
Hast Du ein Feld, in dem nur dieses Bild liegt und nichts anderes? Dann könnte es auch über die Zwischenablage und OLE-Automation gehen.
Gruß
Dirk
Jo, nur ein Bild - sonst nichts..
Wühl mich gerade durch die Stream Klasse und schau ob ich damit weiter komme.
Zwischenablage ist auch ne Idee.
C fällt für mich mangels kenntnisse flach =(
Ich dank euch auf jeden Fall.
Jetzt weiß ich wenigstens das ich auf dem falschen Weg war und verschwende nicht weiter Zeit auf diesem
Stream Klasse geht da leider auch nicht
jo, hab ich nun auch festgestellt
Ich weiß ich weiß - wer nicht hören will muß fühlen....
Wieder 3 Stunden meines Lebens verschwendet...