Access VBA

This category holds articles regarding Access VBA, but also general things I come accross Access and its usage in companies.

If you want to join two tables in MS Access using the LIKE operator you will fail receiving an error message stating the following.

"JOIN expression not supported."

MS Access SQL

The SQL producing above error looks as follows.

1
2

SELECT *
FROM RULE LEFT JOIN ENTALL ON CAS1 LIKE ('*' & RULE.[SOD CAT CLEAN] & '*');

You can fix this by changing the SQL to define the JOIN condition in the WHERE part of a statement.

If you have to delete all records from a table using Access VBA DAO, the following method might be helpful.

If you have to determine the total count of records in a Recordset, you can use the RecordCount property.

But first you have to move to the last record in the Recordset by using the MoveLast method.

src.MoveLast
src.MoveFirst
 
src.RecordCount

Page 2 of 3