Then you can Select from the cursor/table which drives the grid.

>thank you,
>this code works fine,no errors
>
>i want to show you what i need ,
>
>i need to print what i have at the gride when i run the code, and keep it
>
>thanks
>
>
>
>>Are you trying to tell me something? Please understand that I am not interested in finding errors in your code by trying to analyze it. But I am interested in making you a better programmer by giving you hints on how to do things the best way.
>>
>>First try my way, and if you don't get it to work, you can ask specific questions. Your code to start he report should be something like this

>>thisform.grid2.SetFocus()
>>Select xxxxx from yyy where zzzz into cursor curReport && CurReport will drive the report
>>REPORT FORM rept1 preview

>>
>>
>>>thank you for reply,
>>>
>>>

>>>If Seek(ALLTRIM(thisform.text8.value), "X2", "f1")
>>>      local lcFind
>>>      thisform.text5.Value=f1
>>>  Store F4 to lcFind, thisform.text9.value
>>>     SELECT F5,f3,f2,f1 FROM x2 WHERE f4=m.lcFind;
>>>     order BY f5;
>>>     into CURSOR mycur NOFILTER
>>>
>>>thisform.grid2.Visible=.t.
>>>  thisform.text7.value = Reccount()
>>>  thisform.grid2.RecordSource="mycur"
>>>

>>>
>>>i run the report as via command button
>>>

>>> thisform.grid2.SetFocus()
>>>  REPORT FORM rept1 preview
>>>

>>>
>>>
>>>>>hi all,
>>>>>
>>>>>any help to keep all grids have information after i run the
>>>>>
>>>>>REPORT FORM rept1 preview
>>>>>
>>>>>thanks
>>>>
>>>>Don't run the report from the same cursors. Instead you run a separate SQL select statement to create a cursor which drives the cursor.