| 在动易的程序里找到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 |