2016-08-08 3 views
0

Ich versuche, den Lotus Notes-E-Mail-Text in Word-Dokument einzufügen, und ich bin dabei fast erfolgreich. Aber wenn ich den Inhalt in Word einfüge, werden die Hyperlinks nicht angezeigt, sondern nur als Text. Unten ist was ich bisher versucht habe. Ich möchte, dass die Hyperlinks auch vom Text der E-Mail in das Word-Dokument eingefügt werden.Paste Lotus Notes E-Mail-Textkörper mit Hyperlink zu Word-Dokument

Set NSession = CreateObject("Notes.NotesSession") 
Set NMailDb = NSession.GetDatabase("", "") 


If Not NMailDb.IsOpen Then 

NMailDb.OPENMAIL 

End If 

Set NDocs = NMailDb.GetView(view) 
NDocs.Clear 


If filterText <> "" Then 

NDocs.FTSEARCH filterText, 0 

End If 

Set NDoc = NDocs.GetFirstDocument 


Do Until Left(NDoc.GETITEMVALUE("PostedDate")(0), 8) <> Left(Now(), 8) 

Set NNextDoc = NDocs.GetNextDocument(NDoc) 

If Left(NDoc.GETITEMVALUE("PostedDate")(0), 8) = Left(Now(), 8) Then 


    If InStr(3, NDoc.GETITEMVALUE("From")(0), "From", vbTextCompare) > 0 Then 


     Set NItem = NDoc.GetFirstItem("Body") 

     Set wrdApp = CreateObject("Word.Application") 
     Set wrdDoc = wrdApp.Documents.Open("C:\https.docm") 
     wrdApp.Visible = True 
     Set objSelection = wrdApp.Selection 

     objSelection.TypeText NDoc.GETITEMVALUE("Body")(0) 
+0

Welche Version von Notes, auf welcher Plattform und mit welcher Version von Word versuchen Sie dies? –

+0

Lotus Notes 8.5, Microsoft Word 2013 und Windows 7 - Systemtyp ist 64-Bit-Betriebssystem –

Antwort

0

Sie verwenden die GetItemValue-Methode in der NotesDocument-Klasse. Die documentation for this method sagt eindeutig, dass der Rückgabetyp, wenn diese Methode für ein Rich-Text-Feld verwendet wird, "Array von Zeichenfolgen. Der Text in dem Element, in Klartext gerendert."

Es ist sehr schwierig, formatierten Text aus einem Notes-Dokument zu erstellen. Dies erfordert die Tatsache, dass Notes zwei vollständig unterschiedliche Formate zum Speichern von formatiertem Text verwenden kann. Im MIME-Format ist es möglich, die NotesMIMEEntity-Klasse und die zugehörigen Methoden zu verwenden, um HTML-formatierten Text zu erhalten. Mit dem Rich-Text-Format bietet die NotesRichText-Klasse nur eingeschränkten Zugriff auf die Arbeit mit Rich Text und etwas Ähnliches wird wahrscheinlich am besten mit Tools von Drittanbietern wie der MIDAS Rich Text API ausgeführt.

+0

Danke Richard für die Antwort, ich weiß, NotesMIMEEntity kann verwendet werden, um den formatierten Text zu kopieren. Ich habe dies verwendet, um den Text der E-Mail zu erstellen, aber nicht mit dem Kopieren. Wenn Sie einen Code dazu haben, wird sehr sehr hilfreich sein. –

+0

Keine Eingaben noch ... –

Verwandte Themen