写出asp程序设计中连接access数据库(st.mdb)的代码

dim db,conn,connstr
db="st.mdb"
set Conn = server.CreateObject("ADODB.Connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="& server.MapPath("data/"&db&"")
conn.Open connstr

server.MapPath里的路径自己看着改下