The following works in a query but I am getting a type mismatch when used in VBA. Can anyone tell me what I am doing wrong? (Using Access 2000, have dimmed the recordset as DAO and "Super" is a number field)
set numSubs = "SELECT DISTINCTROW Count([Employee Snapshot].EmpName) AS SubCount FROM [Employee Snapshot] WHERE ((([Employee Snapshot].Super)=3014912));"
set numSubs = "SELECT DISTINCTROW Count([Employee Snapshot].EmpName) AS SubCount FROM [Employee Snapshot] WHERE ((([Employee Snapshot].Super)=3014912));"