VBA数据层错误处理

Question

我有一些遗留的Excel文件,包含大量对存储过程和数据库连接的调用,所有这些都是以记录集的旧方式完成的...

因为在VBA中没有try-catch的概念 - 最终在.NET中有什么最佳实践可以应用于拥有更加可靠的数据访问层？我想有一个很好的例子,说明如何打开连接,执行需要一些参数的存储过程,然后在任何情况下成功或错误,关闭连接并释放资源.

Answer 1

在VBA中,你必须使用On Error块:它很乱,但它有效

On Error Goto ConnectionFail
' open connection
on Error GoTo 0
...
On Error GoTo QueryFail
' execute querys etc
on Error goto 0
...
Cleanup:
' close connection destroy objects etc
Exit Sub
ConnectionFail
On Error GoTo 0
' handle failure
GoTo Cleanup
QueryFail
On Error GoTo 0
' handle failure
GoTo Cleanup
End Sub