Problens with images on the web

HCL Domino Domino Forum
1

I have the following ocde in the webqueryopen agent:

Dim sesion As New NotesSession

Dim doc2  As NotesDocument

Set doc2 =  sesion.DocumentContext

'Set sesion = NotesSession.CurrentSesion

Dim cdb As NotesDatabase

Set cdb = sesion.CurrentDatabase

Dim columnas As NotesView

Set columnas = cdb.GetView("cols")

Dim doc As NotesDocument

Set doc = columnas.GetFirstDocument

Dim rt As NotesRichTextItem

Set rt =  doc.GetFirstItem("Texto")

Dim rtFoto As NotesRichTextItem



str1 =  rt.GetUnformattedText

str1 = Left$( str1,500)

Set rt = doc.GetFirstItem("Foto")

Set rtfoto = doc2.GetFirstItem("Foto1")

rtfoto.AppendRTItem rt 

Set rt = doc2.GetFirstItem("Texto1")

rt.AppendText str1+"[<BR>]"

rt.AppendDocLink doc,"Ver Mas...", "Ver Mas..."

The problem is that the images got corrupted on the "Foto1"field…

2

Subject: The site, to check

To see what i am talking about you can see www.beisbolicos.com (a baseball related site),the pictures that are shown in the first spot are resources images inside the RTF field, but when the image is emmbeded (? pasted with copy/paste) the image is corrupted and not shown in the web bu it is shown on the notes client.

Thanks in advace for yout support.

Carlos de Luna Saenz