各位DX,我用ADODC连接数据库时,错误提示:对象变量或with块变量未设置.怎么解决啊?

Question

各位DX,我用ADODC连接数据库时,错误提示:对象变量或with块变量未设置.怎么解决啊?

Answer 1

'引用:Microsoft ActiveX Data Objects 2.x Library
'2.5x版本号Sub test
    Dim iDb As ADODB.Connection
    Dim iConc As String    iConc = "数据库连接字符串"
    
    Set iDb = New ADODB.Connection  '有这句吗?
    iDb.Open iConc
    
   
    iDb.Close
    Set iDb = Nothing
End Sub

Answer 2

'上面的过程也可以改为:
Sub test
    Dim iDb As New ADODB.Connection
    Dim iConc As String    iConc = "数据库连接字符串"
    
    'Set iDb = New ADODB.Connection  '定义的时候已经创建,就不再要这句了.
    iDb.Open iConc
    
   
    iDb.Close
    Set iDb = Nothing
End Sub

Answer 3

1:
引用microsoft activex data object2.x library
2:
将类似 dim rs as adodb.recordset的定义
改为dim rs as new adodb.recordset