>The error is occurring in the following code in Grid1.Refresh.
>
>ContactId = Thisform.ContactId
>=Requery()
>
>The code was taken from the book: VFP 3 Unleashed (2nd Ed., P. 229).
>
>How would I go about implementing you suggestion.
>
>Thanks.

ContactId = Thisform.ContactId
Select View1 && use real view name here
=Requery()

or

ContactId = Thisform.ContactId
=Requery("view1")