Anda ganti formula ke :
Me!no = Nz(DMax("nomer", "restdt", "koderest='" & Forms![resthd]![koderest] &
"'"), 0) + 1
udah saya coba bisa.
Regard,
Irawan
--- Pada Jum, 13/2/09, buday uhuy <[email protected]> menulis:
Dari: buday uhuy <[email protected]>
Topik: Re: [belajar-access] kenapa nomor otomatis di sub form tetap 1 ?
Kepada: [email protected]
Tanggal: Jumat, 13 Februari, 2009, 1:08 AM
Saya udah coba-coba dan udah ganti nama field nya jadi nomer, lom
berhasil jg. Mungkin ada yg bisa bantu ? Saya attach jg database saya.
Masalahnya ada di form "restdt"
Sebelumnya terima kasih banyak u/ bantuan teman2.
From: Haer Talib <haerta...@gmail. com>
To: belajar-access@ yahoogroups. com
Sent: Thursday, February 12, 2009 14:22:24
Subject: Re: [belajar-access] kenapa nomor otomatis di sub form tetap 1 ?
bisa taruh breakpoint di code me!no dst itu, lalu jalankan.
nanti VB akan berhenti dan anda bisa menekan F8 utk Step-by-Step ngejalanin
code.
test nilai yg dikandung variable.
Kalau string ditambahin ya hasilnya 1 melulu.
hati-hati juga menggunakan variabel yg udh dipakai sbg keyword
No sebaiknya diganti dengan nomor (misalnya) karena No sendiri merupakan
internal constant bagi akses, nilainya = 0.
Haer
2009/2/12 buday uhuy <herr_haikal@ yahoo.com>
Temans accesser..
Saya buat coding untuk membuat nomor detail transaksi di subform otomatis
bertambah, tapi kenapa no nya tetap 1 ya ?
Private Sub Form_BeforeInsert( Cancel As Integer)
Me!no = Nz(DMax("no" , "restdt", "koderest='" & Me!koderest & "'"), 0) + 1
Apa ada yang kurang di coding itu ? atau mungkin ada yg perlu di tambahkan di
event yang lain ?
Mohon bantuan dari teman2 semua.
Sebelumnya terima kasih
Salam
Budi
New Email names for you!
Get the Email name you've always wanted on the new @ymail and @rocketmail.
Hurry before someone else does!
--
[Haer Talib]
MVP Office Access
Meet me at www.RumahAccess. com
=>
Get your preferred Email name!
Now you can @ymail.com and @rocketmail. com.
___________________________________________________________________________
Dapatkan nama yang Anda sukai!
Sekarang Anda dapat memiliki email di @ymail.com dan @rocketmail.com.
http://mail.promotions.yahoo.com/newdomains/id/