28,391
社区成员
发帖
与我相关
我的任务
分享
<%
VarFullName=session("FullName")
MyArray=array("越级用户","小黄","小李","小赵")
s=",越级用户,小黄,小李,小赵,"
if instr(s,","&VarFullName&",")>0 then
response.Write "数组中有"&VarFullName
else
response.Write "数组中不包括"&VarFullName
end if
%>
<%
VarFullName=session("FullName")
MyArray=array("越级用户","小黄","小李","小赵")
s=",越级用户,小黄,小李,小赵"
if instr(s,","&VarFullName)>0 then
response.Write "数组中有"&VarFullName
else
response.Write "数组中不包括"&VarFullName
end if
%>
<%
dim VarFullName
VarFullName=session("FullName")
MyArray=array("越级用户","小黄","小李","小赵")
s=","&join(MyArray,",")
if instr(s,","&VarFullName)>0 then
response.Write "数组中有"&VarFullName
else
response.Write "数组中不包括"&VarFullName
end if
%>
<%
s=join(FullName,",")
AA="小赵"
if instr(s,AA)>0 then
response.Write "数组中有"&AA
else
response.Write "数组中不包括"&AA
end if
%>