Can't attach attachments in email using ASP CDO

tabonni · Aug 23, 2004

Hi

I try to grab the checked files from HTML page and then send those PDF
files as attachments. It can just send email, there are no PDF files
attached. Can anybody point out my error?

My idea is:
When people check the check boxes in HTML page for the PDF files, it
will transfer the files' name to ASP page. Then, it will attach it in
the email.

ASP file - myMail.asp
---------------------

<%@ Language=VBScript %>



<%
SUB sendmail( toWho, Subject, Body )
Dim objCDO
Dim iConf
Dim Flds

Const cdoSendUsingPort = 2

Set objCDO = Server.CreateObject("CDO.Message")
Set iConf = Server.CreateObject("CDO.Configuration")

Set Flds = iConf.Fields
With Flds
..Item(cdoSendUsingMethod) = cdoSendUsingPort
..Item(cdoSMTPServer) = "newserver"
..Item(cdoSMTPServerPort) = 25
..Item(cdoSMTPconnectiontimeout) = 10
..Update
End With

Set objCDO.Configuration = iConf

objCDO.From = "(e-mail address removed)"
objCDO.To = toWho
objCDO.Subject = Subject

courseOutline = Request.Form( "Bus" )
courseOutline = Split( courseOutline, "," )

For Each member in courseOutline
filepath = Server.Path("/") & member
objCDO.AddAttachment filepath
Next

objCDO.TextBody = Body
objCDO.Send
END SUB

toWho = TRIM( Request.Form("To") )
Subject = TRIM( Request.Form("Subject") )
Body = TRIM( Request.Form("Body") )
IF toWho <> "" THEN
sendMail toWho, Subject, Body

'Cleanup
Set ObjCDO = Nothing
Set iConf = Nothing
Set Flds = Nothing
Response.Write "Email Sent"
END IF
%>

<html>
<body>
<form action="mymail.asp" method="post" ID=Form1>
<table cellspacing=0 cellpadding=2>
<tr>
<td> From: (e-mail address removed) </td>
</tr>
<tr>
<td> To: <input type="text" name="To" size="20" ID=Text1></td>
</tr>
<tr>
<td> Subject: <input type="text" name="Subject" size="20"
ID=Text2></td>
</tr>
<tr>
<td> Attachments: </td>
<td>
<%
courseOutline = Request.Form( "Bus" )
courseOutline = Split( courseOutline, "," )
For Each member in courseOutline
response.write member & "<br>"
Next
%>
</td>
</tr>
<tr>
<td>Message: </td>
</tr>
<tr>
<td><textarea rows="10" name="Body" cols="40"
ID=Textarea1></textarea></td>
</tr>

</td>

</tr>
<tr>
<td>
<%
msm = Request.Form("Test")
response.write msm
%>
</td>
</tr>
</table>
</form>
</body>
</html>

HTML file - mailform.htm
---------
<html>
<head>
<title>Request for More info</title>
</head>
<body>
<form action="mymail.asp" method="post">
<p>
MS Outlook PDF Document
<input type="checkbox" value="outlook.pdf" name="Bus" />
</p>
<p>
MS Word PDF Document
<input type="checkbox" value="word.pdf" name="Bus" />
</p>
<p>
MS Excel PDF Document
<input type="checkbox" value="excel.pdf" name="Bus" />
</p>
<p>
<input type="submit" value="Submit" name="Submit" />
</p>
</form>
</body>
</html>

Ray Costanzo [MVP] · Aug 23, 2004

Have you confirmed that your code thinks that some file should be attached?

<%
'...
courseOutline = Request.Form( "Bus" )
courseOutline = Split( courseOutline, "," )

RESPONSE.WRITE UBOUND(courseOutline)
RESPONSE.END

For Each member in courseOutline
filepath = Server.Path("/") & member
objCDO.AddAttachment filepath
Next
'...
%>

Ray at work

tabonni · Aug 24, 2004

I tested the courseOutline array using For Each..Next Loop
All items I selected in the HTML page are in the courseOutline Array.
I don't know why I still can't attach those files as attachments in
email. There are no error pop out either. Any idea?

Cheers

Ray Costanzo [MVP] · Aug 24, 2004

Well, now is when you debug, by creating a test asp page that just tries to
attach one small text file to a mail object and is as simple as possible.
Try to narrow down where the problem may be until you find it.

Ray at work

tabonni · Aug 26, 2004

Hello Ray

I used Response.Write to print out every single elements inside
outlines array. All the elements are what I selected in HTML Page. I'm
even printed out the filepath after using Server.MapPath(). They are
correct either. I really don't where are the bugs.

But, the strange thing is if I'm hard coding the courseOutlines array
elements. Like:

Dim outlines(3)
outlines(0) = "outlook.txt"
outlines(1) = "word.txt"
outlines(2) = "excel.txt"

For i=0 to UBound(outlines)
filepath = Server.MapPath(".") & TRIM("\") & TRIM(outlines(i))
objCDO.AddAttachment filepath
Next

It works. It can attach all documents in the email.

But, when I change it to:

outlines = Request.Form("Bus")
Outlines = Split( Outlines, "," )

For i=0 to UBound(outlines)
filepath = Server.MapPath(".") & TRIM("\") & TRIM(outlines(i))
objCDO.AddAttachment filepath
Next

It doesn't work.

I printed out the filepath and elements in outlines. They are fine as
well.
Please Help. I'm feeling hopeless.

Cheers
Bon

Ray Costanzo [MVP] · Aug 26, 2004

Okay, the problem is that you are doing this in a two step process, and
you're not carrying through the values from the first page in which the user
checks the boxes for the files. When the user does that and submits the
form, he must then submit a second form to get the e-mail sending initiated.
At that second submission, your Request.Form("bus") is no longer valid, as
it's gone. You have to carry that through.

Check out your form in action here.
http://www.lane34.com/tabonni/mailform.htm Note the "View Code" link on the
"mymail.asp" page.

In your final version of this thing you're working on, you may want to
response.redirect your users after the mail is sent. Like,
response.redirect them to a "thankyou.htm" page or something. Otherwise,
they can just sit there and refresh/resubmit repeatedly.

Ray at home

tabonni · Aug 27, 2004

Hello Ray

Thank you very very very much. I had that problems for 2 weeks. I
didn't know where were the bugs.

May I ask you how did you find the bugs? What methods did you use?
Because I did print out all elements in the outlines array and checked
the filepaths. All are correct. I had no idea what's wrong. So, how
did you do that?

Thank you anyway. You save my life.

Ray Costanzo [MVP] · Aug 27, 2004

It wasn't until I copied and pasted the code that you posted in your
original message and tried it that I saw something wrong. I first through
in the RESPONSE.WRITE filepath & "<br>" lines. When I did that, I saw that
the file paths were valid, but then when I submitted the second form and
didn't see them, I realized that there was no array of file paths. So,
where was that array supposed to come from? I saw that it was supposed to
come from Request.Form("BUS"). So, I did a view-source and searched for a
form element named BUS, and did not see one. I guess that's how I could
have discovered the issue anyway!

Ray at work

tabonni · Aug 28, 2004

Anyway, I have to thanks you again.

May I ask you one more question? I don't know why the program generate
a tmp file everytime I submit the email form. For example, After I
selected all the documents I required and send an email, a tmp file
will be generated and be placed in the same directory of the
myMail.asp and the directories I put all the PDF files. I opened the
tmp file. There is all myMail.asp coding. How come?

Cheers
Bon

Ray Costanzo [MVP] · Aug 28, 2004

That is odd. I've never heard of that happening before. What's the name of
the file?

Ray at hom

tabonni · Aug 29, 2004

Hello Ray

Those files' name are ve-6F47 (the myMail.asp) and ve-6F4A
(mailForm.htm). But, every time I send an email, they will be
generated and the name will change as well. Like, ve-6F48, ve-6F49...
etc ve6F4A, ve6F4B... etc. Inside those TMP files are the coding of
myMail.asp and mailForm.htm.

Cheers
Bon

Ray Costanzo [MVP] · Aug 30, 2004

That is interesting. I honestly have no idea what could be on your server
that is generating .tmp files of your ASP pages. ??

Ray at work

tabonni · Aug 31, 2004

It's ok. Thank you for your help

By the way, how often you check the google newsgroup? If I have
problem later on, may I ask you again?

Cheers
Bon

Ray Costanzo [MVP] · Aug 31, 2004

Just post your questions to the group. Somebody'll probably answer them.

Ray at work

tabonni · Sep 1, 2004

If I want to make my ASP CDO email application to have Reply & Forward
functions, how can I do that? Do I need to use Outlook.Application
object? If so, do you know any website about it?

Cheers
Bon

Ray Costanzo [MVP] · Sep 1, 2004

You're new to newsgroups, aren't you. :] When you have a new topic, please
start a new thread. If you just keep using the same thread, the number of
eyes that read your question will be pretty low, as this just appears to be
part of a thread that is already in progress!

One thing that would make things a bit easier is if you started using a news
client to post to the newsgroups instead of Google's web-based interface.
If interested, see here for setup instructions of common usenet
applications. http://www.aspfaq.com/5007 http://www.aspfaq.com/2081 is
another good article.

Ray at home

Script to send email not working	1	Apr 10, 2023
SendGrid email issue in responsive Gmail	1	Nov 4, 2021
Can't execute php to delete multiple rows in database	3	May 14, 2023
CDO, ASP and Email Form Problems	5	Jun 13, 2008
CDO message attach files	1	Jun 18, 2007
Uncaught ReferenceError: item is not defined at HTMLButtonElement.onclick in the: <button onclick="item.inserir()">Inserir dados</button>	1	Apr 22, 2023
asp, cdo and attachments	1	Apr 15, 2004
Only one table shows up with the information	2	Mar 29, 2023

Can't attach attachments in email using ASP CDO

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

tabonni

Ray Costanzo [MVP]

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads