建立连接对象
db="Driver=Microsoft Access Driver (*.mdb);DBQ="&Server.MapPath("name.mdb")
'db= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath("name.mdb")
set conn=server.createobject("adodb.connection")
conn.open db
'建立函数,在有数据连接页未call closeconn()以便关闭所有连接对象
sub closeconn()
conn.close
set conn=nothing
end sub
'可应用recordcount等对象
set rs=server.createobject("adodb.recordset")
sql="select * from [表名] order by orderid desc,id desc"
rs.open sql,conn,1,1
'仅显示指定记录
sql="select * from [表名] order by orderid desc,id desc"
set rs=conn.execute(sql)
'增加记录
sql="insert into [表名](filename1,filename2) values('"&filename01&"','"&filename02&"')"
conn.execute(sql)
'修改记录
sql="update [表名] set filename1='"&filename01&"',filename2='"&filename02&"'"
conn.execute(sql)
'删除记录
sql="delete * from [表名] where id="&id
conn.execute(sql)