运行中错误的捕捉！在线讨论！路看的都来发言！

Question

设置捕捉错误在获取错误以后，我怎么样进行错误是不是属于数据库错误判断，而且进一步判断属于数据库哪种错误！比如数据拒绝访问或者未连接到数据错误！
   先谢过了！

Answer 1

根据Err.Number或者Err.Description
得到了错误代码以后我怎么用vb代码进行判断啊！

Answer 2

举个典型的例子，你是要这个吧：
Private Sub cmdUpdate_Click()
On Error GoTo Err_ProductUpdate　　......'程序代码Exit_ProductUpdate:
    Exit Sub
Err_ProductUpdate:
    MsgBox Err.Description, vbOKOnly + vbCritical　'提示错误
    Resume Exit_ProductUpdate
End Sub