asp如何验证字符串是否包含有效字符?
来源:asp之家 发布时间:2009-11-08 19:02:00
不是很难哦,我们现在就可以实现VBScript在服务器端验证,就是下面的函数:
<%
FUNCTION TestString(SomeString)
TempString = TRIM(SomeString)
TempString_Length = Len(TempString)
TempString_OK = true
FOR TempString_Pos = 1 TO TempString_Length
TempString_Char = Mid(TempString,TempString_Pos)
TempString_Char_Ansi = Asc(TempString_Char)
IF TempString_Char_Ansi > 47 AND TempString_Char_Ansi < 123 THEN
' ANSI字符中:A-Z 是65-90,a-z是97-122,0-9是48-57
IF TempString_Char_Ansi > 57 AND TempString_Char_Ansi < 65 THEN
TempString_OK = False
EXIT FOR
END IF
IF TempString_Char_Ansi > 90 AND TempString_Char_Ansi < 97 THEN
TempString_OK = False
EXIT FOR
END IF
ELSE
TempString_OK = False
EXIT FOR
END IF
NEXT
TestString = TempString_OK
END FUNCTION
%>
该函数的调用方法如:
TestString(MyString)
如果MySTring是要验证的字符串,则函数会返回为一个Boolean值:true是字符串在所有的Alpha值之内,False不是。
具体用法举例:
<%IF TestString(MyString) THEN%>
恭喜,字符串合法!
<%ELSE%>
噢,里面有非法字符串!
<%END IF%>
猜你喜欢
- 在这里给出是的WindowsXP操作系统下的安装过程一、下载安装文件到MySQL官方网站找到ZIP文件提示:有些是安装文件,安装时会有提示,
- 用下面这个函数:Function CheckStringLength(txt) &n
- 这段时间在处理SQL server 2000 SP4补丁打不上的问题上花了不少时间,回头想想应该总结一下:系统说明:dell1800服务器,
- 目的是想通过给定一个ID,取出所有的子ID,包括子ID的子ID。一开始写成FUNCTION,因为FUNCTION调用方便,但是报错:ERRO
- 做WEB前台开发也有两年多,在开发中经常要涉及到DOM编程,我想大家也跟我一样,经常要处理各种DOM编程的操作,今天我就拿一个lightbo
- 仿google的asp分页代码index.asp(文件1)<%@LANGUAGE="VBSCRIPT" CODEP
- 如何限制重复订阅邮件或投票?一、准备子程序和函数。1、初始化数据,在Session对象中保存两个变量:Sub InitializeFID()
- 关于这个话题,我也看到网上有其他方法来解决。 不过从性能和代码量上来看,我有更好的办法。 在这里和大家 分享。 原理其实很简单, 知识1、长
- 有一个表,用户需要在后台操作它,希望能对它动态进行添加删除字段。这个功能也许没有问题,但是它原有插入与更新的两个存储过程,也需要一起修改。因
- 1、首先停止正在运行的MySQL进程 Linux下,运行 killall -TERM mysqld Windows下,如果写成服务的 可以运
- 流动网页设计有很多好处,但也只有在正确使用的时候。合适的技巧会使页面在大屏幕、小屏幕抑、PDA小屏幕上都能得到良好的呈现。但是,糟糕的代码结
- 像素误差看自己设计好上线的网站,偶尔会发觉像素行间出现了弹性空间,总在不经意间蹦出一定的差距。有些页面很难发现,比如活动类页面,这类页面多呈
- 在sql语句后使用 SCOPE_IDENTITY() 当然您也可以使用 SELECT @@IDENTITY 但是使用 SELECT @@ID
- 昨天在书友会上讨论信息分类和方法,有位朋友问:“大家现在讨论的还是几年前那套web2.0的东西,有没有一些新的东西可以分享?”我当时确实感觉
- 在用 Javascript 验证表单(form)中的单选框(radio)是否选中时,很多新手都会遇到问题,原因是 radio 和普通的文本框
- 在我们的生活中,需要接触大量的带有机械按键的物品。当你用手指按下按键的时候。都会或强或弱的感受一股(嗯,也有可能是一丝丝)反作用力传递到你手
- 昨天我问过这个问题怎么用ADODB.Stream来读取或写入文件,而不是用fso,不过没人回答到点上,今天搞定了.贴出来给觉得有用的朋友,希
- 代码如下: var lishustr = "qwertyuiopasdfghjklmnbvcxz"; var s = l
- 一:创建迁移在laravel中使用make:migration命令来创建迁移php artisan make:migration creat
- 一个不错的二级联动下拉菜单源码,您一定会用得到的。运行代码:<html><head><title>Lis