M
MDW
Hey all,
I'm trying to send e-mails using CDO and Access 2000. I have Outlook 2003 on
my machine, which is not a server.
All the documentation I've seen shows that you have to specify an SMTP
server before any emails can be sent. (I haven't seen much by way of
documentation, however; the Visual basic help on my PCseems to be broken at
the moment.)
Is there any way to set it up as though I were simply sending the e-mails
from my PC instead of dealing with SMTP server info? The test code I have now
-
For I = 0 To 2
strMessage = "Hello " & strNames(I) & "," & vbCrLf & vbCrLf
strMessage = strMessage & "This message was automatically sent from
within MS Access."
strSubject = "A Message For " & strNames(I)
Set objMsg = CreateObject("CDO.Message")
objMsg.From = strReturn
objMsg.To = strAddy(I)
objMsg.ReplyTo = strReturn
objMsg.Subject = strSubject
objMsg.TextBody = strMessage
objMsg.Send
Next
does precisely nothing. The only thing I would need to add (in addition to a
larger loop) is the ability to add an attachment.
Thanks.
I'm trying to send e-mails using CDO and Access 2000. I have Outlook 2003 on
my machine, which is not a server.
All the documentation I've seen shows that you have to specify an SMTP
server before any emails can be sent. (I haven't seen much by way of
documentation, however; the Visual basic help on my PCseems to be broken at
the moment.)
Is there any way to set it up as though I were simply sending the e-mails
from my PC instead of dealing with SMTP server info? The test code I have now
-
For I = 0 To 2
strMessage = "Hello " & strNames(I) & "," & vbCrLf & vbCrLf
strMessage = strMessage & "This message was automatically sent from
within MS Access."
strSubject = "A Message For " & strNames(I)
Set objMsg = CreateObject("CDO.Message")
objMsg.From = strReturn
objMsg.To = strAddy(I)
objMsg.ReplyTo = strReturn
objMsg.Subject = strSubject
objMsg.TextBody = strMessage
objMsg.Send
Next
does precisely nothing. The only thing I would need to add (in addition to a
larger loop) is the ability to add an attachment.
Thanks.