SQL Statement Problem in form

[mdmarney]

The folowing code is erroring out. Any suggestions...

Private Sub Form_Current()

Set rs = CurrentDb.OpenRecordset("Select * from tbl_Attendants where Parish or Group ID = " & me!Parish or Group ID & &quot

rs.MoveLast

Me.tx_Count_Box_2 = rs.RecordCount

End Sub *************
M. MARNEY

http://www.tgw.com

 

[shyamsundar]

hi marney,

Try this

dim strSQL as string
strSQL = "Select * from tbl_Attendants where (Parish = " & me.Parish or [Group ID]=" & me.GroupID
Set rs = CurrentDb.OpenRecordset(strSQL)


Shyam
cwizshyam@yahoo.com