Domino 9 und frühere Versionen > ND7: Entwicklung

Mailinhalt als XML-Datei speichern

<< < (2/4) > >>

m3:
Aus der Designer-Hilfe:

--- Zitat --- A note ID represents the location of a document within a specific database file, so documents which are replicas of one another generally have different note IDs. A note ID does not change, unless the document is deleted.
--- Ende Zitat ---
Ich denke, dass die Note-ID hier nicht unbedingt die "richtige" Wahl ist. Ich würde zur DocumentID greifen (mehrere Datenbanken, ...).

Jörg: Die Dinge, mit denen Du Dich bis jetzt beschäftigt hast, sind trivial. Denk erst mal über den "Export" nach, wie Du die Datei benennst, kannst Du Dir immer noch überlegen.

TRO:

--- Zitat von: m3 am 11.09.08 - 17:20:19 ---Aus der Designer-Hilfe:

--- Zitat --- A note ID represents the location of a document within a specific database file, so documents which are replicas of one another generally have different note IDs. A note ID does not change, unless the document is deleted.
--- Ende Zitat ---
Ich denke, dass die Note-ID hier nicht unbedingt die "richtige" Wahl ist. Ich würde zur DocumentID greifen (mehrere Datenbanken, ...).

--- Ende Zitat ---

Und wenn ich dann noch die Admin-Hilfe nehme

--- Zitat --- Komprimierung mit Hilfe einer Kopie
Bei der Komprimierung mit Hilfe einer Kopie wird eine Kopie der Datenbanken erstellt und die ursprünglichen Datenbanken werden nach der Komprimierung gelöscht, d. h. für die Datenbankkopien wird zusätzlicher Plattenplatz benötigt.

--- Ende Zitat ---
denke ich schon, dass da andere NoteIDs entstehen können (nicht müssen).

Anderes Szenario wo so was vorkommen kann: Wiederherstellung einer Datenbank aus einem Replica-Backup, z.B. in Clustern.

dirk_2909:
Hallo,

nur so mal in die "Tüte gesprochen"..

...würde es nicht genügen, das Memo/Mail (Notes-Dokument) als DXL-Datei zu exportieren und aus
der erzeugten DXL-Datei alle Body-tags weiterzuverwenden/auszulesen oder alle unnötigen Tags zu entfernen ?  :-:


--- Code: ---  Dim session As New NotesSession
  Dim db As NotesDatabase
  Set db = session.CurrentDatabase
 
  REM Open xml file named after current database
  Dim stream As NotesStream
  Set stream = session.CreateStream
  filename$ = "c:\dxl\" & Left(db.FileName, Len(db.FileName) - 3) & _
  "xml"
  If Not stream.Open(filename$) Then
    Messagebox "Cannot open " & filename$,, "Error"
    Exit Sub
  End If
  Call stream.Truncate

  REM Export doc as DXL
  Dim exporter As NotesDXLExporter
  Set exporter = session.CreateDXLExporter(docMemo, stream)
  Call exporter.Process
--- Ende Code ---

Ralf_M_Petter:
Das Problem ist wie immer bei solchen Fragestellungen, das der Thread Eröffner nicht sagt, warum er eine XML Datei braucht, bzw. was er damit machen will. Dadurch kann man auch nicht beurteilen, ob er mit DXL glücklich wird. Falls er die Anforderung nur von seinem Vorgesetzten so bekommen hat würde ich auf jeden Fall DXL nehmen, da die Anforderung erfüllt ist, auch wenn man unter Umständen mit dem XML nicht viel anfangen können wird.

Grüße

Ralf

Jörg K.:
So ich hab jetzt noch ein wenig probiert, dabei ist folgendes herausgekommen:

Sub Initialize
   
   On Error Goto Errorhandle
   
   Dim session As New NotesSession
   Dim vec As NotesViewEntryCollection
   Dim ve As NotesViewEntry
   Dim doc As NotesDocument
   Dim view As NotesView
   Dim xmlcode As String
   Dim filenum As Integer
   Dim filename As String
   
   filenum% = Freefile()
   filename = "C:\Freigaben\anmeldung\Anmeldung"  & "_" & Format(Now, "dd.mm.yyyy.hh.nn.ss") & ".xml"
   Open filename For Output As #filenum%
   
   Set view = session.CurrentDatabase.GetView("n_anmeldungen_offen")
   Set vec = view.AllEntries
   If vec.Count > 0 Then
      Set ve = vec.GetFirstEntry
      While ve Is Nothing = 0
         Set doc = ve.Document
         xmlcode = doc.GetItemValue ("Body")(1)
         Print #filenum%, xmlcode
         Set ve = vec.GetNextEntry(ve)
      Wend
      Close #filenum%
      Exit Sub
   End If
   
Errorhandle:
   
   Print "Fehler in Agent Anmeldungen umwandeln!" + Error$
   Exit Sub
   
End Sub

Soweit so gut, die gewünschte Datei wrid im gewünschten Pfad erstellt!
Nur wie soll ich sagen, es steht nichts drin, die Datei ist leer!
Ich hab angenommen wenn ich den xmlcode = doc.getItemValue ("Body")(1) dann wird der Inhalt des Body mit der Doppeleintrags-ID: 1 übernommen, das sollte der Mailinhalt sein, doch da scheine ich mich echt geirrt zu haben, irgendwo habe ich also noch einen Denkfehler!
Schade sonst funktionier alles so schön, für den Namen hab ich jetzt einfach Datum und Uhrzeit genommen das klappt auch super!
Aber warum ist di e doofe xml-Datei leer?


Gruß Jörg

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete