Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
how to populate a list box with a table's fileds
- Thread starter susu
- Start date
Susu!
I really don't understand what you mean by populating records into a listbox. Why should someone populate full records into a list box?
a list box is a box where you dropdown and you have a choice either to query something by the selection you highlghted.
or to insert certain values into a field in a table. You can limit that the values in the list box to only the ones you typed in. To have the values based on a query from a Table you would use usually a Combo Box.
You need to make sure if you are really refering to a list box and what do you want to do.
read up in the help of Access what are the differences between a combo and list boxes.
Combo boxes if you click on it, they usually work with a wizard and will ask which field or fields you want to query and if you wany to bind it to a certain field in your table.
I really don't understand what you mean by populating records into a listbox. Why should someone populate full records into a list box?
a list box is a box where you dropdown and you have a choice either to query something by the selection you highlghted.
or to insert certain values into a field in a table. You can limit that the values in the list box to only the ones you typed in. To have the values based on a query from a Table you would use usually a Combo Box.
You need to make sure if you are really refering to a list box and what do you want to do.
read up in the help of Access what are the differences between a combo and list boxes.
Combo boxes if you click on it, they usually work with a wizard and will ask which field or fields you want to query and if you wany to bind it to a certain field in your table.
Here is some code to read the tables and columns collection in the catalog.
Function JetSecurity3()
'-- set reference to ADOX library
'- Microsoft ADO Ext. 2.6 for DDL and Security
'-- Microsoft ActiveX data objects 2.6 library also needed for ADO
Dim cg As New ADOX.Catalog
Set cg.ActiveConnection = CurrentProject.Connection
Dim cl As ADOX.Column, tb As ADOX.Table
Set tb = cg.Tables("test"
Debug.Print "Tables = "; tb.Name
''For Each tb In cg.Tables
'' Debug.Print "Tables = "; tb.Name
For Each cl In tb.Columns
Debug.Print " Column = "; cl.Name
Next
''Next
End Function
If the length of all column names is under 2048 characters then you could concatenate all the names comma separated and put them in a list which would be the list source of the listbox. Post back if you need a more inclusive solution.
Function JetSecurity3()
'-- set reference to ADOX library
'- Microsoft ADO Ext. 2.6 for DDL and Security
'-- Microsoft ActiveX data objects 2.6 library also needed for ADO
Dim cg As New ADOX.Catalog
Set cg.ActiveConnection = CurrentProject.Connection
Dim cl As ADOX.Column, tb As ADOX.Table
Set tb = cg.Tables("test"
Debug.Print "Tables = "; tb.Name
''For Each tb In cg.Tables
'' Debug.Print "Tables = "; tb.Name
For Each cl In tb.Columns
Debug.Print " Column = "; cl.Name
Next
''Next
End Function
If the length of all column names is under 2048 characters then you could concatenate all the names comma separated and put them in a list which would be the list source of the listbox. Post back if you need a more inclusive solution.
- Status
Similar threads
- Locked
- Question
- Locked
- Question
- Locked
- Question
- Locked
- Helpful tip
