资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

如何实现防SQL注入的VBSrcipt代码-创新互联

小编给大家分享一下如何实现防SQL注入的VBSrcipt代码,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

员工经过长期磨合与沉淀,具备了协作精神,得以通过团队的力量开发出优质的产品。创新互联坚持“专注、创新、易用”的产品理念,因为“专注所以专业、创新互联网站所以易用所以简单”。公司专注于为企业提供网站设计、成都网站设计、微信公众号开发、电商网站开发,微信小程序定制开发,软件按需定制等一站式互联网企业服务。

 
        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注入的VBSrcipt代码”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


网站题目:如何实现防SQL注入的VBSrcipt代码-创新互联
文章来源:http://cdkjz.cn/article/djpdch.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

大客户专线   成都:13518219792   座机:028-86922220