Question : spaces appearing in email sender, ASP

I'm sending an email from my server. It sends ok but when I get the email there are about 6 extra spaces at the beginning of the message. This is strange because when I response.write before sending it looks like this:

The following ENR Classified ad was recieved from [email protected] at 8/24/2010 9:45:50 AM asdfsadfas dfasdf this is the body Enter the body text of your ad here.

but in the email body it looks like this:
The following ENR Classified ad was recieved from [email protected] at 8/24/2010 9:45:50 AM

asdfsadfas dfasdf
       this is the body Enter the body text of your ad here.          <<<<<<<<<< extra space at front

You can try to send yourself an email here:

http://www.glowfishtw.com/enrad/enr_ads.asp

I've attached my code. Any ideas as to what is causing these spaces would be great. Thank you.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Dim senderemail, recipientemail, subject, messagebody, title_field, editor1, fromemail, whensent

' EDIT THESE VALUES!!!!

' enter the email address that you want the ads sent to
recipientemail = "[email protected]"

' enter the email address that you want to appear in the "from" line of your email
senderemail = "ENRads"

fromemail = request.form("email_field")
fromemail = Replace(fromemail, "'", "''")

subject = "ENR Classified Ads - Online Submission from " & fromemail

whensent = now()

title_field = request.form("title_field")
titlefield = Replace(titlefield, "'", "''")

editor1 = request.form("editor1")
editor1 = Replace(editor1, "'", "''")
editor1 = Replace(editor1, "<p>", "")
editor1 = Replace(editor1, "</p>", "")
editor1 = Trim(editor1)

messagebody = "The following ENR Classified ad was recieved from " & fromemail & " at " & whensent & vbcrlf & vbcrlf & title_field & editor1

response.write (senderemail) & "<br>"
response.write (recipientemail) & "<br>"
response.write (subject) & "<br>"
response.write (messagebody)

Set myMail=CreateObject("CDO.Message")
myMail.Subject=subject
myMail.From=senderemail
myMail.To=recipientemail
myMail.TextBody=messagebody
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="mail.glowfishtw.com"
'Server port
myMail.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail.Configuration.Fields.Update
myMail.Send
set myMail=nothing

messagebody = "Thank you for your submission to ENR Classifieds. Below is the text from your ad. We will contact you if we need any other information." & vbcrlf & "Thank you." & vbcrlf & vbcrlf & messagebody

Set myMail2=CreateObject("CDO.Message")
myMail2.Subject= subject
myMail2.From=senderemail
myMail2.To=fromemail
myMail2.TextBody=messagebody
myMail2.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
'Name or IP of remote SMTP server
myMail2.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") _
="mail.glowfishtw.com"
'Server port
myMail2.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") _
=25
myMail2.Configuration.Fields.Update
myMail2.Send
set myMail2=nothing
%> 

<html>
<head><title>Send Email for enr_ads</title></head>
<body>

<%
'Response.Redirect "enr_ads.asp?resp=x"
%>

</body>
</html>

Answer : spaces appearing in email sender, ASP

if your using a stationary in outlook ot outlook web access, you will face problem like this.
check with the stationary and see.

thanks,
$a$i
Random Solutions  
 
programming4us programming4us