ACCESS FEED: Re: [belajar-access] Coding ID

Minggu, 24 Maret 2013

Re: [belajar-access] Coding ID

Siap Bang Aksan, tak cuba dulu sambil meraba2

Maklum newbie, start VBA aja dr mana mesti cari-cari dulu :-)

Salam,
Newbie

Salam
Rainusa

From: aksan kurdin <aksan.kurdin@gmail.com>

Sender: belajar-access@yahoogroups.com

Date: Sun, 24 Mar 2013 16:02:06 +0700

To: <belajar-access@yahoogroups.com>

ReplyTo: belajar-access@yahoogroups.com

Subject: Re: [belajar-access] Coding ID

komponennya:
RTC
-
getNextNo (001..002...dst)
-
getRomawiBulan(1=I,2=II...,12:XII, dari tanggal dokumen)
-
getTahun(tanggal sekarang)

ayooo bisa vbanya ?

function nextID() as string
    dummy = "RTC-"
    dummy = dummy & (getNextNo) & "-"
    dummy = dummy & getRomawi(tglDokumen) & "-"
    dummy = dummy & getTahun (tglDokumen)

    nextID = dummy
end

ayo....
pseudo kode udah cukup jelas,
masih bingung ?
tanya lagi di mana yang kabur.

aksan kurdin

On 3/24/2013 3:54 PM, Rainusa Indo wrote:

Dear rekan-rekan,

Mohon izin untuk bertanya dan pencerahan.

Bagaimana kira-kira codingnya ya kalau saya punya ID RTC-001-III-2013 yang bisa dicreate automatis.

Dimana RTC adalah tetap, 001 serial number, III bulan dalam romawi-2013 adalah tahun, kalau ID diatas sedikit ribet atau mungkin ada ide lain berikut codingnya untuk membuat ID

Terima kasih atas pencerahannya.

Maaf kalau ada yang salah,

Best regars,

Rainusa Training