in need of help.. please

guys..

i really cant figure out whats wrong with my code..

an error that says "too few parameters, expected 1"

i used

Dim findit As String
findit = lblFind.Caption

Set rsProject = dbSSS.OpenRecordset("SELECT * FROM Project WHERE Status = findit ")

InitGrid
FillGrid

It might help if you posted all of your code... Too few parameters usually means you called a sub or function and didn't provide everything it needed to operate.

What you want is the recordset to have values where status = the value in findit not the word findit. Plus you need to add the other parameters to the openrecordset function:
Set rsProject = dbSSS.OpenRecordset("SELECT * FROM Project WHERE Status ='" & findit & "'", dbOpenSnapshot, dbForwardonly)

Make sure, of course, that dbSSS is an open database and rsProject is declared as recordset and project is a valid table in the recordset.

Good luck!