这样连接的数据库,如何断开?

riluo 2001-06-10 04:57:00
With Adodc1 'connect with database by adodc1
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
& "E:\bluemoon\codefactory.mdb" _
& ";Persist Security Info=False"
.RecordSource = "select * from LabInfo" 'sql
End With
...全文
147 10 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
riluo 2001-06-17
  • 打赏
  • 举报
回复
New_Apollo 2001-06-10
  • 打赏
  • 举报
回复
New_Apollo 2001-06-10
  • 打赏
  • 举报
回复
if adodc1.Recordset.State then adodc1.Recordset.Close
Set adodc1.Recordset=nothing
if adodc1.State then adodc1.Close
Set adodc1=nothing

这样该很完整了吧
Recordset 和 adodc 都关掉了
riluo 2001-06-10
  • 打赏
  • 举报
回复
我试过了,是关闭了recordset.
无论如何,谢谢大家.
可是谁告诉我电源的插头在哪儿?

日落雁行斜一边偷偷的不怀好意的笑着,一边顺着DevilXelloss(傑洛仕)
家里的烟囱爬了下去,嘿嘿~~~嘿嘿~~~嘿嘿~~~嘿嘿~~~嘿嘿~~~
DevilXelloss 2001-06-10
  • 打赏
  • 举报
回复
拔掉电源…… ^_^
huanggx 2001-06-10
  • 打赏
  • 举报
回复
楼上的办法不能断开连接,只是关闭了recordset。
你要set adodc1 = nothing
New_Apollo 2001-06-10
  • 打赏
  • 举报
回复
if adodc1.Recordset.State then adodc1.Recordset.Close
set adodc1.Recordset=nothing
riluo 2001-06-10
  • 打赏
  • 举报
回复
谢谢,试试看.
DTWUJP 2001-06-10
  • 打赏
  • 举报
回复
同意楼上。
guest 2001-06-10
  • 打赏
  • 举报
回复
adodc1.Recordset.Close.

1,217

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧