MoveFirst Error

In this portion of the code in VB6 I get an error when Procedure2 is used and it occurs on the MoveFirst command at the end.  Any ideas?

Procedure2:

esql = "select * From frmRegistrationCSW Where frmRegistrationCSWCheck4 = 1 And frmRegistrationCSWCheck10 =1 And frmRegistrationCSWText15  >= convert( datetime, " & ravi & BeginDate & ravi & " , 101 )And frmRegistrationCSWText15  <= convert( datetime, " & ravi & EndDate & ravi & " , 101 ) "

If Not Combo1.Text = "-All-" Then
esql = esql & " And frmRegistrationCSWText1 = " & ravi & Program & ravi
End If

rec.Open (esql), conn, adOpenStatic, adLockOptimistic


Com(2) = rec.RecordCount
Text2.Text = Com(2)


rec.MoveFirst
al4629740Asked:
Who is Participating?
 
hesConnect With a Mentor Commented:
What error ?
And why do you need to do a movefirst ?
0
 
al4629740Author Commented:
nevermind, I got the answer.  Thanks anyways.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.