【在线会议源码】【库管系统源码】【opencv3.0 源码】秘密留言源码大全图片_秘密留言源码大全图片高清
1.怎么使用免费留言板源代码
2.请问有谁知道版主回复留言时的秘密秘密ASP源代码?
怎么使用免费留言板源代码
你把你的留言板放在一个文件夹下,命名为gbook
再通过ftp上传到你的留言留在线会议源码空间上去。
通过你的源码源码库管系统源码域名去访问它就可以了。
ASP交流群 有经验者欢迎加入
请问有谁知道版主回复留言时的大全大全opencv3.0 源码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
%>
答案还可以吗?