Returned value from RunSqL

[Dbless]

I'm trying to run a query to see if a record exists in a particular file. If it does exists do A else do B.

How do I get the result set back from the query. I'm not updating so qrydef won't work. Have been trying runsql or execute but cannot get it to work.

Thanks

 

[Rolliee]

this code should do it.

dim rs as dao.recordset, db as dao.database, SQL as string


SQL = "SELECT * FROM

WHERE [field] = xxx;"

set db = currentdb()
set rs = db.recordsetopen( SQL)

rs.movefirst
num = rs.recordcount
if num >0 then do something

 

[VBslammer]

RunSQL only works on Action Queries. VBSlammer

Unemployed in Houston, Texas