?% Response.CodePage=65001 Response.Charset="utf-8" %> ?% SqlDataBase = "DBDB/database.mdb" '数据库路? SqlProvider = "Microsoft.Jet.OLEDB.4.0" '驱动程序[ Microsoft.Jet.OLEDB.4.0 Microsoft.ACE.OLEDB.12.0 ] SqlPassword = "" 'ACCESS数据库密? Connstr="Provider="&SqlProvider&";Jet Oledb:Database Password="&SqlPassword&"; Data Source="&Server.MapPath(SqlDataBase) Set Conn=Server.CreateObject("ADODB.Connection") Conn.open ConnStr Set Rs = Server.CreateObject("ADODB.Recordset") %>