Group:  Microsoft Access ยป microsoft.public.access.modulesdaovba.ado
Thread: Create query using VBA

Geek News

Create query using VBA
Matthew Pfluger 11/20/2008 8:13:07 PM
Can I use ADOX or DAO to create a query? If so, how do I make a column in
the query for each column in a table, yet assign an alias to each column?

Thanks,
Matthew Pfluger
Re: Create query using VBA
"Douglas J. Steele" <NOSPAM_djsteele[ at ]NOSPAM_gmail.com> 11/20/2008 8:33:40 PM
Yes, you can use either (although it makes far more sense to use DAO, since
it's designed specifically for use with Jet databases)

You alias through the SQL statement you use for the query.

Dim qdfNew As DAO.QueryDef
Dim strSQL As String

strSQL = "SELECT Field1 AS FieldA, Field2 AS FieldB " & _
"FROM MyTable " & _
"ORDER BY FieldA"

Set qdfNew = CurrentDb.CreateQueryDef("MyQuery", strSQL)


--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)


"Matthew Pfluger" <MatthewPfluger[ at ]discussions.microsoft.com> wrote in
message news:FA13810E-EA67-401E-8755-DACD27ABEAEB[ at ]microsoft.com...
[Quoted Text]
> Can I use ADOX or DAO to create a query? If so, how do I make a column in
> the query for each column in a table, yet assign an alias to each column?
>
> Thanks,
> Matthew Pfluger


Re: Create query using VBA
Matthew Pfluger 11/20/2008 10:15:00 PM
Thank you! I appreciate the help!
Matthew Pfluger

"Douglas J. Steele" wrote:

[Quoted Text]
> Yes, you can use either (although it makes far more sense to use DAO, since
> it's designed specifically for use with Jet databases)
>
> You alias through the SQL statement you use for the query.
>
> Dim qdfNew As DAO.QueryDef
> Dim strSQL As String
>
> strSQL = "SELECT Field1 AS FieldA, Field2 AS FieldB " & _
> "FROM MyTable " & _
> "ORDER BY FieldA"
>
> Set qdfNew = CurrentDb.CreateQueryDef("MyQuery", strSQL)
>
>
> --
> Doug Steele, Microsoft Access MVP
> http://I.Am/DougSteele
> (no e-mails, please!)
>
>
> "Matthew Pfluger" <MatthewPfluger[ at ]discussions.microsoft.com> wrote in
> message news:FA13810E-EA67-401E-8755-DACD27ABEAEB[ at ]microsoft.com...
> > Can I use ADOX or DAO to create a query? If so, how do I make a column in
> > the query for each column in a table, yet assign an alias to each column?
> >
> > Thanks,
> > Matthew Pfluger
>
>
>

Home | Search | Terms | Imprint Contact
Newsgroups Reader - provided by WiredBox.Net