Open Form depending on query results

[vanillapod]

Hi, i have a form that runs a query 'in the background' just wondering whether its possible to open a form if the queryr eturns any results, if the query doesn't find any records the form doesn't open. I could use a report, on no data event, but a form would be better

cheers

 

[tomschafer]

Yep, try this...

If DCount("*", "[Your Query Name]&quot > 0 Then
DoCmd.OpenForm "[Your Form Name]", acNormal
End If

 

[Sawatzky]

Dear vanillapod,

to test whether a recordset returns results, you can check the recordcount property.

Dim daorec As DAO.Recordset

Set daorec = Application.CurrentDb.QueryDefs("abfrage1&quot.OpenRecordset
if daorec.recordset > 0 then
'open your form
endif


regards Astrid

 

[Sawatzky]

dear vanillapod,

sorry typo:

if daorec.recordcount > 0 then
'open your form
end if

regards Astrid

 

[vanillapod]

cheers will give 'em both a go!