Item
Errorsコレクションの要素取得
文法
Errorsコレクション.Item(Key)
パラメータ
Key : 要素名/インデックス
機能説明
Errorsコレクションの要素を取得
使用例
<%
'エラー発生時次行から処理続行
On Error Resume Next
Dim objConn, objRS, objErr
'データベース接続
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "test"
'エラー発生
Set objRS = Server.CreateObject("ADODB,Recordset")
objRS.Open "test1"
'1番目のエラー取得
'メソッド(Item)は省略可
Set objErr = objConn.Errors.Item(0)
Response.Write "エラー : " objConn.Errors.Count
objConn.Errors.Clear
Set objErr = objConn.Errors(0)
Response.Write "エラー : " objConn.Errors.Count
'オブジェクト開放
objConn.Close
Set objErr = Nothing
Set objConn = Nothing
%>
Topへ