//判断用户名
for i=1 to len(name)
if asc(mid(name,i,1))=39 or asc(mid(name,i,1))=61 or asc(mid(name,i,1))=32 then
check=false
end if
next
//判断密码
for i=1 to len(pass)
if asc(mid(pass,i,1))=39 or asc(mid(pass,i,1))=61 or asc(mid(pass,i,1))=32 then
check=false
end if
next
3Q
第一个算出来,。分都是你的。
for i=1 to len(name)
if asc(mid(name,i,1))=39 or asc(mid(name,i,1))=61 or asc(mid(name,i,1))=32 then
check=false
end if
next
//判断密码
for i=1 to len(pass)
if asc(mid(pass,i,1))=39 or asc(mid(pass,i,1))=61 or asc(mid(pass,i,1))=32 then
check=false
end if
next
3Q
第一个算出来,。分都是你的。
解决方案 »
- 关于打印的一点问题
- 求救~~~~ 怎样用VB 对SQL中 添加 图片
- 按客户名称求余款 ,在线等到待,我很急!!!
- 哥哥们给个开发DELL的简单源码,感激不尽!!!
- 一个关于查询语句的书写问题
- 求救!!请大师们讨论一下,最高可获得200分。
- 急!有什么办法区分物理光驱和虚拟光驱?-------请高手指教!!!!!!!!!!
- 如何用程序更改已经建立的ACCESS数据库的如表的,字段的名字等信息???
- 各位,有好的英文vb网站么?推荐几个。
- dim myControls as new Dictionary 显示用户类型未定义
- Vb.net 史上最快的数据导入到EXCEL程序
- UTF-8编码 ASP页面 有时候插入access数据库 中文是乱码
给你看看全部的代码,帮我看一下,谢谢了。
<script language=vbscript>
sub button1_onclick
dim name,check
check=true
name=form1.username.value
pass=form1.password.value
//判断用户名
for i=1 to len(name)
if asc(mid(name,i,1))=39 or asc(mid(name,i,1))=61 or asc(mid(name,i,1))=32 then
check=false
end if
next
//判断密码
for i=1 to len(pass)
if asc(mid(pass,i,1))=39 or asc(mid(pass,i,1))=61 or asc(mid(pass,i,1))=32 then
check=false
end if
next
//处理结果
if check=true then
form1.submit
else
msgbox "用户名和密码中有非法字符",vbcritical,"你小子不准走"
end if
end sub
</script>
如果有就提示否则执行submit
<script language="JavaScript">
<!--
function CheckLogin(){
var name = document.form1.username.value;
var pass = document.form1.password.value;
if (name.length == 0){
alert("用户名不能为空。");
document.form1.username.focus();
return(false);
}
if (pass.length == 0){
alert("用户密码不能为空。");
document.form1.password.focus();
return(false);
}
if (name.value.indexOf(" ")>-1) || (name.value.indexOf("\"")>-1) || (name.value.indexOf("=")>-1){
alert("非法用户名。");
document.form1.password.focus();
return(false);
}
/*密码部分同上面的方法一样*/
}
-->
</Script>