Hi
I wrote the following ASP code to process a form submission and send an email with the submitted data :
'Define mail object
Dim objMail
'Create mail object
Set objMail = Server.CreateObject ("CDONTS.NewMail"
'Set a Reply-To-address
objMail.From = "MyAddress@Home.com"
'Mail Subject
objMail.Subject = "New Database Entry"
'Send mail to supervisor
objMail.To = CRFMailAddress
'Send a copy to the user who submits the data
objMail.CC = User
'Body message type : HTML
objMail.BodyFormat = 0
'Mail type : MIME
objMail.MailFormat = 0
'Body message text
objMail.Body = ("A new entry has been made on " + FormatDateTime(Now) + ". The user who submitted it is <A HREF=""mailto:" + User + """>" + UserName + "</A>.<P><U>Details : </U></P><P><TABLE width=""50%"" border=""4"" bordercolor=""#BBD9F7"" bordercolordark=""#08297b""><TR><TD><B>Configuration ID</B></TD><TD>" + request.Form ("Config"
+ "</TD></TR><TR><TD><B>User Name</B></TD><TD>" + request.Form ("SUserLast"
+ "</TD></TR><TR><TD><B>User First Name</B></TD><TD>" + request.Form ("SUserFirst"
+ "</TD></TR><TR><TD><B>User ID</B></TD><TD>" + request.Form ("SUserID"
+ "</TD></TR></TABLE></P><P>Please consult the attachments for further details."
'Attachment processing
Dim FString, FArray, FName
'Retrieve file list
FString = Request.Form("Files"
'Get file names from file string
FArray = Split (FString, ";"
for i=0 to (UBound(FArray)-1)
if FArray(i) <> "" then
'Define file to be sent
FArray(i) = FolderName + FArray(i)
'Give user-friendly name to file attachment
FName = right (FArray(i), (len(FArray(i)) - instr (FArray(i), " CRF_"
+ 1))
'Add attachment
objMail.AttachFile FArray(i), FName
end if
next
'Send mail
objMail.Send
Set objMail = nothing
All users that use this asp form receive an HTML email with the table, clickable username and attachments, except for one... This person gets the following text :
"... submitted it is John Doe <mailto:john.doe@home.com>"
and no attachments are included. So this looks like the code is cut off in the middle of the body text. CDONTS does send mail from the server, so I don't understand why a certain client configuration could give problems with this script, but still it's very annoying. Does someone have a clue what I could check on the client to solve this?
Thanks
I wrote the following ASP code to process a form submission and send an email with the submitted data :
'Define mail object
Dim objMail
'Create mail object
Set objMail = Server.CreateObject ("CDONTS.NewMail"
'Set a Reply-To-address
objMail.From = "MyAddress@Home.com"
'Mail Subject
objMail.Subject = "New Database Entry"
'Send mail to supervisor
objMail.To = CRFMailAddress
'Send a copy to the user who submits the data
objMail.CC = User
'Body message type : HTML
objMail.BodyFormat = 0
'Mail type : MIME
objMail.MailFormat = 0
'Body message text
objMail.Body = ("A new entry has been made on " + FormatDateTime(Now) + ". The user who submitted it is <A HREF=""mailto:" + User + """>" + UserName + "</A>.<P><U>Details : </U></P><P><TABLE width=""50%"" border=""4"" bordercolor=""#BBD9F7"" bordercolordark=""#08297b""><TR><TD><B>Configuration ID</B></TD><TD>" + request.Form ("Config"
'Attachment processing
Dim FString, FArray, FName
'Retrieve file list
FString = Request.Form("Files"
'Get file names from file string
FArray = Split (FString, ";"
for i=0 to (UBound(FArray)-1)
if FArray(i) <> "" then
'Define file to be sent
FArray(i) = FolderName + FArray(i)
'Give user-friendly name to file attachment
FName = right (FArray(i), (len(FArray(i)) - instr (FArray(i), " CRF_"
'Add attachment
objMail.AttachFile FArray(i), FName
end if
next
'Send mail
objMail.Send
Set objMail = nothing
All users that use this asp form receive an HTML email with the table, clickable username and attachments, except for one... This person gets the following text :
"... submitted it is John Doe <mailto:john.doe@home.com>"
and no attachments are included. So this looks like the code is cut off in the middle of the body text. CDONTS does send mail from the server, so I don't understand why a certain client configuration could give problems with this script, but still it's very annoying. Does someone have a clue what I could check on the client to solve this?
Thanks