--- In [email protected], "ERIS RISO" <[EMAIL PROTECTED]> wrote:
>
> Saya punya textbox untuk input tanggal, karena yg diinput misalnya tgl
> 03/10/2006 cukup 03102006, validasi untuk ini sudah berhasil
> Nah bagaimana cara membuat validasi untuk menentukan bahwa tanggal yg
> diinput itu adalah merupakan format tanggal yang benar baik tanggal
maupun
> bulan
> misalnya user mengetikan 32012006 yang nantinya menjadi 32/01/2006 akan
> menampilkan pesan kesalahan bahwa tanggal salah karena tidak ada
tanggal 32
> pada bulan 01, atau sebaliknya misalnya 01132006 menjadi 01/13/2006
salah
> karena tidak ada bulan ke-13 atau kesalahan kedua-duanya 32/13/2006
(bulan
> dan tanggal)
> Format tanggal saya adalah Indonesia (dd/mm/yyyy)
> Terima kasih
>
Kalo pake VB, cukup lakukan pemotongan string.
Anda mengatakan bahwa format tanggal adalah Indonesia dd/mm/yyyy
Berarti:
* tgl: 2 karakter pertama (1-2) --> Tgl=Left(InputTanggal,2)
* bln: 2 karakter berikutnya (3-4) --> Bln=Mid(InputTanggal,3,2)
* thn: 4 karakter terakhir (5-8) --> Thn=Right(InputTanggal,4)
Nah, berdasarkan informasi diatas, kita dapat melakukan pengecekan
batas terhadap tgl dan bln (dan thn, jk kabisat).
Atau jika Anda lebih terbiasa jika menggunakan format tanggal, Anda
juga bisa menyimpan info tsb dlm variable bertipe date.
Pakai fungsi DateSerial --> Tanggal=DateSerial(Thn,Bln,Tgl)
Sifat dateserial, jika menerima input tanggal yang tidak valid maka
dateserial akan memajukan bulan dan tanggal supaya menjadi benar.
Contoh:
* 32/01/2006 --> 01/02/2006
* 01/13/2006 --> 01/07/2006
Karena itu, Anda harus melakukan pengecekan apakah hasil DateSerial
masih sama dengan InputTanggal.
Contoh caranya, "kembalikan" hasil DateSerial menjadi bentuk ddmmyyy.
Pakai fungsi Day Month Year --> Day(Tanggal) & Month(Tanggal) &
Year(Tanggal).
Lalu bandingkan Tanggal dengan InputTanggal.
Kuhrp posting ini berguna bagi Anda.
Terima kasih!
Salam,
<ariefwt-Kontingen OSN V 2006 Sumatera Utara>
Wahana Programmer Groups Links
<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
http://wahanaprogrammer.net
<*> Untuk menghubungi owner milis ini, kirim email ke:
[EMAIL PROTECTED]
<*> Konsultasi pemrogramman bisa chat disini:
Yahoo! Messenger: wahanaprogrammer
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/Programmer-VB/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
