Mas Rully, Ini alternatif dari saya:
misal tempcounter = 1 Format(#01/13/2000#, "REK - mmyyyy - ") & Format(tempcounter,"0000") hasil: REK - 012000 - 0001 Format(#13/01/2000#, "REK - mmyyyy - ") & Format(tempcounter,"0000") hasil: REK - 012000 - 0001 Format(Now, "REK - mmyyyy - ") & Format(tempcounter,"0000") hasil: REK - 112008 - 0001 Format(Date, "REK - mmyyyy - ") & Format(tempcounter,"0000") hasil: REK - 112008 - 0001 Format(Date, "REK - mmyyyy - ") & Format(tempcounter,string(8,"0")) hasil: REK - 112008 - 00000001 Mudah-mudahan bener di PC lain. Thanx. :D Lukito Hartono NB: regional setting: English(United State)
