CDO.Message.1 error '80070005' Access is denied. /emailtest.asp, line 9

[parmsingh]

I am trying to use CDO to send email with attachments using the following code:

Dim myMail
        Dim mFile1
        mFile1="c:\images\a.gif" 'valid file path, file actually exists
            Set myMail=CreateObject("CDO.Message")
            myMail.Subject="some subject"
            myMail.From=mUserEmail      'valid email address
            myMail.to= mRecipientEmail   'valid email address
            myMail.HTMLBody = "some text"
            myMail.AddAttachment mFile1
            myMail.Send
            set myMail=nothing

1. I get the following error at 'myMail.AddAtta chment mFile1' line of the code.

CDO.Message.1 error '80070005'
Access is denied.
/emailtest.asp, line 9

2. Emails without attachments get sent successfully.

3. Even with attachments,cod e works fine at my devlopment workstation where I have admin rights. However error is produced in other workstations where I do not have admin rights.

How can I solve this problem.

Thanks,

[Frinavale]

It seems pretty obvious to me....you seem to already know the answer your question. You need to apply the proper permissions to allow your code to use the resource.

The account that is executing the code has to have permissions to use the resource.

Either set permissions on the resource to allow the ASP anonymous user account access to the resource.

Or

Create a user account that has permissions to access the resource and then use impersonation.

Or

If you're using windows authentication at all, ensure that the user account which is using the application has permission to user the resource.

-Frinny