Bpk, procedure:
Function S_ID() As String
x = DCount("Suplyer_id", "t_suplyer", "[suplyer_id]" <> "") + 1
xY = "S" & Format(x, "000")
S_ID = xY
End Function
Diubah menjadi:
Function S_ID() As String
S_ID = "S" & Format(CInt(Right(DLast("Suplyer_ID", "T_Suplyer"), 3)) + 1, "000")
End Function
Thank's
----- Original Message -----
From: yokananwahyono
To: [email protected]
Sent: Tuesday, 16 February 2010 11:35 AM
Subject: [belajar-access] Formula Dcount,membuat nomor document [1 Attachment]
[Attachment(s) from yokananwahyono included below]
Dear Teman - teman acces
Saya mau mencoba membuat program PO
Membuat Supliyer_id dengan formula dcount seperti yang di berikan dari teman
- teman kmrn
Tetapi kalau kita pernah del salah satu supliyer maka hasil formula dcount
akan salah
Padahal untuk suplyer id saya buat primary key
Kira - kira gmn solusinya
Thx
Yokanan
