-
您的位置:首页 → 精文荟萃 → 软件资讯 → 动感首页更新实现之二 ------ 首页保存篇
动感首页更新实现之二 ------ 首页保存篇
时间:2004/10/7 19:05:00来源:本站整理作者:蓝点我要评论(0)
-
savearticle.asp
'同上这也是安全的保证!
<%
if request.cookies("adminok")="" then
response.redirect "login.asp"
end if
%>
<%
'判断字符段是否为空!如果不加判断会对保存数据库造成影响!
if request.form("txttitle")="" then
response.write "错误提示:未输入标题!"
'显示问题,强制暂停 response.end就是这个用处!
'大家可从中慢慢体会!
response.end
end if
'同上
if request.form("txtcontent")="" then
response.write "错误提示:未输入内容!"
response.end
end if
%>
'articleconn.asp是数据库连接位置,分开放是因为数据库是可下载的!
'以后用户改数据库名可保正不被人看到
'这是自动换行的标识判断程序!
'大家可下载动感首页更新看到,慢慢研究!
<%
'dim定义变量,VB爱好者的当然相当熟悉了(注意:不可重复定义)
dim listname
dim url
dim title
dim content
dim sql
dim rs
dim filename
dim articleid
dim outfile
'htmlencode2看了articlechar.inc进行过滤
'注意:txttitle,txtcontent,txturl的变化(几乎所有的ASP程序的关键)
'阿喔认为,动感万不变,只有字符段变化,这是方便更新的关键!
'
title=htmlencode2(request.form("txttitle"))
content=htmlencode2(request.form("txtcontent"))
url=htmlencode2(request.form("txturl"))
'链接数据库articleconn.asp以帮你作了!
'现在知道include的妙用了吧!
'阿喔的http://asp.on.net.cn/都使用了include其方便更新帮了阿喔
'一个大忙!
set rs=server.createobject("adodb.recordset")
sql="select * from learning where (articleid is null)"
'打开数据库 conn,1,3中3是关键,写的意思可别少了!
rs.open sql,conn,1,3
'添加新的数据
rs.addnew
'大家看三个字符右出现了RS("title")表示数据库中项的名称
'大家打开new.dmb就知道了!三个变量赋予数据库
rs("title")=title
rs("content")=content
rs("url")=url
rs("dateandtime")=date()
rs.update
'ID为自动添加!
articleid=rs("articleid")
关闭数据库是一个习惯,要不然会影响服务器速度,造成系统崩溃!
rs.close
set rs=noting
conn.close
set conn=nothing
'完成页面添加后制动进入index.asp页
response.redirect "index.asp"
%>
大家注意的是两点:
1.判断句数据是否为空是必要的,要不然会造成数据无法添加
2.Txttitle,txtil和txtcontent文字段,如何提交的数据库是关键
相关阅读
Windows错误代码大全 Windows错误代码查询激活windows有什么用Mac QQ和Windows QQ聊天记录怎么合并 Mac QQ和Windows QQ聊天记录Windows 10自动更新怎么关闭 如何关闭Windows 10自动更新windows 10 rs4快速预览版17017下载错误问题Win10秋季创意者更新16291更新了什么 win10 16291更新内容windows10秋季创意者更新时间 windows10秋季创意者更新内容kb3150513补丁更新了什么 Windows 10补丁kb3150513是什么
-
热门文章
360快剪辑怎么使用 36金山词霸如何屏幕取词百度收购PPS已敲定!3
最新文章
微信3.6.0测试版更新了微信支付漏洞会造成哪
360快剪辑怎么使用 360快剪辑软件使用方法介酷骑单车是什么 酷骑单车有什么用Apple pay与支付宝有什么区别 Apple pay与贝贝特卖是正品吗 贝贝特卖网可靠吗
人气排行
xp系统停止服务怎么办?xp系统升级win7系统方电脑闹钟怎么设置 win7电脑闹钟怎么设置office2013安装教程图解:手把手教你安装与qq影音闪退怎么办 QQ影音闪退解决方法VeryCD镜像网站逐个数,电驴资料库全集同步推是什么?同步推使用方法介绍QQ2012什么时候出 最新版下载EDiary——一款好用的电子日记本
查看所有0条评论>>