电子商务网站建设与管理实务项目7资料.ppt

3.安装完成后，再次进入?控制面板，选择?管理工具，双击?Internet(IIS)管理器?选项，进入IIS设置。 项目7 制作留言版系统 任务1：系统功能分析 任务2：留言发布页面的实现 任务3：后台留言管理系统的实现 任务3：后台留言管理系统的实现 一、留言板系统管理页面——分页显示、删除页面 Book_List.ASP 二、留言的回复、修改页面Book_Edit.ASP 一、留言板系统管理页面——分页显示、删除页面 Book_List.ASP 图7-10留言板系统管理页面 代码如下。 !--#include file=Conn.ASP -- !--#include file=inc/function.asp -- % If Session(Admin)= Then Response.Redirect login.asp target=_parent % html head meta http-equiv=Content-Type content=text/html; charset=gb2312 / title留言本-管理/title link href=inc/main.css rel=stylesheet type=text/css /head body leftmargin=0 topmargin=0 table width=100% border=0 align=center cellpadding=0 cellspacing=0 tr td height=25 background=IMAGES/BJ.GIF留言管理/td /tr tr td height=25/td /tr tr td % Dim Rs,Sql Set Rs = Server.CreateObject(ADODB.Recordset) Sql = Select * From Guest_Book Order By ID Desc Rs.Open Sql,Conn,1,1 If Rs.Eof And Rs.Eof Then Response.Write p align=center目前还没有留言！/p Else Page = Request(Page) Rs.PageSize = 2 PageSize = Rs.PageSize If Page= Then Page=1 Rs.AbsolutePage = Page Do While Not Rs.Eof And PageSize0 % table width=600 border=0 align=center cellpadding=0 cellspacing=1 bordercolor=#CCCCCC bgcolor=#37ABFF tr td width=80 height=30 align=center valign=middle bgcolor=#FFFFFF留言者/td td width=220 bgcolor=#FFFFFFnbsp;%=Rs(User)%/td td width=80 align=center valign=middle bgcolor=#FFFFFF留言时间/td td width=220 bgcolor=#FFFFFFnbsp;%=Rs(PostTime)%/td /tr td height=30 align=center valign=middle bgcolor=#FFFFFF留言主题/td td colspan=3 bgcolor=#FFFFFFnbsp;%=Rs(Title)%/td /tr td height=30 align=center valign=middle bgcolor=#FFFFFF留言内容/td td colspan=3 bgcolor=#FFFFFF%=UnHtml(Rs(Content))%/td /tr td height=30 align=center valign=middle bgcolor=#FFFFFF留言回复/td td colspan=3 bgcolor=#FFFFFF%=UnHtml(Rs(Reply))%brnbsp;[%=Rs(ReplyTime)%]/td /tr tr td height=30 colspan=4 align=center valign=middle bgc