0顶

vbscript过滤非法字符

稿源：互联网 2022-04-02 21:42:50 点击： 932 撤稿纠错

使用vbscript来过滤提交的非法字符，点击按钮自动检测。

以下讨论的是和vbscript 过滤非法字符相关的vbscript过滤非法字符教程文章，内容是本站精心挑选整理的教程，希望对广大的网友给到帮助,下面是详细内容：

脚本代码(For Alixixi.com)如下:

<html>
<head>
<meta http-equiv="content-Type" content="text/html;charset=gb2312">
<meta name="keywords" content="站长,网页特效,js特效,js脚本,脚本,广告代码,zzjs,zzjs.net,sky,www.zzjs.net,站长特效 网" />
<meta name="description" content="www.zzjs.net,站长特效网，站长必备js特效及广告代码。大量高质量js特效，提供高质量广告代码下载,尽在站长特效网" />
<title>网页特效 VBScript检测非法字符 站长特效网</title>
</head>
<body>
<a href="http://www.zzjs.net/">站长特效网</a>,站长必备的高质量网页特效和广告代码。zzjs.net，站长js特效。<hr>

输入下面字符中的任意一个试下：<br>
<，>，?，{，}，，|，!，@，#，$，%，^，&，*，~，'<br>
您也可以自己添加新字符！<br><br>

<script language="vbscript">
Function chk()
Dim test,str_sift,str_sifts
test=zzjs_net.test.value
str_sift="<,>,?,{,},,|,!,@,#,$,%,^,&,*,~,'"
str_sifts = Split(str_sift,",")
For i=0 To Ubound(str_sifts)
If Instr(LCase(test),str_sifts(i))<>0 Then
MyVar = MsgBox ("含有非法字符",48,"错误")
window.event.returnvalue=false
Exit function
End If
Next
End Function
</script>
<form name="zzjs_net" action="http://www.zzjs.net" onsubmit="chk()">
<input type="text" name="test">
<input type="submit" value="提交">
</form>
</body>
</html>

关于vbscript过滤非法字符的内容写到这里就结束啦，您可以收藏本页网址https://js.alixixi.com/a/2010092064818.shtml方便下次再访问哦。

·上一篇： 省级联动菜单
·下一篇： vbscript检测输入框是否为空

文章分类LIST >>返回首页

排行总榜

避免你的邮箱地址被自动收集的代码
有趣的按钮
控制用按钮打开新窗口的属性
单击按钮或图片打开IE首页
点击按钮打印该页
仿软件浮动按钮
在规定时间内方有效的按钮
一个按钮完成对文本框内容的复制
按钮选中文本框内所有内容
Windows式样的按钮

vbscript过滤非法字符

文章分类LIST >>返回首页

最新游戏

最新新闻