原创DWMX+ACCESS打造企业新闻系统(四)
这次我们来讲解新闻添加页面xh_write和保存新闻页面xh_save
首先我们来看看xh_write页面
从上图我想大家应该可以看明白,就是给表单各个控件起名字,这样可以方便传递值!
这个表单递交 的页面是xh_save.asp
咱们着重的讲一下的是xh_save.asp,来吧看看下图的代码
<!--#include file="xh_conn.asp"-->
代码是调用数据库连接文件,不连接可就 over了
<%
dim xianhe
xianhe=session("xianhe")
if xianhe="" then
response.redirect "xh_login.asp"
end if
% >
在这里大家还记得,在登陆后台的时候我传递给session("yes")这个会话 一个值嘛?
它就是此时有用了,因为如果你登陆不成功,会话就是空值,添加页面就不会被直接URL进去, 想必大家可以听明白我的讲解吧!
好了讲解下面的代码,看上图:
这段代码主要就是声明一个记录集,然后起名RS,用记录集来添加新闻!
set rs=server.createobject("adodb.recordset")
sql="select * from erennew"
rs.open sql,db,1,3
SQL语句对这个数据库的erennew表,然后 rs.open sql,db,1,3是用赋值的参数来打开记录集,附带的1,3简单的来说就是可以让记录集添加数据
rs.addnew
rs("title")=trim(request.form("title"))
rs ("name")=trim(request.form("name"))
rs("content")=server.htmlencode(request.form ("content"))
rs("xhcount")=0
rs("xhtime")=now()
rs.update
这段就是添 加记录的代码
rs.addnew添加
rs.update更新
其中的数据,大家可以明白就是通过递交表单的 参数传递给了数据库!
rs.close
set rs=nothing
response.redirect "xh_add.asp"
关闭记录集,然后跳转页面
好了,这次就说这么些希望大家可以理解消化!