导航:首页 > 源码编译 > asp评论源码

asp评论源码

发布时间:2022-04-22 11:41:11

㈠ 显示留言及回复的asp代码

访客留言的时候程序向数据库中插入新留言,并记录访客的相关信息,比如姓名,IP地址,联系方式,留言内容等,同时记录这条数据插入数据库的当前时间。
管理员回复这条留言的时候,程序又记录下管理员的回复内容以及回复时间。
然后程序从数据库中读取相关的访客留言以及管理员回复的时间。
现有网上的一些程序只是把这些读取的程序语句封装成了标签的形式方便调用
原理基本是这样,程序代码可以参照任意一个留言板的代码,如需现成的可加Q

㈡ 请问有谁知道版主回复留言时的ASP源代码

很简单啊
我是这样做的:
在数据库(userLiuyan.mdb)里新建一个留言表:liuyan
表中字段:ID,(留言编号,自动编号)
userID(用户编号或用户名,文本型),
times(留言时间,日期时间型),
liuyan(留言内容,文本或备注型),
huifu(斑竹回复,文本或备注型)
用户留言的时候只添加前四个字段的值,斑竹管理留言的时候给某条留言回复就添加到相应的回复字段里再显示给你就可以了.比如:
用户显示页面:show.asp
<%
set conn=server.createObject("ADODB.Connection")
conn.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("userLiuyan.mdb")
conn.Open
sql="select * from liuyan"
set rs=server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
Do While Not rs.Eof
Response.Write rs("userID") &"<br/>"
Response.Write rs("times") &"<br/>"
Response.Write rs("liuyan") &"<br/>"
If rs("huifu")<>"" Then
Response.Write rs("huifu") &"<br/>"
Else
Response.Write "等待回复..."
End If
rs.MoveNext
Loop
%>
斑竹管理留言回复页:huifu.asp
<% '显示用户留言
set conn=server.createObject("ADODB.Connection")
conn.connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("userLiuyan.mdb")
conn.Open
sql="select * from liuyan"
set rs=server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1
Do While Not rs.Eof
Response.Write rs("userID") &"<br/>"
Response.Write rs("times") &"<br/>"
Response.Write rs("liuyan") &"<br/>"
If rs("huifu")<>"" Then
Response.Write rs("huifu") &"<br/>"
Else
Response.Write "<a href=""?method=huifu&ID="&rs("ID")&""">回复</a>"
End If
rs.MoveNext
Loop

'向数据库里添加回复
If Request.QueryString("Method")="huifu" Then
sql="update liuyan set huifu='谢谢你的留言' where="& Request.QueryString("ID")
conn.Execute(sql)
Response.Write"回复成功!"
End If
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
答案还可以吗?

㈢ asp简单留言板源码

我这有现成的ASP+ACCESS数据库的简单留言板源码,我自己写的,很简单也很初级,里面代码不好看,但功能都实现了,可用于学习或学生毕业设计,因为我也是那时候写的,呵呵~可加我扣,五七40四八11,我发给你

㈣ asp怎样做“评论”

new表给一项id(这里自动编号)
set rs=conn.execute("select * from new")
rs("id")就是对应你的文章的ID,这样就是唯一的
a.asp页面中用
<a href="b.asp?id=<%=rs("id")%>">标题(点击看内容)</a>
b.asp页面则用
sql语句:"select * from new where id="&request("id")
然后你的pl表建一个BTid项标记这个评论对应的文章标题的id即可
发表新评论则要给予BTid的值是你现在标题的id,再加你的新评论即可
然后评论调用用"select * from pl where BTid="&request("id")这样就可以显示对应的标题的文章的评论不会乱了。
c.asp就用你现在的就可以,只是记得给new一个项id(用自动编号)就可以了

㈤ 编写一个asp留言板源代码

<link href="../../css/user.css" rel="stylesheet" type="text/css">
<script language="JavaScript" src="../../js/common.js"></script>
<script language="JavaScript" src="../../js/ubbcode.js"></script>

<script language="JavaScript">
function formCheck()
{

if (document.theform.nickname.value == "")
{
alert("请填写名字。");
document.theform.nickname.focus();
return false;
}

if (document.theform.content.value == "")
{
alert("请填写留言内容。");
document.theform.content.focus();
return false;
}
theform.Submit.disabled=true;
return true;
}

function showimage()
{
document.images.faceimg.src=face_image[parseInt(document.theform.face.options[document.theform.face.selectedIndex].value)];
}
<body background="http://cache26.51.com/photo1/14/cf/amulostlove/1151766298434_1.jpg">
<center>
<IFRAME marginHeight=0 marginWidth=0 noResize scrolling=no frameBorder=0 src="http://ads.activepower.net/script/ad/ad_show.asp?group_id=8&bgcolor=ffffff" width=468 height=60>
</IFRAME>
</center>
<p> </p>
<form name="theform" onsubmit="return formCheck();" method="post" action="get_post.asp">
<TABLE width=550 border=0 align="center" cellPadding=0 cellSpacing=0>
<table width="550" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#ebebeb">
<tr>
<td class="pt9">
<p>*名字:
<input name="nickname" type="text" size="15" maxlength="12" class="inputbox1">
<br>
Email:
<input name="email" type="text" size="15" maxlength="45" class="inputbox1">
主页地址:
<input name="hp_url" type="text" value="http://" size="22" maxlength="125" class="inputbox1">
</p>
</td>
<tr>
<td width="409" class="pt9"> <!--因为图片连接的原因,本文件只适合include在script/dirname下的文件 -->
<img onClick=bold() src="../../images/icon_editor_bold.gif" width="23" height="22" alt="粗体" border="0"><img onClick=italicize() src="../../images/icon_editor_italicize.gif" width="23" height="22" alt="斜体" border="0"><img onClick=underline() src="../../images/icon_editor_underline.gif" width="23" height="22" alt="下划线" border="0">

<img onClick=center() src="../../images/icon_editor_center.gif" width="23" height="22" alt="居中" border="0"><img onClick=hyperlink() src="../../images/icon_editor_url.gif" width="23" height="22" alt="超级连接" border="0"><img onClick=email() src="../../images/icon_editor_email.gif" width="23" height="22" alt="Email连接" border="0"><img onClick=image() src="../../images/icon_editor_image.gif" width="23" height="22" alt="图片" border="0"><img onClick=flash() src="../../images/icon_swf.gif" width="23" height="22" alt="Flash图片" border="0"><img onClick=showcode() src="../../images/icon_editor_code.gif" width="23" height="22" alt="编号" border="0"><img onClick=quote() src="../../images/icon_editor_quote.gif" width="23" height="22" alt="引用" border="0"><img onClick=list() src="../../images/icon_editor_list.gif" width="23" height="22" alt="目录" border="0">

<br>
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="pt9">
<tr>
<td width="40" valign="top">*留言:</td>
<td><textarea name="content" cols="50" rows="6" id="content"></textarea></td>
</tr>
</table>
<p align="center">
<input name="replyer" type="hidden" value="">
<input name="reply_content_id" type="hidden" value="">
<input name="userid" type="hidden" value="79444">
<input type="submit" name="Submit" value="确认留言" class="button1">
<input type="reset" name="Reset" value="取消重写" class="button1">
</p></td>
</tr>
</table>
<p> </p>
</form>
<table width="550" border="0" align="center" cellpadding="2" cellspacing="1">
<tr>
<td width="88" valign="top">
<img src="http://img.mms.sohu.com/mms/1230/86/32486/p2.gif">

</td>
<td width="417"><TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 class="pt9">
<TBODY>
<TR>
<TD width=43 colSpan=2 height=29 rowSpan=2><IMG height=29
src="../../images/1_r2_c2.gif" width=43 border=0></TD>
<TD background=../../images/1_r2_c4.gif height=10></TD>
<TD width=37 colSpan=2 height=29 rowSpan=2><IMG height=29
src="../../images/1_r2_c6.gif" width=37 border=0></TD>
</TR>
<TR>
<TD height=19> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD class="pt9"> <font class="filtertxt">dsfsd</font> </TD>
<TD width="168" align=right class="pt9"> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD width=10 background=../../images/1_r4_c2.gif></TD>
<TD width=27></TD>
<TD width="100%" height=50> <img src="../../images/blank.gif" width="5" height="5">
<br> fdsfsd<b>dfssdfsdf</b> <br> <img src="../../images/blank.gif" width="5" height="5"> </TD>
<TD width=22></TD>
<TD width=15 background=../../images/1_r4_c2.gif></TD>
</TR>
<TR>
<TD background=../../images/1_r4_c2.gif></TD>
<TD></TD>
<TD height=1><hr width="100%" size="1" noshade></TD>
<TD></TD>
<TD background=../../images/1_r4_c2.gif></TD>
</TR>
<TR>
<TD width=43 colSpan=2 height=26 rowSpan=2> <IMG height=26 src="../../images/1_r6_c2.gif" width=43 border=0></TD>
<TD align=right height=17>
<img src="../../images/no_home.gif" align="absmiddle"> <img src="../../images/no_email.gif" align="absmiddle"> <FONT color=#336600>[2006-7-17 21:24:00]</FONT> </TD>
<TD width=43 colSpan=2 height=26 rowSpan=2><IMG height=26
src="../../images/1_r6_c6.gif" width=37 border=0></TD>
</TR>
<TR>
<TD background=../../images/1_r2_c4.gif
height=9></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
</table>
<BR>
<form>
<table width="516" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<table width=100% border=0 cellspacing=1 cellpadding=2 class=pt9><tr><td height=13><img src=../../images/turnpage2_1.gif align=absmiddle border=0> <img src=../../images/turnpage2_2.gif align=absmiddle border=0> <b>1</b> | <img src=../../images/turnpage2_3.gif align=absmiddle border=0> <img src=../../images/turnpage2_4.gif align=absmiddle border=0></td><td class=pt9 width=140 align=right>共<font color=red>1</font>页第<input type=text name=JumpPage maxlength=3 size=3>页<input type=button value=转页 onClick="location.href='/script/user/list.asp?userid=79444&page=' + this.form.JumpPage.value;"></td></tr></table>
</td>
</tr>
</table>
</form>

㈥ 谁给我一套博客网站的源码,可以发布文章,评论,文章分类,留言,能够上传下载,最好是ASP的,谢谢了

你在网上搜一下aspcms,很多的,而且都是官方免费的,绝对好用,而且功能也强大,同时也是asp的程序。要是你需要专业的就选择dedecms,这个是业内站长经常用的,功能就不用说了。现在像这样开源的东西太多了,你随便找找就一大把,希望你对有所帮助···

㈦ 请问asp源码是什么可用来干什么谢谢了

1、用来生成动态页面,支持与用户的交互性服务。
2、保护你的知识产权(程序),因为程序是在服务器上运行的,在客户端察看页面的源代码是看不到你写的程序的。

㈧ ASP员工评价源码

5分?
2000人民币可以考虑帮你做一下

㈨ asp论坛源代码

动网的功能比较强.大.但是比较大...
非常大.我传都要传2个多小时才能传完.
phpwind也不错.还有diz也非常可以.

如果要小型的.建议bbsxp 这个比较专业.比较适用.在线安装的...而且非常小...才几百KB的安装程序.解压也不过2M不到.

㈩ 如何给asp网页添加文章评论功能

另外建一个表嘛,里面有一个ID对应的是文章的ID,然后其他内容类似用户留言板

阅读全文

与asp评论源码相关的资料

热点内容
手机摄像文件夹名 浏览:132
口才训练手册编译口才精品书系 浏览:998
linuxfunc 浏览:269
高德地图解压后的文件 浏览:639
php加水印类 浏览:228
编译原理定义表格和编写查找函数 浏览:350
指数函数和对数函数的高精度快速算法 浏览:209
c预编译干什么 浏览:25
hp网络共享文件夹 浏览:366
程序员如何不被废 浏览:807
二进制流转pdf 浏览:917
php判断爬虫 浏览:572
960除24除4简便算法 浏览:788
关于解压英语翻译 浏览:567
python控制键盘右键 浏览:922
php没有libmysqldll 浏览:830
时政新闻app哪个好 浏览:907
手机已加密怎么办 浏览:202
安卓手机截屏怎么传到苹果 浏览:530
京管家app哪里下载 浏览:34