What line of code generates the errror?

>I did clean out the temp folder and still a problem.
>
>Have not thought of virus protection but will look into it.
>
>I did put the following messagebox in
>
>

>
>Select (lcRecordSource)
>Afields(aFlds,lcRecordSource)
>For ix = 1 To This.Parent.grd1.ColumnCount
>	lcIx = '"FLD'+Alltrim(Str(ix))+'"'
>	lcField = Alltrim(aFlds(ix,1))
>		MESSAGEBOX('Index '+lcField)
>	Index On &lcField Tag &lcIx Additive
>		MESSAGEBOX('finished Index '+lcField)
>Endfor
>		MESSAGEBOX('Out of here')
>

>
>and the errors do not happen until after the 'Out of Here' message.
>
>This really confuses me because what is going on afterwards. Also explains why the sorting does work since the index's are created.
>