我用的是ACCESS数据库:
Public constr As String
Dim path As Stringpath = App.path & "\data\data.mdb"
constr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & path
我逐步调试时出现如下错误:ocnstr溢出上下文
不知道是怎么可事,请高手指点!!!!!!!
Public constr As String
Dim path As Stringpath = App.path & "\data\data.mdb"
constr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & path
我逐步调试时出现如下错误:ocnstr溢出上下文
不知道是怎么可事,请高手指点!!!!!!!
还有,我不知道你这是用什么连接,我平时连接用ADO2.5进行连接的,代码如下:Dim mFileCon As ADODB.Connection
Set mFileCon = New ADODB.Connection
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset
Dim strCon As String
Dim strSQL As StringstrCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & 数据库名称 & ";Persist Security Info=False"
mFileCon.Open strCon
strSQL = SQL语句
Set rst = mFileCon.Execute(strSQL)Do While Not rst.EOF
处理rst
rst.MoveNext
Loop