Home > Domino Tips > Developer > Java > How to return an HTML representation of a Lotus Notes rich-text field
Domino Tips:
EMAIL THIS
 TIPS & NEWSLETTERS TOPICS 

JAVA

How to return an HTML representation of a Lotus Notes rich-text field


Philip West
12.11.2007
Rating: -3.41- (out of 5)


Lotus Notes, Domino, Workplace and WebSphere tips and advice
Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us    Add to Google


VIEW MEMBER FEEDACK TO THIS TIP
This Java code will return an HTML version of a Lotus Notes rich-text field to the calling routine. Exceptions are handled via an excellent logging tool from Openntf.org.

Related resources from SearchDomino.com:
Expert Advice: Creating a rich-text field in Lotus Domino that only accepts doclinks

Expert Advice: Copying a rich-text field with attachments to a Lotus Notes document

FAQ: Java for Lotus Notes Domino

Java for Lotus Notes Domino Reference Center

This Java code relies on being able to create a Lotus Notes document in the current Domino database using a form called MimeConvert.

The rich-text source field is appended to the RichTextField class on the MimeConvert form. Next, the Lotus Notes document is saved and then read as an InputStream; which gives an HTML representation of the entire page. Finally, the body is split away from the rest of the HTML page, leaving the HTML representation of the original RichTextField.

import lotus.domino.*;
import java.net.*;
import java.io.*;

public class HTMLConverter{
// standard logging object 

private OpenLogItem oli = new OpenLogItem();  
  // Method. parameters are the Server & 
Database to open that will be used to do the conversion, 
normally the current db; the NoteID of the document 
and the fieldname to load into our converter
 public String getHTML(Database thisdb, 
Document sourceDoc, String fieldName)
 throws NotesException, IOException {
   try{
 
// get the field that we need to examine
RichTextItem sourceField = (RichTextItem)
sourceDoc.getFirstItem(fieldName);

// 
// Prepare a simple document in this database 
to store the richtextfield we want to convert to HTML
  
Document newND = thisdb.createDocument();  
newND.appendItemValue("Form","MimeConvert");  
RichTextItem newRTItem = newND.
createRichTextItem("RichTextField");
newRTItem.appendRTItem(sourceField);
newND.save( true,true,true);

// get the URL that will open that document
URL docURL =new URL(newND.getHttpURL());

// Get document as an HTMLstring as seen by
 the current domino server  
BufferedReader bin = new BufferedReader 
( new InputStreamReader(docURL.openStream() )); 
   
// tidy up
newRTItem.recycle();
newND.recycle();

// Convert the datastream into a string...
String line; 
StringBuffer sb = new StringBuffer();

while ( (line = bin.readLine( )) != null ) { 
sb.append(line);
} 
String fullPage = sb.toString();

// fullPage now contains the HTML of the entire 
page but we only want the bit between the body tags.
String[] passOne = fullPage.split("</body>");
String[] body =passOne[0].
split("<body text="#000000" bgcolor="#FFFFFF">");

return body[1]; // this should contain 
only the text between the body tags.  

}
catch (Exception e) {
 oli.logError(e);
return null;
 }

 }
 }
 

MEMBER FEEDBACK TO THIS TIP

It is possible to accomplish the same thing with a LotusScript function:

Sub AppendNotesLink(db As notesdatabase,
rtitem As NotesRichTextItem,NotesUrL As String)
                        
'# =================================
===================================
==================#
 'Auteur : Mostapha El yagoubi
'Date : 14/12/2007
 'Description :  'Sous outlook, 
les liens Notes:// ne sont pas
 cliquables lorsqu'on 
les colle en appendtext dans un 
richtextitem

 'Cette fonction permet de 
contourner le problème
 en créant un champ MIME temporaire
       
'On colle ensuite son contenu dans le richtext 
initial envoyé 
en paramètre (Methode Appendrtitem)
'# =============================
===========
===========================
====================#
                        
 '\* Déclarations
Dim tmpDoc As notesdocument
Dim tmpRtitem As NotesRichTextItem
Dim stream As NotesStream      
Dim mime As notesmimeentity
Dim EtatMime As Boolean
                        
On Error Goto TrtErreur
                        
'\* Création du doc temporaire 
(on ne l'enregistre pas)
Dim session As New notessession
Set tmpDoc = db.CreateDocument             
                        
'\* Création du richText 
temporaire au format MIME  = 
on y colle le lien Notes://
Set mime = tmpDoc.
CreateMIMEEntity("Body")         
Set stream = session.CreateStream             
Call stream.WriteText(|<u>
<Font size="1" face="Arial" color="0000FF">
<a href="|  & NotesUrL  & |">| & Lcase(NotesUrL) 
& |</a></font></u>|)
Call mime.SetContentFromText(stream,
 "text/html", ENC_NONE)               
 EtatMime = session.ConvertMime
session.ConvertMime =
 True   '\ 
Autoriser la conversion le  MIMEen rich text
Call tmpDoc.
CloseMIMEEntities(True, 
"Body")
Set tmpRtitem = tmpDoc.GetFirstItem
("Body")
                        
'\* On colle le
 MIME dans le richtext
Call rtitem.Appendrtitem
(tmpRtitem)
session.ConvertMime = 
EtatMime  '\ 
On remet le flag mime a l'etat ou on
 l'avait trouvé
                        
Sortie :
Exit Sub
                        
TrtErreur:  '\* En cas d'erreur on 
ne fait rien on 
sort mâme si le lien doc n'est pas 
créé
                        Print "Erreur " 
& Cstr(Err) & " -> " & 
Error$( Err ) & " à la ligne " 
& Erl & " : AppendNotesLink"
                        Resume Sortie
End Sub

—Mostapha E.

******************************************

I tried to implement this for a project, but encountered several limitations. The routine worked only in Java (LS2J) and only on the Lotus Domino server.

To obtain the same results faster -- in LotusScript and/or Java and on the local database and/or Lotus Domino server -- set the storage content on the rich-text field of the second tab under "field properties" to "HTML and MIME."

There's no need to fetch the actual page using an HTTP socket, and the extra HTML tags, i.e. <html> and <body>, are parsed out.
—Thierry D.

Do you have comments on this tip? Let us know.

This tip was submitted to the SearchDomino.com tip library by member Philip West. Please let others know how useful it is via the rating scale below. Do you have a useful Lotus Notes, Domino, Workplace or WebSphere tip or code snippet to share? Submit it to our monthly tip contest and you could win a prize.

Rate this Tip
To rate tips, you must be a member of SearchDomino.com.
Register now to start rating these tips. Log in if you are already a member.


Submit a Tip




Digg This!    StumbleUpon Toolbar StumbleUpon    Bookmark with Delicious Del.icio.us    Add to Google


RELATED CONTENT
Java
Java code shortens strings in a SQL table
How to execute a stored procedure in Lotus Notes Domino using Java
Shrink Lotus Notes databases with many attachments
Converting Lotus Notes Domino Web pages to PDF files with a Java agent
A bevy of Notes/Domino development tips
Converting Web pages to images using Java
Creating Microsoft Word documents from Lotus Notes
FAQ: Java for Lotus Notes and Domino
Automatically scan Lotus Notes database document attachments for viruses
Creating PDF documents from Lotus Notes

Java for Lotus Notes Domino
Java code shortens strings in a SQL table
How to execute a stored procedure in Lotus Notes Domino using Java
Top 10 Lotus Notes Domino programming and development tips of 2007
Shrink Lotus Notes databases with many attachments
Converting Lotus Notes Domino Web pages to PDF files with a Java agent
Developing Eclipse plug-ins for Lotus Notes and Domino -- 7 tips in 7 minutes
A bevy of Notes/Domino development tips
Converting Web pages to images using Java
Creating Microsoft Word documents from Lotus Notes
Sending and logging faxes from Lotus Notes and Domino

RELATED RESOURCES
2020software.com, trial software downloads for accounting software, ERP software, CRM software and business software systems
Search Bitpipe.com for the latest white papers and business webcasts
Whatis.com, the online computer dictionary

DISCLAIMER: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.

HomeNewsTopicsITKnowledge ExchangeTipsAsk the ExpertsMultimediaWhite PapersDomino IT Downloads
About Us  |  Contact Us  |  For Advertisers  |  For Business Partners  |  Site Index  |  RSS
SEARCH 
TechTarget provides enterprise IT professionals with the information they need to perform their jobs - from developing strategy, to making cost-effective IT purchase decisions and managing their organizations' IT projects - with its network of technology-specific Web sites, events and magazines.

TechTarget Corporate Web Site  |  Media Kits  |  Reprints  |  Site Map




All Rights Reserved, Copyright 1999 - 2008, TechTarget | Read our Privacy Policy
  TechTarget - The IT Media ROI Experts