在模块中输入
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset
然后按F5运行时,提示:编译错误,无效外部过程

解决方案 »

  1.   

    是不是没有在工程->引用中加入ADO
      

  2.   

    引入了
    是不是要加入这样的语句
    private sub connectionsql()
    这样的语句?
      

  3.   

    private sub connectionsql()
    set conn = new adobo.connection
    set rs = new adobo.recordset
    这样?
    我现在也被弄糊涂了
    在网上找了很多VB连接SQL的例子
    方法真是千奇百怪,什么样的方法都有,而且介绍的都不详细,基本上都是一带而过,所以,让我这样的菜鸟来领悟这样模糊的技术,确实有一定的困难,可以说是举步唯艰。还请各位大师多多赐教,谢谢!
      

  4.   

    dim cn as new adodb.connection
    dim rs as new adodb.recordset
    if cn.state=adstateopen then cn.close
    cn.provide="Micosoft.Jet.oledb.4.0"
    cn.connectstring=app.path & "DATABASE.MDB"
    cn.open
    rs.open "select * from A",cn,1,3
      

  5.   

    引入了
    我引入的是microsoft activex data objects 2.8 library 和recordset2.8
      

  6.   

    我也碰到过这样的问题,是ADO出问题了,搞得我没有办法重新装的机子才能用
      

  7.   

    microsoft activex data objects 2.5 library 试试 不要用2.8