• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    新增加一个防垃圾评论的asp代码,鄙视垃圾
    最近开通了,可以发表评论就一直被垃圾评论和留言困扰,一直没有找到很好的解决办法。事实上wordpress有一些强悍的插件可以防治spam,比如Akismet,不过这只能让我留着口水羡慕,因此最近一直在寻找一个相对较好的解决方案。

    今天在Bigik.cn上看到一个不错的方法,Bigik使用加法运算形式的用户验证来解决这个问题。现把方法转载过来。当然这个方法不是很完善,我发现还会有一些spam进来。 

    使用方法: 
    程序代码 
    复制代码 代码如下:

    Function getnum()  
    Dim QuesionNum  
    QuesionNum=7  '问题的总数,如要添加问题,请先修改这个数值  
    Dim CodeIndex  
    CodeIndex=0  

    Dim QuesionArray(100)  
    Dim AnswerArray(100)  

    QuesionArray(0)="= 1 + 1"                       '问题列表及答案,可自行修改  
    AnswerArray(0)="2"  
    QuesionArray(1)="= 2 + 2"  
    AnswerArray(1)="4"  
    QuesionArray(2)="= 3 + 4"  
    AnswerArray(2)="7"  
    QuesionArray(3)="= 2 + 4"  
    AnswerArray(3)="6"  
    QuesionArray(4)="= 1 + 2"  
    AnswerArray(4)="3"  
    QuesionArray(5)="= 2 + 3"  
    AnswerArray(5)="5"  
    QuesionArray(6)="= 4 + 4"  
    AnswerArray(6)="8"  

    Randomize  
    CodeIndex =  Int((QuesionNum * Rnd) + 0)  
    Session("Getnum") = AnswerArray(CodeIndex)  
    getnum = "span style=""margin-right:40px;"">"  QuesionArray(CodeIndex)  "/span>"  
    End Function 

    调用方法:
    复制代码 代码如下:

    %response.write getnum()%>

    其他修改建议: 
    问题可以设置为加减乘除任意问题或者其他文字问题,例如“987 x 654 = ?”、“中国有几个少数民族?”等等,不要让浏览者答不上就可以了:P。 
    建议将验证码输入框宽度改小些,且最大输入字符数设置为2。 
    您可能感兴趣的文章:
    • PHP用strstr()函数阻止垃圾评论(通过判断a标记)
    • php中使用Akismet防止垃圾评论的代码
    • 自动发帖机的斗争过程防止垃圾评论的几个方法总结
    • php的ZipArchive类用法实例
    • php自定义apk安装包实例
    • php防止站外远程提交表单的方法
    • php获取textarea的值并处理回车换行的方法
    • php实现给图片加灰色半透明效果的方法
    • PHP清除数组中所有字符串两端空格的方法
    • php实现删除指定目录下相关文件的方法
    • PHP中加密解密函数与DES加密解密实例
    • php实现过滤表单提交中html标签的方法
    • PHP实现通过中文字符比率来判断垃圾评论的方法
    上一篇:asp下sql和access数据库随机取10条记录的代码newid()
    下一篇:asp ADO GetString函数与用GetString来提高ASP的速度第1/2页
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    新增加一个防垃圾评论的asp代码,鄙视垃圾 新增加,新,增加,一个,防,