Cannot create My.Object
object (number=-2147221005,
description=006~ASP 0177~Server.CreateObject Failed~800401f3)
ASPCode=
ASPDescription=
Category=
Column=6422607
Description=
File=
Line=0
Number=0
Source=
<HTML>
Example showing error handling using VBScript.
<% Const adOpenDynamic
= 2 Const adLockOptimistic = 3 Const adCmdTableDirect = 512 Set cn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset") Set errorObject =
Server.CreateObject("ADODB.Error") On Error Resume Next cn.Provider
= "sas.localprovider.1" cn.Properties("Data Source") = "c:\testdata" cn.Open
rs.Open "lostDataset", cn, adOpenDynamic, adLockOptimistic, adCmdTableDirect
DisplayErrorInfo rs.Close cn.Close sub DisplayErrorInfo() For Each errorObject
In rs.ActiveConnection.Errors Response.Write "Description: " & errorObject.Description & Chr(10) & Chr(13) & _ "Number: " & Hex(errorObject.Number)
Next End Sub %> </SCRIPT> </HTML>