SMTP Mail Queue

[Jeff]

windows server 2003

SMTP appears to be running, connection tab has "all except the list
below" checked, and there is nothing in that list

I have this bit of code:

Dim ObjSendMail
Dim iConf
Dim Flds

Set ObjSendMail = Server.CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1

'**** Path below may need to be changed if it is not correct
Flds("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory")
= "c:\inetpub\mailroot\pickup"
Flds.Update

Set ObjSendMail.Configuration = iConf
ObjSendMail.To = "my*******@mydomain.com" ' I've used my real address here
ObjSendMail.Subject = "this is the subject"
ObjSendMail.From = "so*****@someone.net"

' we are sending a text email.. simply switch the comments around to
send an html email instead
'ObjSendMail.HTMLBody = "this is the body"
ObjSendMail.TextBody = "this is the body"

ObjSendMail.Send

Set ObjSendMail = Nothing

Everytime that gets run, I find a new message in:

"c:\inetpub\mailroot\queue

There is nothing in any of the other mailroot subfolders

(I tried changing the smtpserverpickupdirectory path to queue, but
changed back)

What have I done wrong?

Jeff

[Aaron Bertrand [SQL Server MVP]]

Everytime that gets run, I find a new message in:

>
"c:\inetpub\mailroot\queue

http://www.aspfaq.com/2268

[Dave Anderson]

Jeff wrote:

Everytime that gets run, I find a new message in:

"c:\inetpub\mailroot\queue

There is nothing in any of the other mailroot subfolders

(I tried changing the smtpserverpickupdirectory path to queue, but
changed back)

What have I done wrong?

Probably nothing. The script is working properly if the message ends up un
the [pickup] folder. SMTP Services must be running, because the message gets
picked up and moved to [queue].

Does the message stay there forever, or does it eventually end up in
[badmail]? Either way, have you opened the .eml file in a text editor and
looked for errors?

--
Dave Anderson

Unsolicited commercial email will be read at a cost of $500 per message. Use
of this email address implies consent to these terms.