FIND METHOD USING ADO CODE

can somebody help I've using the method find(ADO), at the moment users have to type in the correct string, if possible I want users to just type in the first few letters for example Joe Bloggs Enterprise, if users type in joe it will find find, below is my current code if anyone can help let me know.


<CODE>
frmCompany.Show
frmCompany.rsmaster.MoveFirst
lastposition = Trim(InputBox("Enter Company for search."))
criteria = "COMP_NAME = '" & lastposition & "'"
frmCompany.rsmaster.Find criteria

Regards
Daryl

Use: criteria = "COMP_NAME Like '" & lastposition & "%'"

Good Luck!!!