Home/ Questions/Q 825537
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-15T03:16:22+00:00

I am getting this error when I try to send via the local server

  • 0

I am getting this error when I try to send via the local server 

CDO.Message.1 error '80070005' 

Access is denied. 

/mail.asp, line xxx

Here is the code I am using

  MailBodyText = "TEST"

  Set objNewMail = CreateObject("CDO.Message")
  objNewMail.To =  sSendTo
  objNewMail.From = "webmaster@EXAMPLE.com"
  objNewMail.Cc = "webmaster@EXAMPLE.com"
  objNewMail.Subject =  "Information Request & Feedback"
  objNewMail.HTMLBody = "The following information was sent from " & sEmail & ":" & "<br>" & CHR(13) & MailBodyText & "<br>copies of this mail we sent to :"& sSendTo
  objNewMail.Send

  Set objNewMail = Nothing

It looks like it is a permission error at the ISSUR doesn’t have write permission to write to the mailroot/pickup folder.

But we have checked that and the services account that this site is using seems to have the rights.

Question is this error always a file permission error?

Question how to know / set the location that CDO is using? So we can confirm the permissions

What else should look at to fix this?

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Editorial Team

    Use the .configuration property which allows for authentication and other fine tuning..

    examples at : http://www.paulsadowski.com/wsh/cdo.htm

    update

    The .configuration property allows to set the pickup directory (as you request)

    objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
objNewMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory") = "c:\inetpub\mailroot\pickup"
objNewMail.Configuration.Fields.Update
objNewMail.Send
    • 0