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
>>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.