sorry, salah reply...
SOL
sodik

On Sat, 12 Jun 2010 21:56:26 +0700, Sodik Ihwan <[email protected]>  
wrote:

> ok om, tks a lot. i'll try...
> salam,
> sodik
>
> On Sun, 13 Jun 2010 02:46:00 +0700, Maulwy Shahran
> <[email protected]> wrote:
>
>> Dear Pak Edy,
>>
>> Maaf pak jika dianggap silly question, soale lagi coba2 develop pake
>> VB6...
>> Form saya sudah punya, misal namanya FrmNumber. Sebelumnya untuk filter
>> transaksi ini saya menggunakan nomor awal transaksi dan nomor akhir
>> transaksi perperiode transaksi per hari ( 8.00 AM Today - 8.00 AM
>> NextDay).
>> Fungsi yang Bapak berikan ini, diletakkan di FrmNumber ataukah di tempat
>> lain (Modul)? Komponen yang saya gunakan untuk menyimpan tanggal
>> transaksi, diambil dari dtp1(DTPicker)  dengan format: dtp1.Value =
>> Format(Now, "dd/mm/yyyy").
>> Terima kasih atas informasinya.
>>
>> Salam,
>>   ----- Original Message -----
>>   From: Edy WIYONO
>>   To: [email protected]
>>   Sent: Saturday, June 12, 2010 12:46 PM
>>   Subject: RE: [programmer-vb] filter transaksi by time
>>
>>
>>
>>   Anda bisa menggunakan fungsi sbb:
>>
>>
>>
>>   Function fDate(ByVal dtEntryDate As Date) As Date
>>
>>   ' sebelum jam 08.00, di hitung hari kemarin
>>
>>       If CInt(Format(dtEntryDate, "hh")) < 8 Then
>>
>>          fDate = DateSerial(Year(dtEntryDate), Month(dtEntryDate),
>> Day(dtEntryDate) - 1)
>>
>>       Else
>>
>>          fDate = dtEntryDate
>>
>>       End If
>>
>>   End Function
>>
>>
>>
>>   Percobaan menghasilkan sbb:
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 00:00:01#),"yyyy-mm-dd")
>>
>>   2000-01-01
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 03:00:01#),"yyyy-mm-dd")
>>
>>   2000-01-01
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 07:00:50#),"yyyy-mm-dd")
>>
>>   2000-01-01
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 08:00:00#),"yyyy-mm-dd")
>>
>>   2000-01-02
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 14:00:00#),"yyyy-mm-dd")
>>
>>   2000-01-02
>>
>>
>>
>>   ?Format(fDate(#2-jan-2000 20:00:00#),"yyyy-mm-dd")
>>
>>   2000-01-02
>>
>>
>>
>>
>>
>>   Salam Hangat dan Jabat Erat
>>
>>
>>
>>   EdyWiyono
>>
>>
>>
>>
>>
>>
>> ------------------------------------------------------------------------------
>>
>>   From: [email protected]
>> [mailto:[email protected]] On Behalf Of Maulwy Shahran
>>   Sent: Saturday, June 12, 2010 11:23
>>   To: [email protected]
>>   Subject: [programmer-vb] filter transaksi by time
>>
>>
>>
>>
>>   Dear All,
>>
>>   Bila waktu rentang waktu transaksi 1 hari adalah antara jam 8.00 AM
>> (today) - 8.00 AM (next day), ada yang punya info, bagaimana menulis
>> codenya jika transaksi dibuat jam 1.00 AM tanggal 13 Juni 2010, tetapi
>> system tetap mencatat itu adalah transaksi tanggal 12 Juni 2010, karena
>> transaksi untuk tanggal 13 Juni 2010 baru dimulai pada jam 8.00 AM.
>>   Terima kasih.
>>
>>   Salam,
>>
>>
>
>


-- 
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/



------------------------------------

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanapress.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [email protected]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahana.programmer

<*> Facebook Wahana Programmer Indonesia
    http://facebook.com/wahanaprogrammer.net
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:
    [email protected] 
    [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/

Kirim email ke