<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" 'http://www.w3.org/TR/html4/loose.dtd"'>
<html><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"><title>Sending HTML email from your application</title><link rel="stylesheet" type="text/css" href="openacs.css"><meta name="generator" content="DocBook XSL Stylesheets V1.79.1"><link rel="home" href="index.html" title="OpenACS Core Documentation"><link rel="up" href="tutorial-advanced.html" title="Chapter 10. Advanced Topics"><link rel="previous" href="tutorial-css-layout.html" title="Laying out a page with CSS instead of tables"><link rel="next" href="tutorial-caching.html" title="Basic Caching"></head><body bgcolor="white" text="black" link="#0000FF" vlink="#840084" alink="#0000FF"><div class="navheader"><a href="http://openacs.org"><img src="/doc/images/alex.jpg" style="border:0" alt="Alex logo"></a><table width="100%" summary="Navigation header" border="0"><tr><td width="20%" align="left"><a accesskey="p" href="tutorial-css-layout.html">Prev</a> </td><th width="60%" align="center">Chapter 10. Advanced Topics</th><td width="20%" align="right"> <a accesskey="n" href="tutorial-caching.html">Next</a></td></tr></table><hr></div><div class="sect1"><div class="titlepage"><div><div><h2 class="title" style="clear: both"><a name="tutorial-html-email"></a>Sending HTML email from your application</h2></div></div></div><div class="authorblurb"><p>by <a class="ulink" href="mailto:jade@rubick.com" target="_top">Jade Rubick</a></p>
OpenACS docs are written by the named authors, and may be edited
by OpenACS documentation staff.
</div><p>Sending email is fairly simple using the acs-mail-lite
package. Sending HTML email is only slightly more complicated.</p><pre class="programlisting">
set subject "my subject"
set message "<b>Bold</b> not bold"
set from_addr "me@myemail.com"
set to_addr "me@myemail.com"
# the from to html closes any open tags.
set message_html [ad_html_text_convert -from html -to html $message]
# some mailers chop off the last few characters.
append message_html " "
set message_text [ad_html_text_convert -from html -to text $message]
set message_data [build_mime_message $message_text $message_html]
set extra_headers [ns_set new]
ns_set put $extra_headers MIME-Version [ns_set get $message_data MIME-Version]
ns_set put $extra_headers Content-ID [ns_set get $message_data Content-ID]
ns_set put $extra_headers Content-Type [ns_set get $message_data Content-Type]
set message [ns_set get $message_data body]
acs_mail_lite::send \
-to_addr $to_addr \
-from_addr $from_addr \
-subject $subject \
-body $message \
-extraheaders $extra_headers
</pre></div><div class="navfooter"><hr><table width="100%" summary="Navigation footer"><tr><td width="40%" align="left"><a accesskey="p" href="tutorial-css-layout.html">Prev</a> </td><td width="20%" align="center"><a accesskey="h" href="index.html">Home</a></td><td width="40%" align="right"> <a accesskey="n" href="tutorial-caching.html">Next</a></td></tr><tr><td width="40%" align="left">Laying out a page with CSS instead of tables </td><td width="20%" align="center"><a accesskey="u" href="tutorial-advanced.html">Up</a></td><td width="40%" align="right"> Basic Caching</td></tr></table><hr><address><a href="mailto:docs@openacs.org">docs@openacs.org</a></address></div><a name="comments"></a></body></html>