>Create Cursor ycurs (num i,Description m,img c(100)) &&your table with image field >Insert Into ycurs Values(1,"zezzz erere ererer ererer erererere ere ww",Getpict()) &&replace by real image location in your table/cursor >Insert Into ycurs Values(2,"zqqqqqq erere ererer ererer erererere ereg",Getpict()) >*.... >Locate >Local m.x,m.ext as string >m.x="<table>" >Scan > m.ext=Justext(img) > If Lower(m.ext)=="jpg" > m.ext="jpeg" > Endi > m.x=m.x+[<tr><td>]+Trans(num) +[</td><td>]+Description+[</td><td><img src='data:image/]+m.ext+[; base64,]+Strconv(Filetostr(img),13)+[')> </td></tr>] >Endscan >Use >m.x=m.x+"</table>" > >Local m.myvar >TEXT to m.myvar textmerge noshow ><style> >table, th, td { > border: 1px solid tomato; >} ></style> ><<m.x>> >ENDTEXT >Set Safe Off >Local m.lcdest >m.lcdest=Addbs(Sys(2023))+"ytemp.html" >Strtofile(m.myvar,m.lcdest) > >Local m.oo >m.oo=Newobject("hyperlink") >m.oo.NavigateTo(m.lcdest) >m.oo=Null >I have now seen your answer - thanks a lot