Mohammed,

You can also try this:

WITH ThisForm
   lcBillNo = .Text1.Value
   ldDateIn = .Text2.Value
ENDWITH

SELECT * FROM mstr INTO CURSOR temp WHERE BILLNO=lcBillNo AND DATEIN=lcDateIn

IF _TALLY <= 0
   MESSAGEBOX( "No records found!" )
ENDIF

Hope to help,

Dennis


>hi,
>thank you for reply.
>
>i mean new code do the same work(another way)
>

>SELECT mstr
>>LOCATE FOR BILLNO=THISFORM.TEXT1.VALUE .AND. DATEIN=THISFORM.TEXT2.VALUE
>>IF FOUND()
>>SET FILTER TO BILLNO=THISFORM.TEXT1.VALUE .AND. DATEIN=THISFORM.TEXT2.VALUE
>>
>
>

>
>thanks.