只要用一些字符串函数就可以了。
如 if instr(request.form("title"),"a")>0 then
..........
end if
instr函数就是查找字符串中是否有 a 这个字符若有则返回其在字符串中的位置。若无则返回零。当然也可以这样查找在title中是否有某个字符串,只要把"a"改为相应的字符串就可以了。
是只能输入数字还是怎么回事啊?
if not isnumeric(request.form("title")) then
response.write ""
response.end
end if
下面是不能输入任何东西的
if request.form("title")<>"" then
response.write ""
response.end
end if
下面是只能输入汉字的:
<%
'正则表表达式验证函数 patrn-正则表达式 strng-需要验证的字符串
<%
Function RegExpTest(patrn, strng)
Dim regEx' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = False ' 设置是否区分大小写。
RegExpTest = regEx.Test(strng) ' 执行搜索测试。
End Function
%>
<%
if not regexptest("^[\u4e00-\u9fa5]$",request.form("title")) then
response.write ""
response.end
end if
%>
有个查找字符的函数,InStr
InStr("要查找的字符",字符串)返回一个整数,如果返回0就表示没有你要的,如果大于一就包含
request.form("title")="Hi"
错了
request.form("title").value="Hi"