Domino 9 und frühere Versionen > Entwicklung

Inhalt von Richtextfelder in Excel exportieren

<< < (3/3)

animate:

--- Zitat von: koehlerbv am 03.06.04 - 21:49:45 ---Eingefügte Bilder in RTIs lassen sich AFAIK auch mit R6 nicht extrahieren.

--- Ende Zitat ---

doch, doch. das geht wunderbar einfach.
ich sag nur DXLExporter...

animate:

--- Zitat von: magpie1274 am 04.06.04 - 10:12:56 ---
Leider komme ich auch nicht dahinter, wie ich ein Attachment als File speichern kann.

--- Ende Zitat ---

das geht mit der NotesEmbeddedObject-Klasse. Methode ExtractFile()

magpie1274:
Super, danke Thomas läuft prima.
Ich hätte da dann noch eine Frage:
Wie starte ich denn ein Attachment mit Lotus Notes Script?

Gruß
Oli

TMC:

--- Zitat von: magpie1274 am 04.06.04 - 13:26:21 ---Wie starte ich denn ein Attachment mit Lotus Notes Script?
--- Ende Zitat ---

Hier ein Scriptauszug:

--- Code: ---Set rtitem = doc.getfirstItem( "Body" )
   If rtitem Is Nothing Then
      Exit Sub
   End If
   aEmbObj = rtitem.EmbeddedObjects
   strTempdir = WinTemp
   If Isarray(aEmbObj) Then
      Forall o In aEmbObj
         strFile = o.source
         o.ExtractFile( strTempdir & "\" &strFile )
         strFileToOpen= strTempdir & "\" & strFile
         Ret = ShellExecuteAny(GetDesktopWindow, "open", strFileToOpen, Byval 0&, Byval 0&, SW_SHOWNORMAL)
      End Forall
   End If
--- Ende Code ---
In den Declarations steht folgendes:

--- Code: ---Declare Function ShellExecuteAny Lib "shell32.dll" Alias "ShellExecuteA" _
(Byval hwnd As Long, Byval lpOperation As String, Byval lpFile As String, _
Byval lpParameters As Any, Byval lpDirectory As Any, Byval nShowCmd As Long) _
As Long
Declare Function GetDesktopWindow& Lib "user32" ()
Const SW_SHOWNORMAL = 10
--- Ende Code ---

Das Attachment wird hier in das Windows-Temp-Verzeichnis gelöst, (Zeile: strTempdir = WinTemp). Die Function gibts hier im Forum unter Tipps&Tricks.

magpie1274:
Vielen Dank an alle Helfer(innen),

funktioniert alles PRIMA, bis auf die Tatsache, dass man die Attachments via VBA in Excel ziehen muss.

Aber das ist halb so schlimm.  :D

Gruß
Oli

Navigation

[0] Themen-Index

[*] Vorherige Sete