If you want to iterate through a table using DAO
you must open the data source then loop through the fields eg
dim db as dao.database
dim rs as dao.recordset
set db = currentdb
set rs = db.openrecordset("[Enter either a sql statement or the table name for all fields]")
with...
Go here
http://www.mvps.org/access/
sub heading modules
there is a vb5 compacter addin which will allow for a database to be compacted in on itself.
You are unable to normally compact a database on itself unless the tools/database utilities/compact database selection
set the default value of the field on your table to date()<br>whenever a new record is created this date will be updated to the current date or set a text box to the same default and bind it to your table date field(You may want to lock the field in the properties to stop changes)
The code below imports a table and renames the table where highlighted with ***** this should fix your naming problem<br> <br>Private Sub DownloadCup3_Click()<br> Dim DB As Database<br> Dim RS As Recordset<br> Dim TD As...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.