--- In [email protected], nur Firman <[EMAIL PROTECTED]> wrote:
>
> ada ngga yah perintah yang mendeteksi msgbox
> 
> maksudnya gini saya ada applikasi (luar) yang berhubungan dengan Logger 
> (alat ukur)
> sayangnya applikasi itu nggak bisa realtime (maksunya) nggak bisa di
set 
> waktu donwload lognya
> akhirnya saya buat applikasi sendiri untuk mentriger sendkey untuk 
> donwload lognya.
> yang urutannya gini
> 
> Select Case lblTime.Caption
>     Case Is = "3"
>         SendKeys "%i"   'Alt i (instrumen)
>         CreateLog "Send Key ALT i - Success"
>     Case Is = "4"
>         SendKeys "d"   'd download
>         CreateLog "Send Key D - Success"
>     Case Is = "15"
>         SendKeys "{enter}"   ' Enter untuk perintah setelah download 
> berhasil
>         CreateLog "Send Key Enter - Success"
>     Case Is = "20"
>          SendKeys "{enter}"   ' Enter untuk perintah Clear Log
>         CreateLog "Send Key Enter - Success"
>     Case Is = "25"
>         SendKeys "^s"   ' Ctrl S simpan data
>         CreateLog "Send Key Ctrl S - Success"
>    
>     Timer1.Enabled = False
> End Select
> 
> kelemahannya ketika download gagal maka send keynya brantakan urutannya
> nah kira2 ada nggak yah yang bisa mendeteksi Msgbox kalo error download
> 
> jadi pada proses download jika keluar msgbox Error (Cuma satu tombol)
> bisa di deteksi
> 
> atau ada nggak perintah (returnkey) jika perintah sendkey gagal
> 
> terima kasih
>

Error yang terjadi pada vb dapat kita diteksi dengan perintah

Sub X_Program()
On Error Goto ErrH
 'Program Anda
exit sub
ErrH:
'Buat Algoritma jika terjadi kesalahan 


End Sub


Kirim email ke