kalau masalah tipe data, di vb kayaknya ga ada tipe data yg pake nol didepan, tp kalau tipe data yg bisa menyimpan data dg format seperti itu mungkin cuman string dan variant.
u. masalah formatnya, cara yg lebih gampang adalah dg menggunakan fungsi format dr vb sendiri.
mis kita butuh 5 digit angka dg nol didepan seperti "00001", cukup datanya kita format dg perintah --> format("1","00000")
kalau butuh 3 digit "001" gunakan --> format("1","000")
dsb.
best regards
[wwn]
On 1/4/06, Jenar Suseno <[EMAIL PROTECTED]> wrote:
Saya sering alamai kasu itu, aku jg belum tau apa ada
tipe data seperti itu.
Selama ini aku bikin manual saja.
Logikanya begini:
1. tentukan berapa digit nomornya misal = "000001"
berarti 6 digit
misal = 00001 berarti 5 digit.
2. Saat proses simpan, cek data pada tabel, kalau
kosong
langsung diisi "00001"
3. Kl isi, maka buat recordset yang diorder by nomor
tesebut.
- move last
- buat variavel misal x=val(rs_data!nomor)+1
- buat string "0" sebanyak 5 dikurangi lebar x
- y=string(5-len(trim(str(x))),"0")+trim(str(x))
- y inilah yang nanti jadi nomor baru
jadi kl no sebelumnya = "00001"
x=val("00001")+1 '---isinya akan 2
y=string(5-1,"0")+trim(str(2))
y="00002"
Prosedur ini bisa dibuat saat input data baru atau
simpan data.
Rgd,
--- Hasan <[EMAIL PROTECTED]> wrote:
> Rekans...
> Saya mo tanya neh, saya lagi buat program vb dan sql
> server.
> Gimana seh caranya, untuk nampilin dan ngesave data
> dengan format 00001. Situasi jelas nya gini, textbox
> a
> nilainya 00001, trs pas saya klik command button dia
> akan berubah jadi 00002, dikilik lagi jadi 00003,
> begitu seterusnya, ada tipe data nya ga seh, abis
> dari
> tadi saya coba pasti angka nol nya lgs ilang( ga
> muncul). Tolong bantu saya ya...
>
> Thanx...
> Hasan
>
>
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
SPONSORED LINKS
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
