深圳升蓝软件
数据库开发 .Net技术  |  ASP技术 PHP技术 JSP技术 应用技术类   
Hiblue Software

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


March 25,2004
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/

                           (待续)
Copyright © 2001-2008 Shenzhen Hiblue Software Team All rights reserved