站长之家 - 站长资讯 - 易采站长站

当前位置: > 建站教程 > 源码教程 > CMS 教程 >

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

2018-06-09 12:27 | 来源:易采源码网 | 编辑:admin |

问题:在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;' /></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有效,2006的修改请参考/help/SiteWeaver/1255.html

  • DEDECMS自定义表单加入验证码问题修正-DedeCms教程
  • ECSHOP商品页购买记录的每页条数如何修改-ECshop教程
  • dedecms 5.7的后台验证码不显示的解决办法-DedeCms教程
  • 将ECSHOP分类树修改成一行两个-ECshop教程
  • DEDECMS修改默认搜索为百度站内搜索方法详解-DedeCms教程
  • 移动DedeCMS验证码无法正常显示的解决办法-DedeCms教程
  • DEDECMS自定义表单提交后的跳转链接修改方法-DedeCms教程
  • DedeCMS新建模型字段中【附件样式】的修改方法-DedeCms教程
  • 修改ECSHOP让会员登录后直接进用户中心-ECshop教程
  • Dedecms文章标题及文章摘要长度修改的方法-DedeCms教程
  • 网友评论

    关于我们 - 联系我们 - 广告服务 - 版权声明 - 人才招聘 - 友情链接 - 网站地图 - 帮助 - -

    CopyRight © 2010-2016 源码下载 easck.com , All Rights Reserved

    蒙公网安备 15052402000103号

    蒙ICP备14002389-1号