|
|
4.2.4新闻管理模块设计
为了使网站工作人员更加方便快捷的对该网站有关的广告进行统一的管理，设计了该模块，此模块具有对公司新闻和业内咨询的添加、删除、修改的功能。
文件名为：manage_news.asp，具体显示如图4-4所示。
图4-4 新闻管理页面在浏览器中运行的结果
部分代码如下：
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from conews order by id desc"
rs.open sqltext,conn,1,1
dim maxperpage
maxperpage=20
dim text,checkpage
text="0123456789"
rs.pagesize=maxperpage
for i=1 to len(request("page"))
checkpage=instr(1,text,mid(request("page"),i,1))
if checkpage=0 then
exit for
end if
next
if checkpage<>0 then
if not isempty(request("page")) then
currentpage=cint(request("page"))
if currentpage < 1 then currentpage = 1
if currentpage > rs.pagecount then currentpage = rs.pagecount
else
currentpage= 1
end if
if not rs.eof then rs.absolutepage = currentpage end if
else
currentpage=1
end if
call showpages
call list
if rs.recordcount > maxperpage then
call showpages
end if
'显示帖子的子程序
sub list()%>
<!-- #include file="inc/head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="150" align="center" valign="top"> <table width="150" height="100%" border="0" cellpadding="0" cellspacing="0" class="headertdstyle">
<tr>
<td align="center" valign="top"><table width="100%" height="24" border="0" cellpadding="0" cellspacing="0">
<tr> <td align="center">功能菜单</td></tr>
</table>
<table width="100%" height="90%" border="0" cellpadding="0" cellspacing="0" class="menubg">
<tr>
<td align="center" valign="top">
<table width="90%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="16%"><img src="../img/left_1.gif" width="28" height="11"></td>
<td width="84%" height="20"><font color="#ffff00">新闻管理</font></td>
</tr>
</table>
<table width="90%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="34%" height="20" align="right"><img src="../img/left_1_1.gif" width="29" height="16"></td>
<td width="66%" valign="bottom"><a href="manage_news.asp"><font color="#ffff00">公司新闻管理</font></a></td>
</tr></table>
<table width="90%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="34%" height="20" align="right"><img src="../img/left_1_1.gif" width="29" height="16"></td>
<td width="66%" valign="bottom"><a href="manage_newsadd.asp"><font color="#ffff00">添加公司新闻</font></a></td>
</tr>
</table>
<table width="90%" border="0" cellpadding="0" cellspacing="0">
<tr> <td width="34%" height="20" align="right"><img src="../img/left_1_1.gif" width="29" height="16"></td>
<td width="66%" valign="bottom"><a href="manage_yenews.asp"><font color="#ffff00">业内资讯管理</font></a></td>
</tr></table>
<table width="90%" border="0" cellpadding="0" cellspacing="0">
<tr> <td width="34%" height="20" align="right"><img src="../img/left_1_1.gif" width="29" height="16"></td>
<td width="66%" valign="bottom"><a href="manage_yenewsadd.asp"><font color="#ffff00">添加业内资讯</font></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
<td align="center" valign="top">
<strong>
</strong>
<table width="550" border="0" cellspacing="0" cellpadding="0">
<tr> <td height="25"> <div align="center"><strong>新闻管理
</strong></div></td>
</tr>
<tr> <td><div align="center">
<table width="100%" border="0" cellspacing="2" cellpadding="3">
<tr bgcolor="#c0c0c0">
<td width="8%" height="25" bgcolor="#c0c0c0"> <div align="center">id</div></td>
<td width="62%"> <div align="center">新闻标题</div></td>
<td width="10%"> <div align="center">操作</div></td>
<td width="10%"> <div align="center">操作</div></td>
<td width="10%"> <div align="center">操作</div></td>
</tr>
<%
if not rs.eof then
i=0
do while not rs.eof
%>
<tr bgcolor="#e3e3e3">
<td height="22"> <div align="center"><%=rs("id")%></div></td>
<td> <%=rs("title")%></td>
<td> <div align="center"><a href=../newsinfo.asp?id=<%=rs("id")%> target="_blank">查看</a></div></td>
<td bgcolor="#e3e3e3">
<div align="center"><a href="manage_editnews.asp?id=<%=rs("id")%>">修改</a></div></td>
<td> <div align="center"><a href="manage_news.asp?id=<%=rs("id")%>&no=eshop">删除</a></div></td>
</tr>
<%
i=i+1
if i >= maxperpage then exit do
rs.movenext
loop
end if
%>
<tr bgcolor="#c0c0c0">
<td height="25" colspan="5"> <%
response.write "<strong><font color='#000000'>-> 全部-</font>"
response.write "共</font>" & "<font color=#ff0000>" & cstr(rs.recordcount) & "</font>" & "<font color='#000000'>条新闻</font></strong> "
response.write "<strong><font color='#000000'>第</font>" & "<font color=#ff0000>" & cstr(currentpage) & "</font>" & "<font color='#000000'>/" & cstr(rs.pagecount) & "</font></strong> "
if currentpage > 1 then
response.write "<strong><a href='manage_news.asp?&page="+cstr(1)+"'><font color='#000000'>首页</font></a><font color='#ffffff'> </font></strong>"
response.write "<strong><a href='manage_news.asp?page="+cstr(currentpage-1)+"'><font color='#000000'>上一页</font></a><font color='#ffffff'> </font></strong>"
else
response.write "<strong><font color='#000000'>上一页 </font></strong>"
end if
if currentpage < rs.pagecount then
response.write "<strong><a href='manage_news.asp?page="+cstr(currentpage+1)+"'><font color='#000000'>下一页</font></a><font color='#ffffff'> </font>"
response.write "<a href='manage_news.asp?page="+cstr(rs.pagecount)+"'><font color='#000000'>尾页</font></a></strong> "
else
response.write ""
response.write "<strong><font color='#000000'>下一页</font></strong> "
end if
'response.write "</td><td align='right'>"
'response.write "<font color='#000000' >转到：</font><input type='text' name='page' size=4 maxlength=4 class=smallinput value="¤tpage&"> "
'response.write "<input class=buttonface type='submit' value='go' name='cndok'> "
%></td></tr></table>
<%
end sub
rs.close
%>
</div></td></tr>
</table>
</td></tr>
</table>
<!-- #include file="inc/foot.asp" -->
4.2.5产品管理模块设计
这个模块是管理产品信息，包括：对产品类别的设置（大类及小类的添加、修改和删除操作），新产品的添加，对已有产品的修改和删除，对产品的审核。其文件名为articlemanage.asp。具体显示如图4-5所示。
图4-5 产品管理页面在浏览器里运行的结果
4.2.6注册会员管理模块
在该页面中，管理员可以修改和删除在主页注册的会员资料。具体显示如图4-6所示。
图4-6 注册会员管理页面在浏览器中运行的结果
4.2.7留言管理模块
这个模块有管理留言板信息功能，对客户的留言进行修改和删除操作。同时，还可以发布管理员公告。具体显示如图4-7所示。
图4-7 留言管理页面在浏览器中运行的结果
4.2.8人才管理模块设计
人才管理模块包括，招聘管理，发布招聘和应聘管理，通过该模块，公司可以发布招聘信息，修改已有的招聘信息及删除不需要的招聘信息。还可以对来应聘的信息进行审核和筛选，以便找到符合公司需要的人才。具体显示如图4-8所示。
图4-8 人才管理页面在浏览器中运行的结果
4.2.9订单管理模块设计
这部分是管理客户的订单，可以查看订单的审核情况和订单的具体内容，还可以对订单进行删除操作。具体显示如图4-9所示。
图4-9 订单管理页面在浏览器中运行的结果
由于后面几个部分的代码和新闻管理模块的很相似，这里就不一一列出了。 |
|
鲁公网安备 37120302000001号
