世纪博客
亚洲交友

搜索内容


最新日志
世纪博客
特别推荐
           

           

最新回复

世纪博客

广而告之
      
最新评论

世纪博客

站点信息
世纪博客
世纪博客
去掉动易系统登陆后台的验证码方法
2007-4-6 12:49:00

在动易的程序里找到admin这个文件夹里的admin_login.asp DW打开.然后把这找到如下几行代码在代码前加上弹引号即可:分为几步来实现:依次进行屏蔽代码

表单验证屏蔽

 'Response.Write "  if (Login.CheckCode. == '') {" & vbCrLf
   ' Response.Write "    alert ('请输入您的验证码!');" & vbCrLf
    'Response.Write "    Login.CheckCode.focus();" & vbCrLf
    'Response.Write "    return(false);" & vbCrLf
    'Response.Write "  }" & vbCrLf

验证码三个字屏蔽

'Response.Write "              <td colspan='2'><font color='#ffffff'>验证码:</font></td>" & vbCrLf

验证码图片屏蔽

'Response.Write "              <td width='53'><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;' over=''this.style.background='#ffffff';'' out=''this.style.background='#F7F7F7''' ='this.select();'></td>" & vbCrLf
    'Response.Write "              <td width='51'><a href='java:refreshimg()' title='看不清楚,换个图片'><img id='checkcode' src='../inc/checkcode.asp' style='border: 1px solid #ffffff' /></a></td>" & vbCrLf
   ' Response.Write "            </tr>" & vbCrLf
   ' Response.Write "          </table></td>" & vbCrLf
   ' Response.Write "        </tr>" & vbCrLf
   ' Response.Write "      </table></td>" & vbCrLf
    'Response.Write "   </tr>" & vbCrLf
    'Response.Write "  </table>" & vbCrLf

验证码输入错误屏蔽

 ' If CheckCode = "" Then
        'FoundErr = True
        'ErrMsg = ErrMsg & "<br><li>验证码不能为空!</li>"
    'End If
    'If Trim(Session("CheckCode")) = "" Then
       ' FoundErr = True
       ' ErrMsg = ErrMsg & "<br><li>你在管理登录停留的时间过长,导致验证码失效。请重新返回登录页面进行登录。</li>"
    'End If
    'If CheckCode <> Session("CheckCode") Then
        'FoundErr = True
       ' ErrMsg = ErrMsg & "<br><li>您输入的验证码和系统产生的不一致,请重新输入。</li>"
    'End If

  • 标签:动易系统 验证码 
  • 发表评论:
    世纪博客
    Powered by Oblog.