Form results

liunx · Jan 9, 2008

Results from a form using the post method and sending the result via e-mail replace special characters in the form with hex versions (i.e. %28 for ( and %3A for : and many more...). Is there any way to avoid this or is there a script to convert the output of the form? 
 
Great site btw. I know I'll be be here a lot.that is not hex versions of those, that is the ascii version of it. and it all depends on how you send the email. are you using a preconfigured script or something? also what language are you using (php, cgi, asp)Appologies for the lack of info. I'm using ASP and a mailer.asp that someone got from a 3rd party. Here's the mailer: 
 
"<table border="0" width="580"> 
<tr><td> 
 
<% 
Dim FromEmail 
Dim CheckEmailo 
Dim CheckEmailx 
Dim jilm 
Dim buildmail 
Dim objSMTP 
 
 
 
FromEmail = TRIM(Request.Form("fromemail")) 
If FromEmail = "" Then 
FromEmail = "webmaster@???????.com" 
Else 
CheckEmailx = Instr(FromEmail,"@") 
CheckEmailo = Instr(FromEmail,".") 
If CheckEmailx = 0 OR CheckEmailo = 0 Then 
FromEmail = "webmaster@???????" 
Else 
FromEmail = Request.Form("fromemail") 
End If 
End If 
 
jilm = Request.Form 
 
jilm = REPLACE(jilm, "+", " ") 
jilm = REPLACE(jilm, "&" , vbCrLf & vbCrLf ) 
jilm = REPLACE(jilm, "=" , " : " & vbTab & vbTab) 
 
buildmail = vbCrLf & vbCrLf 
buildmail = buildmail & Request.Form("Subject") & vbCrLf 
buildmail = buildmail & "Date: " & FormatDateTime(Date,vbLongDate) & vbCrLf 
buildmail = buildmail & "**************************************************" & vbCrLf & vbCrLf 
buildmail = buildmail & jilm 
 
'Set objSMTP = Server.CreateObject( "GCSMTP.GCSMTP.1" ) 
'objSMTP.SMTPServer = "???????.???????.com" 
'objSMTP.LocalDomain = "???????.com" 
'objSMTP.From = FromEmail 
'objSMTP.To = Request.Form("mailto") 
'objSMTP.FromName = Request.Form("fromName") 
'objSMTP.ToName = "???????" 
'objSMTP.Subject = Request.Form("Subject") 
'objSMTP.Message = buildmail 
'If objSMTP.SendMessage then 
 
Dim objSendMail 
Set objSendMail = Server.CreateObject("CDONTS.NewMail") 
objSendMail.From=FromEmail 
objSendMail.To=Request.Form("mailto") 
objSendMail.Subject=Request.Form("Subject") 
objSendMail.Body=buildmail 
objSendMail.Send 
Set objMail=Nothing 
 
%> 
 
 
 
 
 
<%If Request.Form("formResp") <> "" Then %> 
<%= Request.Form("formResp") %><% 
Else %> 
We have received your correspondence.<% 
End If %> 
 
 
 
</td></tr> 
</table>" 
 
I inherited this site and am new to ASP. But now I get to "fix" it. 
 
Thanks for your help.I think the problem is right here 
 
jilm = REPLACE(jilm, "+", " ") 
jilm = REPLACE(jilm, "&" , vbCrLf & vbCrLf ) 
jilm = REPLACE(jilm, "=" , " : " & vbTab & vbTab) 
 
 
that is doing the replacing on +, &, = 
 
so try commenting those out and see if it works. they might be in there to stop people from inserting stuff in a form field that can do harm to the database and / or site.Nope, that just formats the e-mail so that it's more readable. It makes it pretty. 
 
Any other ideas? Or do you think I need to suggest a "find and replace" solution?I know squat about ASP but I did a bit of digging around on Google. I entered the following search terms convert html entities asp 
 
I followed a few links but it appeared to me the only way would be to use a REPLACE() on each of the entities. E.g.: 
 
REPLACE(text, "%28", "(") 
 
This seems a bit inefficient and so I expect someone will come along with a better solution.

Form results

liunx

Guest