<% dbfilename="system/AccessDB/#data.mdb" '数据库的地址 mycnstr="Driver={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath(dbfilename) Session.Timeout=30 'session的有效时间为30分钟 set cn=server.CreateObject("ADODB.Connection") set rs=server.createobject("ADODB.recordset") cn.Open mycnstr %> <% Response.Buffer=true '禁用缓存，保护数据的安全 Response.ExpiresAbsolute=now()-1 Response.Expires=0 Response.CacheControl="no-cache" Session.Timeout=30 %> <% mymenu="home" myurl="index.asp" %>

Headquarter:No.7#,111,1580, Humin Road, Minhang zone, Shanghai, China