标签为 回复 的存档
LBS修改-管理员回复评论
Author: robay8 九 2007
不记得从哪里找到的代码了，但在修改完后，发现不是我想要的样子，于是按自己的要求改动了下，现在把自己的代码贴出来，供大家分享下：
打开 comment.asp，搜索到
<%if(editMark){
var arrEdit=editMark.split(“$|$”);
%>
<div class=”editmark”>[<%=lang["edited_by"]+arrEdit[0]+lang["at"]+arrEdit[1]%>]</div>
<%}%>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
替换为：
<%if(editMark){
var arrEdit=editMark.split(“$|$”);
%>
<div class=”editmark”>[<%=lang["edited_by"]+arrEdit[0]+lang["at"]+arrEdit[1]%>]</div>
<%}%>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
<%if(reply){%>
<div class=”commentbox-reply-title”>
<div class=”commentbox-reply-label”>[ <%=replyUsername%> ] <%=lang["reply_comment"]%> [ <%=func.getDateTimeString("YY-MM-DD hh:ii:ss", replyTime)%> ]</div>
<%if(!hidden||(theUser.id==userid&&userid!=0)||theUser.rights["view"]>2){%>
<%var strContent=ubb.toHTML(func.HTMLEncode(reply),”110011″, “”, true)%>
<div class=”commentbox-reply-content”>
<%=strContent%>
</div>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
<%}%>
搜索
strTitle,strActionURL,strContent,strUBBFlags,bHidden
以上代码有两处，均替换为：
strTitle,strActionURL,strContent,strUBBFlags,bHidden,strReply,bShowReplyArea
接着打开 src_comment.asp，搜索到
“content”: comments[i]["comm_content"],
“hidden”: comments[i]["comm_hidden"],
“postTime”: new Date(Number(comments[i]["comm_posttime"])),
“ubbFlags”: comments[i]["comm_ubbflags"],
“editMark”: comments[i]["comm_editmark"],
替换为：
“content”: comments[i]["comm_content"],
“hidden”: comments[i]["comm_hidden"],
“postTime”: new Date(Number(comments[i]["comm_posttime"])),
“ubbFlags”: comments[i]["comm_ubbflags"],
“editMark”: comments[i]["comm_editmark"],
“reply”: comments[i]["comm_reply"],
“replyUsername”: comments[i]["comm_replyusername"],
“replyTime”: new Date(Number(comments[i]["comm_replytime"])),
继续搜索到 “ // Check content ” 在上一行插入：
// Workaround for content/reply swap when the user has reply rights
if(input["entry"]){
input["reply"]=input["message"];
input["message"]=input["entry"];
if(input["reply"].length>theCache.settings["maxCommentLength"]||input["reply"].length<2){
strError+=”<li>”+lang["length_invalid"]+”</li>”;
}
}
继续搜索到：
“ arrData=connBlog.query(“SELECT TOP 1 tLog.log_id,tLog.log_authorID,
tLog.log_title,tComm.comm_authorid,tComm.comm_content,
tComm.comm_ubbFlags,tComm.comm_hidden FROM [blog_Article] tLog,
[blog_Comment] tComm WHERE tLog.log_id=tComm.log_id AND tComm.comm_id=”+input["id"]); ”
替换成
“ arrData=connBlog.query(“SELECT TOP 1 tLog.log_id,tLog.log_authorID,tLog.log_title,tComm.comm_authorid,
tComm.comm_content,tComm.comm_ubbFlags,tComm.comm_reply,
tComm.comm_hidden FROM [blog_Article] tLog,[blog_Comment] tComm
WHERE tLog.log_id=tComm.log_id AND tComm.comm_id=”+input["id"]); ”
搜索到
“ outputEditComment(lang["edit_comment_on"]+”: “+arrData["log_title"], “?
act=update&id=”+input["id"], arrData["comm_content"], arrData["comm_ubbflags"],
arrData["comm_hidden"]); ”
替换成
“ outputEditComment(lang["edit_comment_on"]+”: “+arrData["log_title"], “?
act=update&id=”+input["id"], arrData["comm_content"], arrData["comm_ubbflags"],
arrData["comm_hidden"],arrData["comm_reply"],
theUser.rights["edit"]>2 ? true : false); ”
继续搜索到 “ connBlog.update(“blog_Comment”, arrUpdate, “comm_id=”+input["id"]); ”
在其上面一行插入
// If the user has reply rights
if(theUser.rights["edit"]>1){
arrUpdate["comm_reply"]=input["reply"];
arrUpdate["comm_replyUsername"]=theUser.username;
arrUpdate["comm_replyTime"]=new Date();
}
打开 article.asp 文件，搜索到
<%if(editMark){
var arrEdit=editMark.split(“$|$”);
%>
<div class=”editmark”>[<%=lang["edited_by"]+arrEdit[0]+lang["at"]+arrEdit[1]%>]</div>
<%}%>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
替换为：
<%if(editMark){
var arrEdit=editMark.split(“$|$”);
%>
<div class=”editmark”>[<%=lang["edited_by"]+arrEdit[0]+lang["at"]+arrEdit[1]%>]</div>
<%}%>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
<%if(reply){%>
<div class=”commentbox-reply-title”>
<div class=”commentbox-reply-label”>[ <%=replyUsername%> ] <%=lang["reply_comment"]%> [ <%=func.getDateTimeString("YY-MM-DD hh:ii:ss", replyTime)%> ]</div>
<%if(!hidden||(theUser.id==userid&&userid!=0)||theUser.rights["view"]>2){%>
<%var strContent=ubb.toHTML(func.HTMLEncode(reply),”110011″, “”, true)%>
<div class=”commentbox-reply-content”>
<%=strContent%>
</div>
<%}else{%>
<div class=”hidden-note”><%=lang["hidden_comment"]%></div>
<%}%>
</div>
<%}%>
打开 class/article.asp 文件，搜索到
this.loadComments = function(bTimeOrder, bWithTrackBack, intTrackbackPos,
intPageSize, intCurrentPage){
var sql=”SELECT 0 as type, comm_ID,comm_Content,comm_authorID,
comm_author,comm_PostTime,comm_EditMark,comm_UBBFlags,comm_Hidden,
comm_IP FROM blog_Comment WHERE log_ID=”+this.id;if(bWithTrackBack){
// Trackback Fields Mapping: comm_ID=0, comm_Content=tb_Excerpt,
comm_aut
horID=tb_ID, comm_author=tb_Title
sql+=” UNION ALL SELECT 1,0,tb_Excerpt,tb_ID,tb_Title,tb_Time,tb_URL,
tb_Blog,false,tb_IP FROM blog_Trackback WHERE log_ID=”+this.id;
}
替换成
this.loadComments = function(bTimeOrder, bWithTrackBack, intTrackbackPos, intPageSize, intCurrentPage){
var sql=”SELECT 0 as type, comm_ID,comm_Content,comm_authorID,
comm_author,comm_PostTime,comm_EditMark,comm_UBBFlags,
comm_Hidden,comm_IP,comm_reply,comm_replyUsername,
comm_replyTime FROM blog_Comment WHERE log_ID=”+this.id;if(bWithTrackBack){
// Trackback Fields Mapping: comm_ID=0, comm_Content=tb_Excerpt, comm_authorID=tb_ID, comm_author=tb_Title
sql+=” UNION ALL SELECT 1,0,tb_Excerpt,tb_ID,tb_Title,tb_Time,tb_URL,
tb_Blog,false,tb_IP,false,false,tb_Time FROM blog_Trackback WHERE log_ID=”+this.id;
}
搜索到
“ubbFlags”: tmpA[i]["comm_ubbflags"],
“hidden”: tmpA[i]["comm_hidden"],
“IP”: tmpA[i]["comm_ip"]
替换成
“ubbFlags”: tmpA[i]["comm_ubbflags"],
“hidden”: tmpA[i]["comm_hidden"],
“IP”: tmpA[i]["comm_ip"],
“reply”:tmpA[i]["comm_reply"],
“replyUsername”:tmpA[i]["comm_replyusername"],
“replyTime”: new Date(Number(tmpA[i]["comm_replytime"]))
在css中添加回复功能的样式：
.commentbox-reply-title {
border: 1px dashed #999;
margin: 2px 40px;
padding: 5px;
}
.commentbox-reply-label{
font-weight: bold;
margin-bottom: 5px;
}
.commentbox-reply-content{
font-weight: normal;
color: #000080;
font-size: 11px;
display: inline;
}
最后一步，在lang/blog.asp中添加
t["reply_comment"]=”回复于”
代码！
再刷新一下页面，在编辑评论的时候，就多了回复功能！
比原来的好看的多了。