您现在的位置: 华玉生活网 >> 网站建设 >> 教程 >> 动易 >> 正文>> 繁体中文

如何给动易SW中的评论加验证码及方法

如何给动易SW中的评论加验证码及方法

想给评论加个验证的方法如下

问题:在SiteWeaver版中,如何给评论加验证码呢?
解决方法:

一、修改模板。
1、在<head>中加入

代码如下:


<script language=javascript>
function refreshimg(){
document.all.checkcode.src='/Inc/CheckCode.asp?' Math.random();
}

2、在评论内容框下加入

代码如下:

<tr>
 <td align=right>验证码:</td>
 <td colSpan=3><input name='CheckCode' size='6' maxlength='6' style='width:50px; BORDER-RIGHT: #F7F7F7 0px solid; BORDER-TOP: #F7F7F7 0px solid; FONT-SIZE: 9pt; BORDER-LEFT: #F7F7F7 0px solid; BORDER-BOTTOM: #c0c0c0 1px solid; HEIGHT: 16px; BACKGROUND-COLOR: #F7F7F7; ime-mode:disabled;' onmouseover=''this.style.background='#ffffff';'' onmouseout=''this.style.background='#F7F7F7''' onFocus='this.select();'>
 &nbsp;<a href='javascript:refreshimg()' title='看不清楚,换个图片'><img id='checkcode' src='/Inc/CheckCode.asp' style='border: 1px solid #ffffff' /></a></td>
 </tr>

二、修改Include目录下PowerEasy.Comment.asp文件,在Sub SaveComment()中加入

代码如下:

Dim CheckCode
CheckCode = LCase(Trim(Request("CheckCode")))
If Trim(Session("CheckCode")) = "" Then
FoundErr = True
ErrMsg = ErrMsg & "
<li>你在管理登录停留的时间过长,导致验证码失效。请重新返回登录页面进行登录。
请返回上一页手动点击验证码刷新。</li>"
End If
If CheckCode <> Session("CheckCode") Then
FoundErr = True
ErrMsg = ErrMsg & "
<li>您输入的验证码和系统产生的不一致,请重新输入。请返回上一页手动点击验证码刷新。</li>"
End If
If FoundErr = True Then
Call WriteErrMsg(ErrMsg,"ol")
response.end
End If

说明:
1、如给多个频道加评论,需修改多个模板。
2、本修改只对SW6有效。


  • 扩展阅读
  • 上一篇文章:
  • 【返回网站首页】 【返回动易】
  • 下一篇文章:
  • 【字体: 】【】【发表评论】【加入收藏】【告诉好友】【打印此文
    文章 软件 电影 商品

    相关文章

    网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    | 服务声明 | 充值中心| 华安五金电器 | 收费标准| 论坛| 留言| 实用查询| 会员中心| 下载帮助| 设为首页|

    技术支持:瑞达科技 即时交谈QQ:237013889 QQ群:13810759 E-Mail:237013889@qq.com
    非盈利网站,如有侵权,请来信来电告知,第一时间处理,谢谢!
    桂ICP备17008104号 华玉生活网网站统计
    tj