请问下,在记录集中执行添加,出错,怎么取报错信息,

hackxm

请问下,在记录集中执行添加,出错,怎么取报错信息,如果用数据库的执行可以取错误描述,记录集没有找到提示错误的命令


或者易语言里ADO取最后错误,怎样移到火山里
.版本 2

.子程序 最后错误代码, 整数型, 公开, 数据库最后错误代码和描述
.参数 传错误描述, 文本型, 参考 可空
.局部变量 obj, 对象
.局部变量 v, 整数型

.如果真 (数据连接.读对象型属性 (“Errors”, ).读数值属性 (“Count”, ) ＞ 0)
    obj ＝ 数据连接.读对象型属性 (“Errors”, ).读对象型属性 (“Item”, 0)
    v ＝ 到整数 (obj.读数值属性 (“Number”, ))
    .如果真 (v ≠ 0)
        错误文本 ＝ obj.读文本属性 (“Description”, )
        传错误描述 ＝ 错误文本
        ' 输出调试文本 (“数据库最后错误描述：” ＋ 错误文本)
    .如果真结束


.如果真结束
返回 (v)