IF then statement help

[kidrobot]

I need help with an If then statement for my SQL code. I have no idea on syntax but I know what I want it to do.

strSQL= stuff

if NULL
vbOK? "there is no user"
if not null
continue
end if

Any help would be great!!!

 

[chergh]

set rs = db.openrecordset(strSQL)

if rs.count = 0 then
msgbox("There is no user")
end if

 

[modest]

set rs = db.openrecordset(strSQL)

if rs.count = 0 then
msgbox("There is no user")
end if

Sort of, but you missed a couple things.

Dim rs As DAO.Recordset
Dim db As DAO.Database

Set db = CurrentDb
Set rs = db.OpenRecordset(strSQL, dbReadOnly)

If Not(rs.EOF and rs.BOF) Then
    Select Case Msgbox "There is no user. Would you like to continue?",vbYesNo
        Case vbYes 
        Case vbNo: Exit Sub 'Exit Function
    End Select
End If