企业网站后台实验报告(无主页).docVIP

三、实验步骤 （一）数据库链接设计 （1）设计思路：一个小型的企业网站，有许多地方需要与数据库相连，可以从中读取数据，单独制作了一个页面用来与数据库连接，要连接时只要引用该页面就可以，连接文件!—include file=”conn.asp”--的形式出现在每个文件的顶部，这样做方便修改。 （2）实现文件：conn.asp （3）实现功能代码如下： % dim conn dim connstr dim db db=../Data/data.ofe 数据库文件位置 on error resume next connstr=DBQ=+server.mappath(db)+;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)}; set conn=server.createobject(ADODB.CONNECTION) if err then err.clear else conn.open connstr end if sub CloseConn() conn.close set conn=nothing end sub % （二） 后台登录设计 （1）设计思路：后台管理员输入用户名、密码和附加码，点击“确定”按钮，系统先判断输入的附加码是否正确，如果错误将直接报错并返回登录页面，如果附加码输入正确，则将后台管理员提交的数据与数据库内管理员信息进行对比，如果正确，登录成功，进入后台管理。 （2）实现文件：Login.asp （3）实现功能代码如下： center table width=264 border=0 align=center cellpadding=3 cellspacing=1 bgcolor=#ECF5FF form action=Admin_ChkLogin.asp method=post tr bgcolor=#f7f7f7 td colspan=2div align=centerstrong后 台 登 陆/strong/div/td /tr tr bgcolor=#FFFFFF td width=70 bgcolor=#FFFFFF用户名称：/td td width=192input name=UserName type=text maxlength=20 /td /tr tr bgcolor=#FFFFFF td bgcolor=#FFFFFF用户密码：/td tdinput name=Password type=password maxlength=20 /td /tr tr bgcolor=#FFFFFF td height=40 colspan=2 bgcolor=#FFFFFF input type=submit value= 确nbsp;认 input name=reset type=reset value= 清nbsp;除 /td /tr /form /table /center （三）管理员设置 （1）设计思路：增加管理员账号时，首先判断各项是否为空，如果都填写了，直接点击确认添加就可以了，。如果是正确的，再判断输入的新管理密码和确认新密码中的值是否相等，用以防止管理员在修改密码时输错，导致无法进入后台。全部判断为正确后就提交数据库进行修改。 实现文件：Free_aboutus.asp 实现功能代码如下： %@ language=VBScript% !--#include file=admin.asp-- !--#include file=conn.asp-- %job=server.htmlencode(Trim(Request(content))) % %if Request.QueryString(no)=eshop then set rs=server.createobject(adodb.recordset) sql=select * from Free_main rs.open sql,conn,3,3 rs(Job)=Job rs.update rs.close response.redirect Free_aboutus.asp end if sql=select * from Free_main Set rs_home= Ser