Results 1 to 3 of 3
  1. #1
    Join Date
    Nov 2008
    Posts
    59

    Unanswered: Sending Mail from Access to BCC: recipients

    Hi,
    I have designed a function to send e-mails to people on my mailing list from a form but would like to know if there is a way to send it as bcc: as opposed to to: or if there is any other way I would be able to hide the e-mail addresses of the recipients.

    My current code is:

    Code:
    Public Sub SendMail()
    'Provides the Send Mail automation
    Dim dbs As DAO.Database
    Dim rst As DAO.Recordset
    Dim strSubject As String
    Dim strEmailAddress As String
    Dim strEMailMsg As String
    Dim ingCounter As Integer
    Dim intCount As Integer
    
    strSubject = [cmdSubject]
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("qryEmailOut")
    
    
    rst.MoveFirst
    Do Until rst.EOF
        
        strEmailAddress = rst![email address]
        strEMailMsg = rst![First Name] & " " & rst![Surname] _
        & " - "
    
        'EMAIL USER DETAILS & ATT REPORT
        DoCmd.SendObject , , acFormatRTF, strEmailAddress, _
        , , strSubject, strEMailMsg, False, False
        
    
        rst.MoveNext
    Loop
    rst.Close
    Set rst = Nothing
    dbs.Close
    Set dbs = Nothing
    Thanks
    Russ

  2. #2
    Join Date
    May 2005
    Location
    Nevada, USA
    Posts
    2,888
    Provided Answers: 6
    Have you tried putting your variable in the BCC argument of SendObject instead of the TO argument?
    Paul

  3. #3
    Join Date
    Jun 2007
    Location
    Maitland NSW,Australia
    Posts
    388
    Try
    DoCmd.SendObject , , acFormatRTF, , _
    , strEmailAddress, strSubject, strEMailMsg, False, False

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •