=======================
动易后台管理认证码的修改方法
===============================
这个认证码是放在一个文件中的,文件名是“Admin_ChkCode.asp”,如果你没有修改过后台的目录名的话,这个文件应该是在“Admin”文件夹中,用记事本打开即可修改 
在这个文件中,最开始的代码就是:
Const EnableSiteManageCode = True  '是否启用后台管理认证码 是: True 否: False   
Const SiteManageCode = "ftyr456"   '后台管理认证码
 已经说得很清楚了,你可以设置是否启用后台管理认证码,还有就是可以重新设置这个后台管理认证码。



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

表单验证屏蔽

'Response.Write "  if (document.Login.CheckCode.value == '') {" & vbCrLf
   ' Response.Write "    alert ('请输入您的验证码!');" & vbCrLf
    'Response.Write "    document.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;' .mouseover=''this.style.background='#ffffff';'' .mouseout=''this.style.background='#F7F7F7''' .Focus='this.select();'></td>" & vbCrLf
    'Response.Write "              <td width='51'><a href='.: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