Welcome to SPN

Register and Join the most happening forum of Sikh community & intellectuals from around the world.

Sign Up Now!

Getting Values out of the table

Discussion in 'Information Technology' started by Daniel Lees, Jul 28, 2006.

  1. Daniel Lees

    Daniel Lees
    Expand Collapse
    Guest

    Hi

    I am trying to have a table which stores a series of e-mail address which i
    will use to send e-mails with using send object. The problem I have is i
    can't get the values out of the table. I was trying to do a for loop that did

    for d = 0 to MyTable.Count
    t = MyTable!email(d)
    t = t & ","
    Next

    The problem is that it doesn't let me do the MyTable.count it says object
    required.

    Could some please help me with his, I have been trying for ages (I can never
    reference tables in VB for some reason)

    Cheers

    danny
     
  2. Loading...


  3. Ofer Cohen

    Ofer Cohen
    Expand Collapse
    Guest

    Try something like

    Function GetMailList()
    Dim MyDB As DAO.Database, MyRec As DAO.Recordset, MyList As String
    Set MyDB = CurrentDb
    Set MyRec = MyDB.OpenRecordset("Select email From TableName")
    While Not MyRec.EOF ' Loop trough the table
    MyList = MyList & ";" & MyRec!
    MyRec.MoveNext
    Wend
    MyList = Mid(MyList, 2)

    ' use you code here with the mail list ceated

    MyRec.Close
    MyDB.Close
    End Function

    --
    Good Luck
    BS"D


    "Daniel Lees" wrote:
    [color=blue]
    > Hi
    >
    > I am trying to have a table which stores a series of e-mail address which i
    > will use to send e-mails with using send object. The problem I have is i
    > can't get the values out of the table. I was trying to do a for loop that did
    >
    > for d = 0 to MyTable.Count
    > t = MyTable!email(d)
    > t = t & ","
    > Next
    >
    > The problem is that it doesn't let me do the MyTable.count it says object
    > required.
    >
    > Could some please help me with his, I have been trying for ages (I can never
    > reference tables in VB for some reason)
    >
    > Cheers
    >
    > danny[/color]
     
  4. Daniel Lees

    Daniel Lees
    Expand Collapse
    Guest

    Cheers, it is wokrin now :D

    "Ofer Cohen" wrote:

    > Try something like
    >
    > Function GetMailList()
    > Dim MyDB As DAO.Database, MyRec As DAO.Recordset, MyList As String
    > Set MyDB = CurrentDb
    > Set MyRec = MyDB.OpenRecordset("Select email From TableName")
    > While Not MyRec.EOF ' Loop trough the table
    > MyList = MyList & ";" & MyRec!
    > MyRec.MoveNext
    > Wend
    > MyList = Mid(MyList, 2)
    >
    > ' use you code here with the mail list ceated
    >
    > MyRec.Close
    > MyDB.Close
    > End Function
    >
    > --
    > Good Luck
    > BS"D
    >
    >
    > "Daniel Lees" wrote:
    >[color=green]
    > > Hi
    > >
    > > I am trying to have a table which stores a series of e-mail address which i
    > > will use to send e-mails with using send object. The problem I have is i
    > > can't get the values out of the table. I was trying to do a for loop that did
    > >
    > > for d = 0 to MyTable.Count
    > > t = MyTable!email(d)
    > > t = t & ","
    > > Next
    > >
    > > The problem is that it doesn't let me do the MyTable.count it says object
    > > required.
    > >
    > > Could some please help me with his, I have been trying for ages (I can never
    > > reference tables in VB for some reason)
    > >
    > > Cheers
    > >
    > > danny[/color][/color]
     

Share This Page