CDONTS error - too much data?

G

Griff

I have been using the CDONTS component on Windows 2000 to send emails for a
long time now (code below).

However, over time, the report that I am sending has got rather longer and
it now gives me an "unknown exception" error. However, I know that it's
because there's now too much data (If I remove some of the text it goes
fine).

I've "compacted" the message as much as I can, but I've got up to the limit
now of how much I can compact it by...

I've tried to write it to a file and attach that, but the same size limit
appears to hold for attachments too.

What to do....?

Thanks in advance

Griff

----------------
public sub sendThatEmail(byVal sMessage, byVal asToAddressesArray)
Dim obOrderEmail
' Send the email
Set obOrderEmail = CreateObject("CDONTS.NewMail")
with obOrderEmail
.BodyFormat = 1
.MailFormat = 0
.From = sSystemAutomatedEmailSenderAddress
.Value("Reply-To") = sSystemAutomatedEmailReplyToAddress

.To = join(asToAddressesArray,";")

.Subject = "Billing Report"
.Body = sMessage
.Send
end with
Set obOrderEmail = Nothing
end sub
----------------------------
 
G

Griff

Looks like the way forward - thanks.

One quick question:
.Item(sch & "smtpserver") = "<enter_mail.server_here>"

What would one expect for "<enter_mail.server_here>" ? Not sure what to add
(or in what format)

Thanks!

Griff

PS One minor thing - Microsoft seem to have changed their pages around, so
some of the links to their site don't work :-(
 
S

Steven Burn

You'll need to contact Aaron (ASPFAQ owner) about the broken links... (see
the "Feedback" link on the same page).

With regard to "<enter_mail.server_here>", this would be in the form;

"smtp.yourmailserver.com"

For example, had you been using the Microsoft server, this would be;

..Item(sch & "smtpserver") = "maila.!microsoft.com"

! added by me to prevent bot's

--
Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!
 
G

Griff

The example given on:
http://www.w3schools.com/asp/asp_send_email.asp

Just shows the code required as:
<%
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Sending email with CDO"
myMail.From="(e-mail address removed)"
myMail.To="(e-mail address removed)"
myMail.TextBody="This is a message."
myMail.Send
set myMail=nothing
%>...without the need for setting up the configuration
details/fields.The CDONTS code (that this is replacing) did not have any
information for the SMTP server (it's all running locally) so would this be
able to pick up those details too?ThanksGriff
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

Forum statistics

Threads
473,990
Messages
2,570,211
Members
46,796
Latest member
SteveBreed

Latest Threads

Top