先尝试一下引用高版本的ADO库,如microsoft ActiveX Data Objects 2.6 library
如果不行的话,你需要重新安装MADC,版本最好在2.6左右。

解决方案 »

  1.   

    dim cn as connection
      

  2.   

    奇怪?!
    你先定义cn没有阿?
    如下:Dim cn AS ADODB.Connection此外可能权限问题,我碰到过,
    用本机管理员试试。估计问题出在简单地方。
    ^_^
      

  3.   

    如果还是有错误就重装MDAC,最好是2.6以上的。
      

  4.   

    dim cn as connection
    Set cn = New ADODB.Connection 
    这样可以了吧
      

  5.   

    抱歉.我定义了cn .如下 Dim cn as New ADODB.Connection .我访问的是阿Access数据库。谢谢大家,我先试试安装MDAC。
      

  6.   

    Dim cn as ADODB.Connection 
    Set cn = New ADODB.Connection
      

  7.   

    你用了两个NEW,
    楼上是TRUE。
      

  8.   

    dim cn as new adodb.connection
      

  9.   


    Dim cn as ADODB.Connection 
    Set cn = New ADODB.Connection
    这两句绝对没问题的。
      

  10.   

    dim cnn as ADODB.Connection