CDO Error

[MDW]

I'm trying to configure MS Access to send e-mails using CDO. When I try to
use the .Send method, I'm getting an error that says "The pickup directory
path was not specified."

Below is the relevant code....

Set objMsg = New CDO.Message

objMsg.Subject = strSubject & " - TEST (PLEASE IGNORE)"
objMsg.TextBody = strMessage
objMsg.From = "(e-mail address removed)"
objMsg.To = objAdmin(1).Value

' Set configuration.
Set objConfig = New CDO.Configuration
Set objFields = objConfig.Fields

Set objField =
objFields("http://schemas.microsoft.com/cdo/configuration/sendusing")
objField.Value = 1 ' Sets the configuration to use the local
SMTP server
objFields.Refresh

objMsg.Configuration = objConfig

objMsg.Send << ERROR

 

[Alex Dybenko]

Perhaps you have to specify this directory? see this article for example:
http://support.microsoft.com/default.aspx?scid=kb;en-us;286430