演示：http://www.3zj.net/Article/jcww/200508/637.html

使用方法：

調用文件：CommentJS.asp

調用方法：<script language='javascript' src='{$InstallDir}{$ChannelDir}/CommentJS.asp?CommentNum=20&ArticleID={$ArticleID}'></script>

其中CommentNum為最多顯示條數.

保留PE2005的COMMENT.ASP文件。

下載地址：點擊下載

大家有什么建議和要求請跟貼，并希望有人和我一起完善這個評論功能。

說明：

請注重，與以往不同，用的是JS方法而不是框架方法；區分會員與游客；顯示字數是不受限制的,而且支持換行，實際前臺顯示不需要審核，而后臺中卻區分審核和未審核（假如不區分則和歷史評論無法分開，很難找，當年曾深受其苦），方便評論治理：定期檢查未審核評論（已在前臺顯示）是否有危險言論，無則通過，方便查找 。請看游客“測試”發表的評論。代碼開放，大家可以改為自己喜歡的風格。

該文件修改于文學路站長ComeOK的4.03用評論頁。由于會員部分數據庫表結構可能已更改，部分函數也不能再用，所以不能直接將4.03評論頁用于PE2005。而且將評論內容寫入數據庫部分一直未能排除錯誤，原因未知，故刪除而將數據提交給PE2005的評論頁處理，因此須保留2005的評論頁。

主要改動：

1、舍去數據庫寫入操作部分。

2、因為會員信息數據庫結構已更改，去除對會員具體信息的調用，只給出一個連接。

3、原會員驗證函數不能再用，從首頁登陸文件UserLogin.asp找到驗證函數CheckUserLogined() ，替代。

4、因為PE2005評論數據寫入方法可能有改，而我保留了2005的寫入，導致原4.03控制顯示函數gotTopic(nohtml(rsComment("Content")),500)不能再用（具體原因未知）。另找了一個函數控制：dvHTMLEncode(rsComment("ReplyContent")) 。優點：不限字數，支持換行。

5、顯示風格的美化（注重表格效果）。不喜歡這種表格的可去掉。

另外：

(1)sqlComment=sqlComment & " * from PE_Comment where ChannelID=" & ChannelID & " and InfoID=" & ArticleID
& " and Passed=" & PE_True & " order by CommentID desc"中，去掉 & " and Passed=" & PE_True ，并在后臺設置欄目：評論需要審核，這樣實際顯示不需要審核，而后臺中卻區分審核和未審核，方便評論治理。定期檢查未審核評論是否有危險言論，無則通過，方便查找。

假如不喜歡原來的排序方式，改order by CommentID desc 為自己喜歡的排序方式。

要害字DESC（默認）表示按照降序排列。假如你希望以升序排列，那么可以用要害字ASC

(2)要想IP段（游客評論將顯示IP）末尾為*號，將 Left(rsComment("IP"), InstrRev(rsComment("IP"),".")) & "*" 替代 rsComment("IP") 即可.

(3)評論完自動返回內容頁方法：（感謝

查看更多 動易Cms教程  動易Cms模板