hello ..

I like to make a module that will write simple data from a table to text file.

I made some resarch and I got everything OK .. just how do I read data from a table in VBA (inside access) how to connect to the table ?

thank you

HI :-)

Are you using ADO or DAO (for the connection to the local table)?



mmcdonal

I don't use any thing right now!

what is the easiest one (I'm mostly a Linux guy so it's quite new to me .. but I'm learning fast).

I would like to know your suggestions

I already made the code that write the data to a file and save it in the right place.

but it's just how to connect to a table (I know SQL very well) just the MS stuff is all new to me ;)

thank you for your replay

HI :-)

ok when I try to use "Dim db As Database" it shows me error message!

HI :-)

here is my code that I wrote to creat a mailing list !

I know there is something wrong !!! but I can not find where

Sub list()
    Dim dteDOB As String
    dteDOB = InputBox("Please enter your list date as 99 or 02", "Create List")
    txtDOB = dteDOB

    Dim fs, a
    Dim dbcurr As DAO.Database
    Set dbcurr = CurrentDb()
    Dim rsSubjects As DAO.Recordset
    Set rsSubjects = dbcurr.OpenRecordset("SELECT users.email FROM users WHERE year = '" & txtDOB & "';")

    Set fs = CreateObject("Scripting.FileSystemObject")
    Set a = fs.CreateTextFile("c:\" & "grads" & txtDOB & "@domain.com.txt", True)

    a.WriteLine "# Mailing List file"
    a.WriteLine "#"

    Do Until rsSubjects.EOF
        a.WriteLine rsSubjects! [email]
        rsSubjects.MoveNext
    Loop

    a.Close

End Sub

do I have to make some special settings in Access so it will work?

is it big deal to use DAO.Database & ADO.Database

what is the diffrence !

I use Access 2003


Thank you again for your time

HI :-)

You are getting the error message because you are using DAO instead of ADO, and you have not selected DAO as a reference. You also will need to move DAO up in the list above ADO so that Access checks DAO first, otherwise ADO might still return an error.


mmcdonal

Thanks allot ... it's worke now :-)

HI :-)