Yoga Persib....,
Untuk insert data baru, duplikasi nomor surat tidak mungkin terjadi karena script:
t = Nz(DLookup("[no_su]", "t1", "[th_berjalan]=" & Year(Date)), 0) + 1
menghasilkan nilai no_su tertinggi untuk tahun berjalan + 1.
Sementara untuk keperluan melihat data berdasarkan no_su bisa menggunakan query, misal:
SELECT t1.* FROM t1 where no_su in (2,3);
Ini akan menampilkan semua record yang memiliki no_su 2 dan 3. Agar user tidak bingung, sandingkan pula tahunnya.
Semoga bisa membantu dan memberi semangat.
Hariyanto (Surabaya)
--------------------------------------------
On Mon, 22/9/14, Yoga Persib yogapersib33@yahoo.com [belajar-access] <belajar-access@yahoogroups.com> wrote:
Subject: Re: [belajar-access] Bagaimana cara mereset autonumber jika tahun berganti
To: belajar-access@yahoogroups.com
Date: Monday, 22 September, 2014, 2:15 PM
--------------------------------------------
Pada Sen, 22/9/14, hari yanto har_i20002000@yahoo.com
[belajar-access] <belajar-access@yahoogroups.com>
menulis:
Judul: Re: [belajar-access] Bagaimana cara mereset
autonumber jika tahun berganti
Kepada: belajar-access@yahoogroups.com
Tanggal: Senin, 22 September, 2014, 12:41 PM
kalo gitu engga usah pake autonumber aja ya mas
kalo nampilin nomor yg sebelumnya gimana ya mas?supaya kita
engga ngulang nomor yg udah ada
yogapersib33...,
Type data autonumber, tidak bisa direset. Dia akan terus
bertambah sesuai data yang dientrykan. kalau salah satu
data
terhapus, autonumber akan meloncat.
Menurut saya untuk nomor yang dikaitkan dengan tahun
(tahun
berganti, nomor balik lagi 1), harus dibuat field
tersendiri. Namun harus tetap ada filed id yang
berfungsi
sebagai identitas unik. Sehingga waktu
pengambilan/editing
data tidak salah sasaran.
Misal
id no_su th_berjalan
1 1 2013
2 2 2013
3 3 2013
4 4 2013
5 5 2013
6 6 2013
7 7 2013
8 8 2013
9 1 2014
10 2 2014
11 3 2014
12 4 2014
13 5 2014
14 6 2014
Nah, untuk melihat nilai surat dan id tertinggi, bisa
menggunakan script ini (misal nama tabelnya t1):
Dim t, x As Integer
t = Nz(DLookup("[no_su]", "t1",
"[th_berjalan]=" & Year(Date)), 0) + 1
x = Nz(DMax("[id]", "t1",
""), 0) + 1
Nilai t dan x inilah yang lantas kita insertkan ke tabel
t1.
Semoga bisa membantu dan memberi semangat.
Hariyanto (Surabaya)
--------------------------------------------
On Mon, 22/9/14, yogapersib33@yahoo.com [belajar-access]
<belajar-access@yahoogroups.com> wrote:
Subject: [belajar-access] Bagaimana cara mereset
autonumber
jika tahun berganti
To: belajar-access@yahoogroups.com
Date: Monday, 22 September, 2014, 8:21 AM
maap semuanya saya mau nanya kalo
membuat autonumber dari angka 235 lalu dia mereset
menjadi
0
lagi saat tahun berganti bagaimana caranya
ya?mohon penjelasannyaterima kasih
Posted by: hari yanto <har_i20002000@yahoo.com>
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (4) |
Tidak ada komentar:
Posting Komentar