Sharing lagi yah :)
Saya memang ngak pernah pakai MySQL. Tetapi kalau dg SQL Server dan
Access kasus seperti itu tidak terjadi. Saya tidak pernah pakai regional
setting, atau cek regional setting.
Caranya simpel (menurut saya, he, he :) Setiap ada componen date selalu
definisikan format dan displayformatnya. Kalau componen tsb ada
properties displayformat tentunya seperti kalau kita pakai True DB Date.
dim strDateFormat as string
dim strDateDisplay as string
strDateFormat = "dd/mm/yyyy"
strDateDisplay = "dd mmm yy"
Periode1.Format = strDateFormat
Periode1.DisplayFormat = strDateDisplay
Periode2.Format = strDateFormat
Periode2.DisplayFormat = strDateDisplay
Dengan cara itu saya yakin bahwa input dan output date dari program saya
sudah OK. Nah sekarang waktu date itu disimpan ke database, biasanya
database berpatokan pada default setting mereka sendiri. Jadi bisa
beda-beda, bahkan ada time-nya lagi, tetapi tidak jadi masalah karena
yang penting kitanya yang konsisten. Misalnya saat akan membuat perintah
SQL dengan kondisi select seperti berikut :
dim strWHERE as string
strWHERE = "{Tabel1.Tgl} >= #" & CStr(Format(Periode1.Value,
strDateFormat )) & "# AND {Tabel1.Tgl} <= #" &_
CStr(Format(Periode2.Value, strDateFormat )) & "#"
dim strSQL as string
strSQL = "SELECT * FROM Tabel1 WHERE " & strWHERE
Jadi saya selalu menggunakan fungtion format sesuai dengan format date
yang saya setting.
(Code di atas belum dicoba running, hanya ilustrasi)
Demikian pengalaman saya :D
Nyom2 wrote:
>
>
>
> Friends ,
> Tkyu atas atensinya, bagi saya tetap bermasalah bila ada perbedaan
> regional setting. Saya make VB60+MySQL. Bila field bertype date , maka
> akan disimpan 2007-09-05 oleh MySQL. Ini akan normal bila regional
> settingnya adalah mm/dd/yy atau yg setype asal month-nya didepan. Data
> akan bermasalah bila sa;ah satu client pada jaringan dengan set
> regionalnya adalah dd/mm/yy, bilamana saya akan melakukan kalkulasi
> misal mencari selisih bulan, hari, maupun tahun.
>
> Ok, itu sekedar pengalaman , mungkin saya yang kurang jeli dalam
> mengeksplorasi. Saat ini saya siasati menggunakan typenya menjadi
> char(8), sehingga akan disimpan menjadi 20070905, tapi bila melakukan
> kalkulasi, terpaksa harus dibuatkan function tersendiri.
>
> salam,
> nyom2
>
>
>
> ----- Original Message -----
> *From:* rudy chasan <mailto:[EMAIL PROTECTED]>
> *To:* [email protected]
> <mailto:[email protected]>
> *Sent:* Thursday, September 06, 2007 4:41 PM
> *Subject:* Balasan: [Programmer-VB] selisih tanggal YYYYMMDD
>
> FYI,
>
> Jika bermain - main dengan tanggal, usahakan gunakan format
> 'yyyy-mm-dd', jadi tahun, bulan, tanggal .... ini adalah format
> standardnya microsoft (CMIIW), jadi jika menggunakan datediff,
> nulisnya datediff(d,getdate(),'2007-9-5') .... bisa menggunakan
> "-" atau "/", gunakan format ini untuk semua aplikasi microsoft
> (mis. excel, vb, DLL), format ini tidak terpengaruhi oleh settingan
> regional windows ...... silakan di coba.
>
> moga bermanfaat .....
>
>
> */Nyom2 <[EMAIL PROTECTED]>/* wrote:
>
> Netters yth,
> Saya punya field bertype string yang berisi 8 digit yaitu
> berisi tanggal dengan format yyyymmdd , contoh 4 september
> 2007 akan tersimpan 20070904. Bagaimana mencari selisih hari,
> bulan, maupun tahn antara 20070904 dengan 20080301 misalnya??
> Bila dikonverst ke bentuk date, kemudian di datediff-kan akan
> sangat beresiko manakala setting regionalnya berbeda (misal 1
> pc dd-mm-yyyy, pc yg lain mm-dd-yyyy dalam satu jaringan LAN ).
>
> Bagi rekan2 yg punya fungsi tersebut, mhn kiranya dapat
> membagi via japri. terimakasih sebelumnya.
>
> salam,
> Nyom2
>
>
> ------------------------------------------------------------------------
> Kunjungi halaman depan Yahoo! Indonesia
> <http://sg.rd.yahoo.com/mail/id/footer/def/*http://id.yahoo.com/>
> yang baru!
>
> ------------------------------------------------------------------------
> No virus found in this incoming message.
> Checked by AVG Free Edition.
> Version: 7.5.485 / Virus Database: 269.13.5/990 - Release Date:
> 9/4/2007 10:36 PM
>
>
