网络收藏

class   kkk  
      function   conn_sql(sql)  
  dim   conn  
  dim   connstr  
  dim   db  
  设置数据库路径  
  db="*.mdb"  
  set   conn   =   server.createobject("adodb.connection")  
  connstr="provider=microsoft.jet.oledb.4.0;data   source="   &   server.mappath(db)  
  conn.open   connstr  
  set   rs=server.createobject("adodb.recordset")  
  rs.open   sql,conn,1,1  
  set   conn_sql=rs  
  end   if  
  set   rs=nothing  
  set   conn=nothing  
  end   function  
  dim   test  
  set   test=new   kkk  
      sql="select   *   from   jj"  
  test.conn_sql   sql  
  .conn_sql方法：输入一个sql查询语句，将查询的结果以一个记录集的形式返回  
  end   class  
   
  现在问题是，我在使用test类的conn_sql方法时，用什么办法可以返回这记录集？？？  
  用set   myrs=test.conn_sql   sql?????   好象不可以  
 

推荐阅读