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