<%set conn=Server.CreateObject("ADODB.Connection")Dbpath=Server.Mappath("数据库名.mdb")conn.Open"driver={Microsoft Access Driver (*.mdb)};dbq="&DBpath%>