Question

asp InStr 怎么用的？

Dim webflag,f
webflag = 1
f = "1,2,3,4,5,6,7,8,9,10,11,12"
If InStr("," & f & ",","," & webflag & ",") < 0 Then
没有权限
Else
有权限
End If

这个是个权限判断的代码。
但是执行后没有效果，不知道为什么？
有人知道吗？

解决了加分！

Answer 1

你的代码中
InStr("," & f & ",","," & webflag & ",") < 0
的条件需要更改。因为instr函数在查找不到字符串的时候返回值为0。没有返回小于0值的时候，所以任何用户都是有权限的。
应改为：
f InStr("," & f & ",","," & webflag & ",") > 0 Then
有权限
Else
没有权限
End If
你试试吧。

Answer 2

instr函数在是返回指定一字符串在另一字符串中最先出现的位置。
在ASP中我们用来检测字符串或者模糊搜索，比如检测邮件地址是否符合规则；

语法
InStr([start, ]string1, string2[, compare])

示例：
检测用户输入的邮件地址是否符合规则：
<%
dim txt, zifu
txt ="lskjfdls#126.com" ' 用户输入的邮件地址
zifu=InStr(txt,"@") ' 要查找字符串 "@"
response.write(zifu) '输出2
if zifu=0 then
response.write "邮件地址非法，请重新输入！"
else
end if
%>