4.2 代码分析/实现
连接数据库的代码:
<%
dim db,strcon
strcon="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("data.mdb")
set db=server.CreateObject("ADODB.Connection")
db.open strcon
%>
管理员登陆模块代码:
if trim(request("yhm"))<>"" and trim(request("mm"))<&g