Here is a piece of code I use when I proces a series of records. Maybe this will inspire u:
Sub runrecs()
Dim dbs As Database
Dim rs As Recordset
Set dbs = CurrentDb
Set rs = dbs.OpenRecordset("[Query A and B]")
With rs
Do While Not .EOF
.Edit
!field_in_B = "Some value"
.Update...
Decide wether u want to change your data into the decimal part. I.e. change the number 7.85 into 0.85 or do u want to view it as 0.85. In the first case u would make an update-query, updating Number to Number - int(numer). In the later case, u would make a select query DecNumber: Number -...
In a db I store passport-size pics. I want to save the picture and not a link to a file in the db. Worked well for some time, but then I bought a new SONY flatbed scanner. Now there is no *scanner* object in the list of available OLE-objects.
How can I manually or automatically update the...
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.