>The last line of my code does not work. Can anybody help me out?
>
>Set rst1 = db.OpenRecordset("Select id from Valid_Numbers where id = " & nKey & ";")
> cKey = Str(nKey)
> rst1.FindFirst "ID" & cKey
The last line doesn't make much sense. What exactly is the intent of it?
If it's not broken, fix it until it is.
My Blog