好好软件

 找回密码
 注册会员

QQ登录

只需一步,快速开始

查看: 1265|回复: 0

VB6连接MySQL后如何支持事务处理

[复制链接]
发表于 2022-10-22 21:36:02 | 显示全部楼层 |阅读模式
今天尝试修改Free仓储管理系统支持事务处理,发现按VB默认的启动事务的方式不管用:
  1. Dim connectionString As String
  2.     connectionString = ConnectString
  3.    
  4.     Dim objConnect As New ADODB.Connection
  5.     objConnect.connectionString = connectionString
  6.     objConnect.Open
  7.    
  8.     objConnect.BeginTrans
  9.     ......省略....
  10.     If 错误 Then
  11.         objConnect.RollbackTrans
  12.     Else
  13.         objConnect.CommitTrans
  14.     End If
复制代码


查了很多篇文章后,仍不知问题在哪,后来查了一段PHP连接MySQL支持事务处理的代码,恍然大悟,Mysql启动事务需要以SQL命令的形式执行,修改代码如下,问题解决:
  1. Dim connectionString As String
  2.     connectionString = ConnectString
  3.    
  4.     Dim objConnect As New ADODB.Connection
  5.     objConnect.connectionString = connectionString
  6.     objConnect.Open
  7.    
  8.     objConnect.Execute ("BEGIN")
  9.     ......省略....
  10.     If 错误 Then
  11.         objConnect.Execute ("ROLLBACK")
  12.     Else
  13.         objConnect.Execute ("COMMIT")
  14.     End If
复制代码

希望能够给大家有所启示,这么老的编程语言仍然能完美的支持事务处理,很好了。
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

小黑屋|手机版|Archiver|好好软件 ( 湘ICP备15003160号-1 )

GMT+8, 2024-3-29 21:29 , Processed in 0.218426 second(s), 16 queries .

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表