>>>thisform.text1.value= CMONTH(This.object.value)+' '+Str(year(This.object.value)) >>>&&thisform.olecontrol1.Visible=.f. >>>>>>>Mohhamed,
>>>>>SET CENTURY on >>>>>SET DATE TO british >>>>>SELECT divi >>>>>m.nam=nam >>>>>m.dat1=thisform.text1.Value && result is january 2005 >>>>>m.dat2=thisform.text2.Value && result is feb...2005 or any month i choice >>>>>SELECT table1 && error message table1 not found, I need to use it to make index >>>>>INDEX ON dat TO kk >>>>> >>>>> SELECT * from table1 WHERE (dat between m.dat1 AND m.dat2) AND dvno=VAL(this.Value) and peri=thisform.combo2.value ; >>>>> into CURSOR xyz >>>>>IF _TALLY > 0 >>>>> report form newtable1 preview >>>>> ELSE >>>>> =MESSAGEBOX("Still No Product") >>>>> >>>>>Endif >>>>>>>>>>m.qasem