动感首页更新实现之一 ------ 首页添加篇

发表于:2007-06-30来源:作者:点击数: 标签:
addarticle.asp % @#判断是否是管理者 if request.cookies(adminok)= then @#如果不是回到管理员入口login.asp response.redirect login.asp end if @#如果是继续运行 % html head meta http-equiv=Content-Type content=text/html; charset=gb2312 meta name
addarticle.asp
<%
@#判断是否是管理者
if request.cookies("adminok")="" then
@#如果不是回到管理员入口login.asp
response.redirect "login.asp"
end if
@#如果是继续运行
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<title>创建文章</title>
<link rel="stylesheet" href="../css/style.css">
</head>

<body bgcolor="#FFFFFF">

@#将提交的内容发送到SAVEARTICLE.ASP中去,进行处理!

<form method="POST" action="savearticle.asp">
<div align="center"><center>
<table border="1" cellspacing="0" width="80%"
bgcolor="#F0F8FF" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr>
<td width="100%" bgcolor="#0080C0" height="20">
<p align="center"><b><font
color="#FFFFFF">添 加 首 页</font><font color="#0099CC"> <font color="#FFFFFF">更
新</font></font></b>
</td>
</tr>
<tr align="center">
<td width="100%" height="184">
<table border="0" cellspacing="1" width="100%">
<tr>
<td width="15%" align="right" height="9" valign="middle"><b><font color="#0080C0">更新主题:</font></b></td>
<td width="85%" height="9">

@#Txttitle是提交的文字段名称
@#下面还包括txtil和txtcontent需要提交的文字段



<input class=TextBorder name=txttitle size=50 maxlength="30">
</td>
</tr>
<tr>
<td width="15%" align="right" height="9" valign="middle"><b><font color="#0080C0">链接指示:</font></b></td>
<td width="85%" height="9">
<input class=TextBorder name=txturl size=50 maxlength="50" value="http://">
</td>
</tr>
<tr>
<td width="15%" align="right" valign="top" height="112"><b><font color="#0080C0">更新内容:</font></b></td>
<td width="85%" height="112">
<textarea class="TextBorder" name="txtcontent" cols="75" rows="15"></textarea>
</td>
</tr>
</table>
</td>
</tr>
</table>
</center></div><div align="center"><center><p><input type="submit" value=" 添 加 "
name="cmdok" class="buttonface">&nbsp; <input type="reset" value=" 清 除 "
name="cmdcancel" class="buttonface"></p>
</center></div>
</form>

@#版权信息不要更改!

<p align="center">《<a href="http://asp.on.net.cn/" target="_blank">ASP动感在线</a>》编辑制作</p>
</body>
</html>

就这样添加程序就OK了!
大家注意的是两点:
1.前面的判断句是管理员权限的保正,去掉它!任何人都可进行添加工作!
2.Txttitle,txtil和txtcontent文字段,是提交数据库的关键!以后将就在
这三项文字段变化完成动感效果!

作者:阿喔 出处:<ASP动感在线> http://asp.on.net.cn/

(待续)

原文转自:http://www.ltesting.net