SitePoint Sponsor

User Tag List

Results 1 to 11 of 11
  1. #1
    SitePoint Addict
    Join Date
    Feb 2000
    Location
    District of Columbia
    Posts
    373
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Question Mailing lists with MS Access database

    Hello everyone,

    I have a list of about 200 users that I need to send emails to once every week (no, not spam or marketing, it's for my college club!), my list is in MS Access. The standard db: name, email, phone, school, etc... I cannot seem to integrate it with outlook (which is what I use for email) or find a good way to send an email to everyone in the list. Can someone give me a hand, please?


    Thanks
    temis

  2. #2
    + platinum's Avatar
    Join Date
    Jun 2001
    Location
    Adelaide, Australia
    Posts
    6,441
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    You could write a really simple ASP application to do it (if you have some asp hosting of course) look for the "merge" i think it is, within outlook and access too.

  3. #3
    SitePoint Addict
    Join Date
    Feb 2000
    Location
    District of Columbia
    Posts
    373
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    platinum,

    that's the problem: i don't have hosting, I just want to do it locally, meaning on my computer. But I cannot just export email addresses into Outlook contacts and create a distribution list for 2 reasons:
    1. Database gets updated all the time
    2. When you send from outlook dist. list it shows all the recipients in to to line. I cannot have that...

    any one else??

    temis

  4. #4
    Serial Publisher silver trophy aspen's Avatar
    Join Date
    Aug 1999
    Location
    East Lansing, MI USA
    Posts
    12,939
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    Long time no see Temis.

    Sorry I can't help you, just saying hello.
    Chris Beasley - I publish content and ecommerce sites.
    Featured Article: Free Comprehensive SEO Guide
    My Guide to Building a Successful Website
    My Blog|My Webmaster Forums

  5. #5
    SitePoint Addict
    Join Date
    Feb 2000
    Location
    District of Columbia
    Posts
    373
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    hey, hey, chris!!
    how have you been? drop me a line in the private msgs, ok?
    temis

  6. #6
    Skills to Pay the Bills Sparkie's Avatar
    Join Date
    Jul 1999
    Location
    A cave with 47 computers and an internet feed
    Posts
    3,559
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    temis!!!

    Good to see you again!!!!!
    Sherice Jacob - Web Improvement Expert
    Improve Website Conversions | eBook Covers
    Follow Me on Twitter!

  7. #7
    SitePoint Wizard silver trophy Jeremy W.'s Avatar
    Join Date
    Jun 2001
    Location
    Toronto, Canada
    Posts
    9,121
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Couldn't you generate a report as a text file, and then use a Windows-based Mailing Sender application? It would mean you'd need to generate the text file every week, but with only 200 users it would be a 5minute process
    SVP Marketing, SoCast SRM
    Personal blog: Strategerize
    Twitter: @jeremywright

  8. #8
    SitePoint Addict
    Join Date
    Feb 2000
    Location
    District of Columbia
    Posts
    373
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    sparkie, good to see ya! )

    Jeremy, thanks for replying. I figured it would be quicker for me to write a CF application that does it than to figure out how microsoft office products are supposed to work together...

    temis

  9. #9
    Sultan of Ping jofa's Avatar
    Join Date
    Mar 2002
    Location
    SvÝ■jˇ­
    Posts
    4,080
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    This could work... maybe
    Code:
        
        Dim sql As String
        Dim rs As ADODB.Recordset
        Dim bcc As String
        sql = "select distinct email from tb_person"
        Set rs = CurrentProject.Connection.Execute(sql)
        bcc = rs.GetString(adClipString, -1, "", ",", "null value")
        If bcc <> "" Then
            bcc = Left(bcc, Len(bcc) - 1)
            Dim subj As String
            Dim body As String
            subj = "Test"
            body = "This is a test"
            Dim ol As Outlook.Application
            Dim mail As Outlook.MailItem
            Set ol = New Outlook.Application
            Set mail = ol.CreateItem(olMailItem)
            mail.Subject = subj
            mail.body = body
            mail.bcc = bcc
            mail.Send
        End If

  10. #10
    Sultan of Ping jofa's Avatar
    Join Date
    Mar 2002
    Location
    SvÝ■jˇ­
    Posts
    4,080
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    The code above works better if the row delimiter is a semicolon, not a comma

    bcc = rs.GetString(adClipString, -1, "", ";", "null value")

  11. #11
    SitePoint Addict
    Join Date
    Feb 2000
    Location
    District of Columbia
    Posts
    373
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    thanks, everybody!


Bookmarks

Posting Permissions

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