hi,
thank you very much,it works
i try to insert myvalue as under ,but i get error messag(data type mismatch)

INSERT  INTO  billinfo(billno,billdate) VALUES (thisform.text1.Value,DATE())

thanks.
m.qasem

>Try this.
>
>thisform.text1.value=RIGHT(STR(YEAR(DATE()),4),2) + '_'+RIGHT(STR(10000+(billinfo.billno+1),5),4)