我用的是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溢出上下文
不知道是怎么可事,请高手指点!!!!!!!

解决方案 »

  1.   

    你看一下你path是不是很深,你換一路徑試試看,真接放到C盤下面
      

  2.   

    你不如用读取INI文件的方法呀,这样的话,以后改路径也方便一些!
      

  3.   

    App.path后面是否带了一个"\"符号?因此,放在根目录下肯定是不行的。
    还有,我不知道你这是用什么连接,我平时连接用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