hi,
just i need to see all records for month 1, at mygrid via mytextbox e.i 01/01/2005,but it get all months , as 01/02/2005....etc

if nkeycode=13
LOCATE FOR  dat=thisform.text2.Value

IF FOUND()
   lnMonth=MONTH(thisform.text2.Value)
   SET FILTER TO MONTH(dat)=lnMonth
   thisform.grid1.Visible=.t.
   thisform.grid1.Refresh
   thisform.grid1.column7.setfocus() 
else
  =messagebox("åÐÇ ÇáÊÇÑíÎ ÛíÑ ãæÌæÏ ")  
   thisform.grid1.visible=.f.
ENDIF
SET FILTER TO 
endif

>And what is not working, it's not clear to me.
>
>By the way, I suggest you create a local variable lnMonth:

>IF FOUND()
>  lnMonth=MONTH(thisform.text2.Value)
>  SET FILTER TO MONTH(dat)=lnMonth

>>hi all,
>>i want to get just what i need to see at my grid exactly via this code under
>>any help ,idea
>>

>>LOCATE FOR  dat=thisform.text2.Value
>>IF FOUND()
>>  SET FILTER TO MONTH(dat)=MONTH(thisform.text2.Value)
>>  thisform.grid1.Visible=.t.
>>  thisform.grid1.Refresh
>>  thisform.grid1.column7.setfocus()
>>else
>>    =messagebox("the date not found ")
>>    thisform.grid1.visible=.f.
>>ENDIF
>>   SET FILTER TO
>>

>>thanks