举个简单的例子,对于类似下列代码,我不知道会不会引起数据库并发操作。Dim Cn As ObjectPrivate Sub Form_Load()
Set Cn = CreateObject("adodb.connection")
Cn.Open "连接SQL数据库……"
Timer1.Interval = 1000
Timer1.Enabled = True
End SubPrivate Sub Command1_Click()
Cn.execute "update 表1 set 列3=100 where 条件=值"
End SubPrivate Sub Timer1_Timer()
Cn.execute "update 表1 set 列3=200 where 条件=值"
End SubPrivate Sub Form_Unload(Cancel As Integer)
Cn.Close
Set Cn = Nothing
End Sub
我想询问,在Command1单击时,会不会有不成功的可能性。如果有,应如何解决。
Set Cn = CreateObject("adodb.connection")
Cn.Open "连接SQL数据库……"
Timer1.Interval = 1000
Timer1.Enabled = True
End SubPrivate Sub Command1_Click()
Cn.execute "update 表1 set 列3=100 where 条件=值"
End SubPrivate Sub Timer1_Timer()
Cn.execute "update 表1 set 列3=200 where 条件=值"
End SubPrivate Sub Form_Unload(Cancel As Integer)
Cn.Close
Set Cn = Nothing
End Sub
我想询问,在Command1单击时,会不会有不成功的可能性。如果有,应如何解决。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货