‘ADOfunction.asp 编写了一个公共函数
<%  Dim objConn   
    Function  RSExcute(Filename ,SQLtxt)
   Set objConn=Server.CreateObject("ADODB.Connection")
      ' objConn.ConnectionString="Provider=Microft.Jet.OLEDB.4.0;" & "Data Source=" & Server.MapPath(Filename)
        objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                                   "Data Source=" & Server.MapPath(FileName)               
      objConn.open 
     ' Set  RSExcute = Server.CreateObject("ADODB.Recordset") 
      Set  RSExcute=objConn.Excute(SQLtxt)
   End Function

%>    





<!-- #include file="ADOFunction.asp" -->    '调用的ASP网页
<%
      strSQL="select * from 出货单"
      Set objConn=Server.CreateObject("ADODB.Connection")
      FileName="ORDER.MDB"
           
      Set  MYRS=RSExcute(FileName,strSQL)      

       response.write("正确")
      ' MYRS.MoveFirst;
     ' response.write(MYRS(0))
    %>

结果，IE程序报错:

错误类型：
ADODB.Connection (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/myweb2/ADOFunction.asp, 第 9 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) 
网页：
GET /myweb2/Example.asp 

上面的代码，有错么。，各位大虾给小弟指点迷津 ，先谢谢了（还有，如果不使用纪录集，只是连接数据库，就不报错，郁闷）