204
08-03-2005, 11:34 AM
Hello,
I want to send an email automaticly to an e-mail address with Jmail. If someone checkes the checkbox "vanger" then must a asp file send an email to me.
Here's the code in the asp file that I have now. But it doesn't work. Can you help me with it, what am I doing wrong?
if vanger == JA then
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.infracom.nl"
JMail.Sender = "email@my.nl"
JMail.Subject = "NB TEST"
JMail.Priority = 1
JMail.body = ""
JMail.AppendText ("<link rel='stylesheet' type='text/css' href='http://www.MY.nl/css/bestelbevestiging_raven.css' />")
JMail.AppendText ("<body bgcolor='#FFFFCD' link='#003200' vlink='#003200' alink='#003200' text='#003200'>")
JMail.AppendText ("<p><p><font face='Verdana' size='2' color='#003300'><a target='_blank' href='http://www.MY.nl'><img border='0' src='http://www.MY.nl/images/logo.jpg'></a></p>naam: "&Request.Form.Item("T2")&",<BR> "&Request.Form.Item("T9")&"<br></font>")
JMail.ContentType = "text/html"
JMail.execute
Loop
JMail.ContentType = "text/html"
on error resume next
JMail.execute
Thanx 204
I want to send an email automaticly to an e-mail address with Jmail. If someone checkes the checkbox "vanger" then must a asp file send an email to me.
Here's the code in the asp file that I have now. But it doesn't work. Can you help me with it, what am I doing wrong?
if vanger == JA then
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.infracom.nl"
JMail.Sender = "email@my.nl"
JMail.Subject = "NB TEST"
JMail.Priority = 1
JMail.body = ""
JMail.AppendText ("<link rel='stylesheet' type='text/css' href='http://www.MY.nl/css/bestelbevestiging_raven.css' />")
JMail.AppendText ("<body bgcolor='#FFFFCD' link='#003200' vlink='#003200' alink='#003200' text='#003200'>")
JMail.AppendText ("<p><p><font face='Verdana' size='2' color='#003300'><a target='_blank' href='http://www.MY.nl'><img border='0' src='http://www.MY.nl/images/logo.jpg'></a></p>naam: "&Request.Form.Item("T2")&",<BR> "&Request.Form.Item("T9")&"<br></font>")
JMail.ContentType = "text/html"
JMail.execute
Loop
JMail.ContentType = "text/html"
on error resume next
JMail.execute
Thanx 204