asp链接access2010数据库

https://www.microsoft.com/zh-cn/download/details.aspx?id=13255

Access 2010 数据库引擎可再发行程序包不用于以下用途：

1. 作为 Jet 的一般替代品（如果您需要 Jet 的一般替代品，应该使用 SQL Server Express Edition）。
2. 作为服务器端应用程序的 Jet OLEDB 提供程序的替代品。
3. 作为一般的文字处理、电子表格或数据库管理系统 -用于创建文件。（您可以使用 Microsoft Office 或 Office 自动化来创建 Microsoft Office 支持的文件。）
4. 由系统服务或代码将在系统帐户下运行的服务器端程序使用，或将同时处理多个用户标识，或可高度重入并且期望无状态行为。例如，当没有任何用户登录时从任务计划程序运行的程序；或者，从像 ASP.NET 这样的服务器端 Web 应用程序调用的程序；或者，在 COM+ 服务下运行的分布式组件。
5. 如果您是使用 OLEDB 的应用程序开发人员，请将 ConnectionString 属性的 Provider 参数设置为“Microsoft.ACE.OLEDB.12.0”。
   

   dim conn,rs,sql
   set conn = Server.CreateObject("ADODB.Connection")
   conn.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&Server.MapPath("Data/Test.accdb")&";Persist Security Info=False"
   conn.Open
   
   sql="select * from mytb"
   set rs = Server.CreateObject("ADODB.Recordset")
   rs.open sql,conn,1,1
   if not rs.EOF Then
   	while Not rs.EOF
   		response.Write(rs("username")&"
   ")
   	  rs.moveNext
   	Wend
   end if
   rs.close
   set rs=nothing
   conn.close
   set conn=Nothing
   

   自己学习吧，哈哈。