你在定义mrc时,应该是这样
Dim mrc As new ADODB.Recordset
或者在打开记录前先为记录集申请内存空间
set mrc=new ADODB.Recordset

解决方案 »

  1.   

    你的数据库一定是连的sql吧!那得先建立数据库结构才行!
      

  2.   

    这个函数返回值是什么?executesql(txtsql, msgtext)
      

  3.   

    不好意思,表达的不太好,是返回的数据类型是什么?ADODB.Recordset 吗?
      

  4.   

    不知道你的executesql里面是否为返回的recordset创建对象了,下面这样写就对了:Function executesql(....) as ADODB.Recordset
      dim rs as ADODB.Recordset  set rs = new ADODB.Recordset  rs.open ....
      .....
      .....  Set executesql = rs  Exit fucntion在call executesql之前
    set mrc = new ADODB.Recordset,没有作用,因为
    在执行了set mrc = executesql(...)之后,mrc被reset了仔细检查你的executesql函数。
    另外你的代码中还有其他的问题 :)
      

  5.   

    加上new之后,还是有错误:3704  对象被关闭时,操作不被允许
    还是不行,谢谢楼上各位了
      

  6.   

    xks(轻风逐浪) 你好,
    我已经建立了数据库结构,也为表格添加了用户。