如何实现防SQL注入的VBSrcipt代码
小编给大家分享一下如何实现防SQL注入的VBclass="lazy" data-srcipt代码,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!
<script language="vbscript">
function checkstr(strname)
strn=trim(strname.value)
str=trim(strname.value)
for i=1 to len(str)
strcheck=asc(left(str,1))
if not ((strcheck=<122 and strcheck>=97) or (strcheck<=90 and strcheck>=65) or (strcheck<=57 and strcheck>=48)) then
msgbox("请勿使用除英文字母及数字以外的字符!")
strname.value = left(strn,i-1)
strname.focus
exit for
end if
str=Right(str,len(str)-1)
next
end function
function checknum()
checknum=true
if not document.all.txtMailSize.value="" then
if not IsNumeric(document.all.txtMailSize.value) then
msgbox("请勿使用数字以外的字符!")
document.all.txtMailSize.value=""
document.all.txtMailSize.focus
checknum=false
else if document.all.txtMailSize.value>5 or document.all.txtMailSize.value<0 then
msgbox("请填写5-0之间的数字!")
document.all.txtMailSize.value=""
document.all.txtMailSize.focus
checknum=false
end if
end if
end if
end function
function checkupdate()
checkupdate=true
if document.all.txtU_name.value="" or document.all.txtMailSize.value="" then
msgbox("您填写的信息不完全!")
checkupdate=false
end if
end function
function compare()
compare=true
if not document.all.txtRePsw.value =document.all.txtPsw.value then
msgbox("两次密码输入不一致!")
document.all.txtRePsw.focus
compare=false
end if
end function
以上是“如何实现防SQL注入的VBclass="lazy" data-srcipt代码”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注编程网行业资讯频道!
免责声明:
① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。
② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341