Bpk set 10 digit juga tidak apa2, utk TJ00000000 ke TJ00000001 dst bisa
menggunakan kode VBA tambahan pada event klik new record:
DoCmd.RunCommand acCmdRefreshPage
Me![NamaFieldAutoNumber] = "TJ & Format(Right(DLast("NamaFieldAutoNumber",
"NamaTable"), 8) + 1, "00000000")
Boleh juga DLast diatas diganti menjadi DMax. Bpk boleh juga set kalau bulan
berganti dan tahun berganti, digit tertentu berubah sesuai dengan bulan dan
tahun.
Thank's
----- Original Message -----
From: epilambret
To: [email protected]
Sent: Monday, February 01, 2010 6:35 PM
Subject: [belajar-access] Re: autonumber reset
oya pak office! klo nomor faktur/nota di reset baru setiap hari ada
kemungkinan betul duplikasi. jadi sy ikut saran bapak.
- nah kalau misalnya nomor nota/faktur itu di autonumber kira2 berapa digit
yang aman ya? kira2 sampai kapan baru di reset ke nol lagi?
- trus kalau boleh di bantu nih, saya coba2 lihat program penjualan nya
bambomedia yang 5.0 itu ada nota faktur dengan tulisan TJ00 00 00 01 dan
berubah seterusnya sampai TJ00 00 00 10 dst, saya lihat tipe file di tabel
bukan autonumber tapi text. bagaimana sih code vba nya itu?
terima kasih
epi
