James Bott wrote:You have to build the logo into the HTML just like any webpage.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE id=ridTitle>Nature</TITLE>
<META http-equiv=Content-Type content="text/html; charset=windows-1252"><BASE
href="file://C:\Program Files\Common Files\Microsoft Shared\Stationery\">
<STYLE><!-- body { font-family: Trebuchet MS, Verdana; font-size: 10pt; color: #333399; margin-top: 5px; margin-left: 30px; } img { margin-top: 5px; margin-left: -30px; } --></STYLE>
<META content="MSHTML 6.00.6000.16414" name=GENERATOR></HEAD>
<BODY id=ridBody bgColor=#f4f4f4 background="Nature Bkgrd.jpg"><IMG id=ridImg
src="anabnr2.gif" align=bottom>
<P></P>
<DIV> </DIV>
<P></P></BODY></HTML>
// Purpose: Demonstrate the creation of a letterhead email.
// Author: James Bott
/* Note: You have to create the .HTM file using FW code--you can't just pass
a message. The message has to be already in the HTML code.
*/
#include "fivewin.ch"
#include "mail.ch"
function main()
local oMail,cMsg,cTo,cAddress,cSubject
cTo:="James Bott"
cSubject:="Test letterhead mail"
DEFINE MAIL oMail ;
SUBJECT OemToAnsi(cSubject) ;
TO cTo, cAddress;
FILES "c:\fw\mapisend\lhead.htm","lhead.htm";
FROM USER
ACTIVATE MAIL oMail
IF oMail:nRetCode#0
MsgAlert("The message could not be sent!","Error " + alltrim(cValToChar(oMail:nRetCode#0)) )
ELSE
//MsgInfo("Message sent successfully!")
ENDIF
return nil
BASE href="file://C:\Program Files\Common Files\Microsoft Shared\Stationery\
James Bott wrote:Enrico,
In your test did you set the path properly using this line from the sample above?
- Code: Select all Expand view RUN
BASE href="file://C:\Program Files\Common Files\Microsoft Shared\Stationery\
It needs to be set to the path of the images.
James
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 46 guests