紧急请教，为何使用ADO执行存储过程时，无法返回错误？

Question

执行语法：cn.execute 存储过程,,adStoreProduce这个存储过程语法上没有错误，但在查询分析器中执行时，会提示数据转换溢出（错误级别16），但是在VB中使用上面的语句执行时，却不会发生错误，究竟为了什么？
注：使用err.number和cn.errors.count均无法获取错误。

Answer 1

Sub main()    Dim oCn As Object
    Dim strCn As String
    Dim Sql As String
    
    strCn = "Provider=SQLOLEDB.1;Integrated Security=SSPI;" & _
            "Persist Security Info=False;Initial Catalog=EIPASPSS;Data Source=LuciferPC"    Sql = "raiserror('这是SQL抛出的错误信息',16,1)"
    Set oCn = CreateObject("ADODB.Connection")
    oCn.open strCn
    
    oCn.execute Sql
    End Sub