coba aja pake timer
buat intervalnya jadi 1 
dan masukkan coding untuk mencek waktu
mis:

sub Timer1()

if format(time,"hh:mm:ss")=jam then 'format jadi 24 jam 
    Kirim_SMS 'fungsi untuk mengirim sms
end if

end sub

nah applikasi itu di buat aj auto startup
mudah2an membantu, maklum jawaban newbie..:)

regards

--- In [email protected], "paman_dwi" <[EMAIL PROTECTED]> 
wrote:
>
> Rekan-rekan saya butuh bantuan nih.
> saya lagi bikin program sms server. Saya ingin menjalankan fungsi
> untuk mengirim sms secara otomatis berdasarkan data jam yang ada di
> database. field2 and data di databasenya seperti ini :
> 
> id        service         jam
> --------------------------------
> 1     service 1         09:00:00
> 2     service 2         10:00:00
> 
> fungsi untuk ngirim smsnya udah ok
> 
> Thx sebelumnya
>







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/

<*> 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