Anda benar untuk penggunaan NZ, tetapi thread awal menyebutkan, control
textbox menggunakan mask : "Ship-"0000;0
Parameter 0 pada input mask artinya literal "Ship" ikut tersimpan dalam
proses input. Kita tinggal berikan urutan terakhirnya.
aksan kurdin
On 6/20/2010 10:22 PM, lukito504 wrote:
Maaf suhu,
nambahin dikit
strShipNum = "Ship-" & Format(CInt(Right(Nz(DMax("Shipment_No",
"TblShipment"), "Ship-0000"), 4)) + 1, "0000")
Ditambah string "Ship-" biar lengkap...kalo nggak cuma 0001,0002 dst
yang tersimpan, kecuali emang tujuannya begitu.
Ditambah Nz seandainya table masih kosong return value Null di-handle
juga.
Thanks.
LH
