Domino 9 und frühere Versionen > Administration & Userprobleme

email inkl. quelltext, mail header etc. exportieren

<< < (2/3) > >>

(h)uMan:
Im Designer den Agenten auswählen, dann das Register "Objekte" anklicken (Fenster unten links).

Im Abschnitt "(Options)" eintragen:
Option Public

Im Abschnitt "(Declarations)" nicht eintragen

Im Abschnitt "(Initialize)" eintragen:
Sub Initialize
  Dim workspace As New NotesUIWorkspace
  Dim uidoc As NotesUIDocument
  Dim doc As NotesDocument
  Dim collection As NotesDocumentCollection
   
  Set uidoc = workspace.CurrentDocument
  Set doc = uidoc.Document
   
  Dim sText As String
   
  ' Datei schreiben   
  Dim fileNumber%
  fileNumber% = Freefile
  Open "C:\Temp_blabla.tmp" For Output Access Write As fileNumber%
  Forall oItem In doc.Items
      sText = sText + oItem.Name +" : " +  oItem.Text + Chr(13) + Chr(10)
      Print #fileNumber%, oItem.Name +" : " +  oItem.Text      
   End Forall
   Close fileNumber%
   
   Dim TaskID   
   TaskID = Shell ("Notepad.exe C:\Temp_blabla.tmp", 3)   
   
End Sub

Im Abschnitt "(Terminate)" eintragen:
Sub Terminate
   
End Sub


Alle Einträge werden als Lotus Script ausgeführt.

Silent_Bob:
genauso habs ich gemacht.
"16 fehler gefunden"...

 :-[

ich hab mal ein screenshot gemacht. vielleicht siehst du ja ganz spontan den fehler.

danke trotzdem im voraus für die mühe

(h)uMan:
Hhmmm,

bin auch kein Entwickler. Vielleicht liegt hier die Ursache:

- Bei mir ist es kein gemeinsam genutzter Agent
- Agent wird manuell aus dem Menü Aktionen gestartet
- Gilt für ausgewählte Dokumente

Bei mir läuft das Script so prima ...

Grüße, Uwe

MartinG:
Bei mir funktioniert das exportieren problemlos. Einfach im Posteingang oder sonst in einer Ansicht das Mail markieren und dann unter DATEI - EXPORTIEREN als structured Text z.B. mail.txt eingeben und das Mail wird komplett inkl. Header exportiert...

eknori:
@SilentBob:

das hängt mit dem Kopieren aus dem Netz zusammen; hatte das auch schon ein paar Mal.
Am Anfang und/oder am Ende jeder Codezeile sind zusätzliche leerzeichen. Wenn du die rauslöscht bekommt die zeile wieder die gewohnte Farbe und der Code ist dann fehlerfrei.

eknori

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete

Zur normalen Ansicht wechseln