Outlook 2007 not accepting HTML mail fra .asp forms

morten444
morten444 used Ask the Experts™
on
Hi
We have a cms running on our Windows 2000 Server using some .asp forms that are sent to the owners outlook 2007.
The problem is that when sending a mail with danish caracters it does not look right
If I send:
lærere går længre øst
It looks correct in Outlook 2003, Thunderbird and webmail

But in Outlook 2007 it looks like this:
lfrere ger lfngre xst

My Understanding is that Outlook 2007 is not able to show HTML mails the same way as the previous version and I therefore belive our form are sending in HTML and not Plain Text

We are using SoftArtisans.SMTPMail to send the form

My Question is that I have no clue where to start.
Is this a asp coding issue, setting in softartisans SMTPmail or something else.

I have attached an example of the form if that can give any idea where to look in order to get it to send in plain text instead of html

Hope anyone can help

Kind Regards
Morten
<!--#include file="UnQuote.inc"-->
<!--#include file="Connect.asp"-->
<!--#include file="killNonNum.asp" -->
 
<%
If IsNumeric(Request("FormID")) then
	set rs = Conn.Execute("SELECT * FROM tblForm WHERE FormID = " & killNonNum(Request("FormID"),0) & "")
	set rsField = Conn.Execute("SELECT * FROM tblFormField WHERE FormID = " & killNonNum(Request("FormID"),0) & "")
else
	response.Redirct "Default.asp"
end if	
if not IsEmpty(Request.Form("Submit")) then
 
	' Mail bliver sendt
 
  	Set mailer = Server.CreateObject("SoftArtisans.SMTPMail")
 
	rem ------------------------------------
  	rem - Get  version number
 	rem ------------------------------------
 
  	strVer = Mailer.Version	
 
  	mailer.RemoteHost = "smtp.mvb.net"
 
	
  		mailer.FromAddress = "no-reply@e-advice.dk"			
 
 	mailer.AddRecipient "" , rs("MailAdress")
 	
  	mailer.Subject = "Request from Web form"
  		'Løber alle formfelter i gennem
  		For Each x in Request.Form
  			Content = Content & x & vbCrLf & Request.Form(x)& vbCrLf & vbCrLf
  		Next
  	mailer.BodyText = Content
		    			 
  	rem ----------------------------------------------------
  	rem -- Sends the message and  verify if it has been sent.
  	rem -----------------------------------------------------
		
	strErr = ""
  	If mailer.SendMail then 
     		strErr = NewLine(rs("ConfirmText"))
  	Else
     		strErr = "Mail failure." & mailer.response
  	End If	
 
  	set mailer = nothing
end if
%>
 
<html>
 
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" type="text/css" href="style.asp">
<SCRIPT LANGUAGE= JAVASCRIPT>
		function NewWindow(id) {
			Slidesshow = window.open(id, 'Slidesshow', 'width=350, height=500')
	}
</SCRIPT>
</head>
 
<body topmargin="0" leftmargin="0">
<!-- #include file="head.asp" -->
<br />
<div id="Ramme">
<table border="0" width="100%" cellspacing="0" cellpadding="0" style="border-bottom-style: solid">
  <tr>
    <td class='side' width="120">
      <p>
    </td>
    <td><br>
      &nbsp;
      <br>
      <div align="center">
      <table border="0" width="500" cellspacing="1" cellpadding="10" bgcolor="#000000">
        <tr>
          <td width="100%" bgcolor="#DDDDDD">
        <%
        if isempty(Request("Submit")) then
        	If Session("YouAreIn") = TRUE THEN
    			Response.Write "<a href='Editors/EditForm.asp?FormID=" & rs("FormID") & "'>Edit form</a>"
    		end if
			Response.Write rs("IntroText")
			Response.Write "<div align='center'>"
			Response.Write "<table border='0' width='350' cellspacing='0' cellpadding='0'><tr>"
			Response.Write "<form method='POST' action='FormPage.asp'>"
			Do until rsField.EOF
				if rsField("FieldType") = "Text" then
					Response.Write "<p>" & rsField("FieldLabel") & ":<br><input type='text' size='60' name='" & rsField("FieldName") & "'></p>"
				else
					Response.Write "<p>" & rsField("FieldLabel") & ":<br><textarea rows='4' cols='45' name='" & rsField("FieldName") & "'></textarea></p>"
				end if
				rsField.MoveNext
			loop
			Response.Write "<p align='center'><input type='submit' value='Send' name='Submit'></p>"
			Response.Write "<input type='hidden' name='FormID' value='" & killNonNum(request("FormID"),0) &"'>"
			Response.Write "</form>"
			Response.Write "<td width='100%'></td></tr></table>"
			Response.Write "</div>"
		else
			Response.Write "<h2>" & strErr & "</h2>"
		end if	
		%>                
          </td>
        </tr>
      </table><p>&nbsp;</p>
      </div>
    </td>
  </tr>
</table>
<!-- #include file="bund.asp" -->
</div>
</body>
</html>

Open in new window

Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
Expert of the Year 2008
Top Expert 2008
Commented:
try:

...
Set mailer = Server.CreateObject("SoftArtisans.SMTPMail")
mailer.ContentType="text/plain"
...
 
If that still doesn't help, try using an alternate email solution:
http://w3schools.com/asp/asp_send_email.asp

Open in new window

Author

Commented:
Hi
Sorry for delay. Thanks for reply.
I will test that out and come back to you shortly

Kind Regards
Morten

Author

Commented:
Hi
Thanks again for your answer
I did not get it to work with text/plain but your answer led me in the right direction.
As this is danish letters i added the line:
mailer.CustomCharSet = "x-EBCDIC-DenmarkNorway"

And then it works

Thanks again

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial