>>ldStart=MONTH(thisform.text2.Value) >>ldEnd=MONTH(thisform.text25.Value) >>m.a=UPPER(ALLTRIM(thisform.text18.value )) >>m.f=THISFORM.TEXT24.VALUE >>------------------------------ >> >>&&&i useto this code to get result for one month only i try to insert another date to get result ,not works&&& >>LOCATE FOR MONTH(dat)=MONTH(thisform.text2.Value) .and. MONTH(dat)=MONTH(thisform.text25.Value).AND. table1.mac1=UPPER(ALLTRIM(thisform.text18.value )) AND TYP=THISFORM.TEXT24.VALUE >>IF FOUND() >>set filter to MONTH(dat)=MONTH(thisform.text2.Value) and MONTH(dat)=MONTH(thisform.text25.Value).AND. table1.mac1=UPPER(ALLTRIM(thisform.text18.value )) AND TYP=THISFORM.TEXT24.VALUE >>.... >>.... >>else >>=messagebox("not found") >>... >>endif >>>>