|
|
Menjebak Error dengan Objek Err
Bukanlah suatu hal yang aneh jika pada kode-kode percobaan yang anda buat menghasilkan satu atau beberapa kesalahan. Pada bagian ini akan diterangkan bagaimana menjebak error-error ini dan pemakaiannya. Pertama sedikit dulu tentang objek Err.
| Properti Objek Err | |
| Number | Nomor dari error yang dihasilkan (sangat bermanfaat dalam jebakan) |
| Description | Keterangan dari error tersebut |
| Source | Objek atau aplikasi sumber penyebab error tersebut |
| HelpContext | Konteks ID help untuk error tersebut |
| HelpFile | File dan path ke help file |
Tata
cara penulisan:
Memeriksa apakah Err.Number lebih besar dari 0.
If Err.Number > 0 Then
'Beberapa kode untuk menangani error (mencetak keluar #, keterangan, dan pesan
lainnya, dll.)
End If
Berikut ini adalah suatu contoh dari mencoba mengakses suatu subscript dari
suatu array yang melebihi batas (tidak sah).
myArr = Array("one","two","three")
Response.Write("Element #3 is " & myArr(3) & "<br>")
Hasil:
Microsoft VBScript runtime error '800a0009'
Subscript out of range: '[number: 3]'
/test.asp, line 8
Kurang menarik bukan? Kita dapat menjebak error ini dan mencetak pesan kesalahan
yang menarik.
myArr = Array("one","two","three")
Response.Write("Element #3 is " & myArr(3) & "<br>")
If Err.Number > 0 Then
Response.Write("Error #" & Err.Number & "<br>")
Response.Write("Error Source: " & Err.Source & "<br>")
Response.Write("Error Description: " & Err.Description & "<br>")
End If
Hasil
:
Error #9
Error Source: Microsoft VBScript runtime error
Error Description: Subscript out of range
Hasil yang satu ini lebih mudah dibaca. Anda dapat mengaplikasikan hal ini pada
kode yang anda tulis. Jika anda membuat suatu error dan tidak seperti yang anda
inginkan, anda dapat menambahkan kode diatas untuk menjelaskan kesalahan pada
anda atau laporan kesalahan yang lebih menarik kepada pemakai.