首页添加篇

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">  <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/

(待续)

时间: 2024-08-28 09:44:57

首页添加篇的相关文章

首页保存篇

savearticle.asp'同上这也是安全的保证!<%if request.cookies("adminok")="" then response.redirect "login.asp"end if%><%'判断字符段是否为空!如果不加判断会对保存数据库造成影响!if request.form("txttitle")="" then response.write "错误提示

支付宝9.9添加首页功能在哪里 新支付宝9.9首页添加快捷入口方法

如何定制支付宝首页功能? 1.打开新支付宝9.9然后你会发生界面所有改变了,我们点击"全部"找到并且可以看到 全部功能界面: 2.然后在进入到的界面中我们点击"管理"也可以 长按任意应用,即可进入编辑模式: 3.在编辑状态下我们可以通过使用"+"或"-",定义应用了,也可以进行拖动自定义排序: 4.完成首页七宫格的私人定制. 好了这样关于支付宝9.9添加首页功能使用操作方法就介绍完了,每一个新版本都会有不同的一个改进或功能升级

ASP首页模板篇

模板 default.asp'下面就是本站首页显示的样本程序:http://asp.on.net.cn/'适用与本站所有的首页显示程序.<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>ASP动感在线 http://ASP.on.net.cn</title><link rel=&

网易首页添加魔兽世界链接WOW正式登场

从代理权之争到审批之难,CWOW的命运不可不为多舛,虽已开启内测,但居然从魔兽世界变成了"盒子世界",这边不讨好CWOW玩家,那边还要继续面临审批危机,网易一时之间恐怕也是头大如牛. 据消息称,网易数日前第二次送审的修正版<魔兽世界>再次遇阻,可能发现新问题.这次遇阻将使<魔兽世界>前途未卜,甚至导致该游戏内测终止,再度陷入停服. 不过今天有细心的用户发现,网易首页已悄然放上了魔兽世界的超级链接,并且以红色字体特别标注,是否意味着CWOW正式登场,暗示审批成功已

首页显示篇

显示 index.asp '读入数据库链接!<!--#include file="articleconn.asp"--><html><%'每页最大显示数为20 const MaxPerPage=20 dim totalPut dim CurrentPage dim TotalPages dim i,j dim typename dim keyword keyword=trim(request("keyword")) if not ise

首页删除篇

delete.asp'表示下文要使用VB脚本!<%@ LANGUAGE="VBSCRIPT" %>'密码验证<%if request.cookies("adminok")="" then response.redirect "login.asp"end if'读入数据库链接!<!--#include file="articleconn.asp"-->'删除数据库内容的语句<

分享DEDECMS程序首页的SEO优化

随着开源程序的普及,越多人使用DEDECMS程序建立网站了,之前写过一篇<分享DEDECMS程序的基本优化>教程,浏览的人数挺多的,看来用DEDECMS程序的站长确实非常多,之前因为没有细分去讲解,所以这篇文章主要讲解一下网站的首页SEO优化. 第一:首页头部优化 首页头部指的是HEAD区域,全站头部调用的都是HEAD区域里的内容,所以可以在此处添加自定义的句子,并在句子当中穿插网站首页的目标关键词,之前大部分站长都是在FOOTER底部穿插的,但使用的人多了效果可能被削减了,所以建议在HEAD

ASP.NET入门数据篇

asp.net|数据 对于网站编程的初学者来说,总是会上网找些源码来看,但久而久之还是停留在改代码的阶段,并不明白怎样去写一个完整的网站程序.有见如此我就开始写这样的文章(c#版),不足之处请批评指正. 数据库连接篇 在WEB项目里看到Web.config配置文件,在configuration这行加入下面代码用于和SQL服务器进行连接 <appSettings><!-- 数据库连接字符串 --><add key="ConnStr" value="

首页管理篇

manage.asp'管理页同首页显示篇差不多,这里阿喔只介绍如何连接删除链!'见尾页<%if request.cookies("adminok")="" then response.redirect "login.asp"end if%><!--#include file="articleconn.asp"--><html> <head><meta http-equiv=