58问答库 > VB中连接无法用于执行此操作。在此上下文中它可能已被关闭或无效求大神指导，详解。。。

VB中连接无法用于执行此操作。在此上下文中它可能已被关闭或无效求大神指导，详解。。。

2025-03-22 18:17:25

推荐回答（2个）

回答（1）：

ADODB.Recordset在Open的时候是不需要pubcnn的，给你一段代码作参考：

Dim sql as String

Dim sConn as String

sql = "Select * from XXX"

sConn = "" 'sConn是数据库连接字符串

Set Rec = CreateObject("ADODB.Recordset")
Rec.CursorLocation = 3
Rec.Open sql, sConn, 3, 1

Do While Not Rec.EOF

'你的代码

Rec.MoveNext

Loop

Rec.Close

回答（2）：

pubcnn要设为全局变量

VB中 连接无法用于执行此操作。在此上下文中它可能已被关闭或无效 求大神指导，详解。。。

VB中连接无法用于执行此操作。在此上下文中它可能已被关闭或无效求大神指导，详解。。。