dim getstr'接收输入值
dim a
a=0
dim str="第一中学,**中学,……,NN中学"
getstr = request("ss")
arrstr=split(str,",")
for i=0 to ubound(arrstr)
if getstr=arrstr(i) then exit for
a=a+1
next
if a>=ubound(arrstr) then
response.write("输入的内容不在指定范围")
end if
限止输入字符
内容全部来源于网络收集，如有侵权，请联系网站删除!
QQ：24596024