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