事件回滚问题哪位大虾帮忙????

surpriseruck 2004-05-02 10:39:54
我运用了事件回滚,但一直报错,请帮我看一下
Public Function ExecSql(ByVal SqlStr As String) '添加、删除、修改
On Error GoTo Err_Rollback
Set cnn = New ADODB.Connection
' cnn.BeginTrans
cnn.Open ConnectString
cnn.Execute SqlStr
' cnn.CommitTrans
Set cnn = Nothing
Exit Function
Err_Rollback:
' cnn.RollbackTrans
Resume Err_Rollback
End Function
...全文
47 回复 点赞 打赏 收藏 举报
写回复
回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
相关推荐
发帖
数据库(包含打印,安装,报表)
加入

1190

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2004-05-02 10:39
社区公告
暂无公告