网页中每篇文章后面的评论功能是怎么实现?拜托各位了 3Q

网页中每篇文章后面的评论功能是怎么实现?拜托各位了 3Q,第1张

先用表单功能建一个留言模板即你说的评论功能,然后再建一个来连接数据库。 我还是给你看看我的吧,不过你要做下修改哦! 我的留言模板是: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><html><head><title>用户留言</title><meta http-equiv="Content-Type" content="text/htmlcharset=gb2312"><style type="text/css"><!-- a:link { color: #000000text-decoration: none} a:visited { text-decoration: nonecolor: #000000} a:hover { text-decoration: nonecolor: #FF9900} a:active { text-decoration: nonecolor: #000000} .style2 {font-size: 16} --></style></head><body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"><!-- ImageReady Slices (分页.psd) --><table id="__01" width="1005" height="1453" border="0" cellpadding="0" cellspacing="0"><!--DWLayoutTable--><tr><td height="209" colspan="5" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"><!--DWLayoutTable--><tr><td width="1005" height="209" valign="top" align="right" background="../images/01.jpg"><a href="#" style="cursor:hand"onClick="window.external.addfavorite(document.location.href,document.title)">加入收藏</a>   <a href="#" style="cursor:hand"onClick="this.style.behavior='url(#default#homepage)'this.setHomePage(document.location.host)">设为首页</a>       </td></tr></table></td></tr><tr><td height="122" colspan="5" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"><!--DWLayoutTable--><tr><td width="1005" height="122" valign="top"><img src="../images/02.jpg" alt="" width="1005" height="122" border="0" usemap="#Map"></td></tr></table></td></tr><tr><td height="924" colspan="2"><img src="../images/03.gif" width="68" height="924" alt=""></td><td width="864" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"><!--DWLayoutTable--><tr><td width="864" height="924" valign="top" background="../images/04.jpg" align="center"><div align="left" class="style2"><div align="left"><% set conn=server.CreateObject("adodb.connection") dbpath=server.MapPath("../database/db.mdb") conn.open "provider=microsoft.jet.oledb.4.0data source=" &dbpath set rs=server.CreateObject("adodb.recordset")%><table width="90%" border="1" cellspacing="0" bordercolor="#E3D3B2"><tr><td colspan="3" align="center"><strong>大家好!欢迎您在本网页对2008北京奥运会进行留言!</strong></td></tr><tr><td>内容</td><td>用户名</td><td>发表时间</td></tr><%sql="select * from 留言 order by 发表时间 desc" rs.open sql,conn do while not rs.eof%><tr><td><%=rs("内容")%></td><td><%=rs("用户")%></td><td><%=rs("发表时间")%></td></tr><% rs.movenext loop%></table><br><br><%if session("yhid")<>"" then%></div></div><form action="yhly1.asp" method="post" class="style2"> <div align="left"><table><tr><td>留言内容:</td><td><textarea cols="40" rows="5" name="lynr"></textarea></td></tr></table><input type="submit" value="发表">   <input type="reset" value="重置"></div></form><div align="left" class="style2"><div align="left"><%end if%>  </div></div></td></tr></table></td><td colspan="2"><img src="../images/05.gif" width="73" height="924" alt=""></td></tr><tr><td width="41" rowspan="2"><img src="../images/06.gif" width="41" height="197" alt=""></td><td height="161" colspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"><!--DWLayoutTable--><tr><td width="919" height="161" valign="middle" align="center" background="../images/07.jpg">2009 大赛组委会 @ All rights reserved.<br>奥ICP备00000000号<br>Email:<a href="mailto:2009guangdong@dasai.cn">2009guangdong@dasai.cn</a><br>Tel:020-26583598  </td></tr></table></td><td width="45" rowspan="2"><img src="../images/08.gif" width="45" height="197" alt=""></td></tr><tr><td colspan="3"><img src="../images/09.gif" width="919" height="36" alt=""></td></tr><tr><td><img src="../images/分隔符.gif" width="41" height="1" alt=""></td><td width="27"><img src="../images/分隔符.gif" width="27" height="1" alt=""></td><td><img src="../images/分隔符.gif" width="864" height="1" alt=""></td><td width="28"><img src="../images/分隔符.gif" width="28" height="1" alt=""></td><td><img src="../images/分隔符.gif" width="45" height="1" alt=""></td></tr></table><!-- End ImageReady Slices --><map name="Map"><area shape="rect" coords="79,12,212,73" href="../default.asp" alt="首页"><area shape="rect" coords="255,8,385,71" href="lxxw.asp" alt="联想新闻"><area shape="rect" coords="429,10,558,73" href="cpzs.asp" alt="产品展示"><area shape="rect" coords="607,10,737,72" href="yhzc.asp" alt="用户注册"><area shape="rect" coords="781,12,920,72" href="yhly.asp" alt="用户留言"></map><% rs.close set rs=nothing conn.close set conn=nothing %></body></html>连接数据库的是: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns=" http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/htmlcharset=gb2312" /><title>无标题文档</title></head><body><% set conn=server.CreateObject("adodb.connection") dbpath=server.MapPath("../database/db.mdb") conn.open "provider=microsoft.jet.oledb.4.0data source=" &dbpath lynr=request.Form("lynr") yhm=session("yh") fbsj=now() sql="insert into 留言(内容,用户,发表时间)values('"&lynr&"','"&yhm&"','"&fbsj&"')" conn.execute sql response.Redirect "yhly.asp" rs.close set rs=nothing conn.close set conn=nothing %></body></html>

初学者在学ASP的时候往往是无从学起,学理论的时候又太抽象不好懂,实践的时候又找不到合适的例子来分析练习,有时候找到一个源程序学习的时候,功能太繁杂,涉及到的ASP模块太多,也附带了不少的函数,这样使初学者一头雾水,知难而退,实际上ASP是比较容易掌握的,今天就是为了这个目的,剥茧抽丝做了一个非常简单的留言板,只有留言,删除和回复的功能,没有管理权限功能(站长登录,修改密码等)、判断功能(表单验证等)及分页功能,简洁干炼,主要是为了初学者掌握最重要的知识,就是如何抓取数据库以及如何查看、删除、修改记录的 *** 作,我们先从这个超级简单的留言板开刀吧,此关只要能过,恭喜您了,将来即可步入ASP应用的行列了!:)本教程完成后会提供下载!

首先我们先做准备工作,先做一下策划,看看我们可能要做哪些页面,所谓说好的开始就是成功的一半,所以大家不要急着做,听我慢慢讲来。为了让大家都能制作出自己的留言板,尽量实现一个网页一个功能模块,我们就做以下六个网页:

一、index.asp----首页即显示留言页

二、conn.asp----公共网页,每个网页都要包含它,是连接打开数据库的 *** 作。

三、write.asp和save.asp----分别是发表留言的表单网页和保存留言页。

四、del.asp----删除留言页

五、reply.asp----回复当前留言页

做好的留言板效果图如下:

好了,说到这里我们可以动工了,首先做一个最重要的工作,就是建立起一个数据库,将来存放网友的留言所用。

1、数据库名:db1.mdb

2、数据库表:只有一个表:book

3、数据表book里增设以下字段,见图1

说明:?任一字段的数据类型中的“常归”项中的“允许空字符串”最好填“是”

?日期/时间的“常归”项中默认值为Now();站长回复里的“常归”项中的默认值为“暂没有回复”,注意此处要加双引号,是半角而不是全角。

数据库建好后开始做公共网页,用来打开数据库,打开Dreamweaver MX,按如下方法新建动态ASP网页:

并保存为CONN.ASP,在编辑区里切换到显示代码视图里,注意把第一行自动生成的代码删掉。

这次主要是写连接数据库和参数设置的ASP代码,不用输出什么HTML标签,所以把代码全部删掉,用DREAWMEAVER插入栏自带的ASP对象写入以下代码,ASP栏里没有的代码只能自己手写输入了。

注意要把所有要编译的ASP代码放在之间,这样才能正常运行,否则会出错!这是基本常识哦。让我解释以上代码的意思吧:

代码第一行: 用来建立connection对象,connection对象扮演着十分重要的前期连接工作,连接成功数据库才会有以后的数据 *** 作功能。

代码第二行:设置数据库连接参数。包括有数据库驱动程序和数据库文件名。

代码第三行:用conn连接对象打开数据库。

这些是通用连接数据库的方法,任何需要打开数据库的动态网页都可以照搬以上代码就行了,只把数据库的名字换成你的数据库名字就行了,注意路径要正确。所以可以把这些代码用Dreawmeaver里的代码片断复制下来,以后直接插入就可以用了,比较方便,也不用记忆,这是一个小技艺吧!

好了,今天就先说到这里。

有什么错误和更好的建议也希望你能到腾风在线论谈提出来。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11959532.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-20
下一篇 2023-05-20

发表评论

登录后才能评论

评论列表(0条)

保存