ASP里 如何判断一个变量是否存在数组里???

hms0103 2007-12-21 10:20:52
ASP里 如何判断一个变量是否存在数组里???

我有如下的一维数组:
FullName("小黄","小李","小赵")

有个变量: AA=“小赵”

我如何判断 AA变量里=FullName()数组里的小赵
...全文
655 14 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
toury 2007-12-21
  • 打赏
  • 举报
回复
13楼也不严谨,用这个:

<%
VarFullName=session("FullName")
MyArray=array("越级用户","小黄","小李","小赵")
s=",越级用户,小黄,小李,小赵,"
if instr(s,","&VarFullName&",")>0 then
response.Write "数组中有"&VarFullName
else
response.Write "数组中不包括"&VarFullName
end if
%>


toury 2007-12-21
  • 打赏
  • 举报
回复
正解:

<%
VarFullName=session("FullName")
MyArray=array("越级用户","小黄","小李","小赵")
s=",越级用户,小黄,小李,小赵"
if instr(s,","&VarFullName)>0 then
response.Write "数组中有"&VarFullName
else
response.Write "数组中不包括"&VarFullName
end if
%>

toury 2007-12-21
  • 打赏
  • 举报
回复 1
你这样不严谨哦;如果
bb="越级用户,小黄,小李,赵小赵"
AA="小赵"怎么办???
hms0103 2007-12-21
  • 打赏
  • 举报
回复
问题解决了。我这样改可以了哦!!!


<%
bb = "越级用户,小黄,小李,小赵"
AA=session("FullName")

if instr(bb,AA) > 0 then
response.Write aa
else
response.Write "无权限"
end if

%>
hms0103 2007-12-21
  • 打赏
  • 举报
回复
问解决了。我这样改可以了哦!!!


<%
bb = "越级用户,小黄,小李,小赵"
AA=session("FullName")

if instr(bb,AA) > 0 then
response.Write aa
else
response.Write "无权限"
end if

%>
toury 2007-12-21
  • 打赏
  • 举报
回复
MyArray=array("越级用户","小黄","小李","小赵") 语法很正常啊,楼主用的没错
toury 2007-12-21
  • 打赏
  • 举报
回复

<%
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
%>
cow8063 2007-12-21
  • 打赏
  • 举报
回复
MyArray=array("越级用户","小黄","小李","小赵")
这是什么语法的
hms0103 2007-12-21
  • 打赏
  • 举报
回复
我这样改还是不行。。。。。!!!!
没有结果。。。。。是什么问题???
<%

dim VarFullName

VarFullName=session("FullName")

MyArray=array("越级用户","小黄","小李","小赵")

For i=0 to ubound(MyArray)

IF MyArray(i)=VarFullName Then Response.write "存在"

Next
%>
toury 2007-12-21
  • 打赏
  • 举报
回复

<%
s=join(FullName,",")
AA="小赵"
if instr(s,AA)>0 then
response.Write "数组中有"&AA
else
response.Write "数组中不包括"&AA
end if
%>
hms0103 2007-12-21
  • 打赏
  • 举报
回复
整个程序是这样。但也不得!!高手请帮帮!
<%
dim VarFullName

VarFullName=session("FullName")

MyArray=array("越级用户","小黄","小李","小赵")

For i=0 to ubound(MyArray)

IF MyArray(i)=VarFullName Then Response.write "存在"

Next
%>
sy_binbin 2007-12-21
  • 打赏
  • 举报
回复
bb = "小黄,小李,小赵" '可以当成数组
AA="小赵"
if instr(bb,AA) > 0 then
response.Write "aa"
end if
hms0103 2007-12-21
  • 打赏
  • 举报
回复
好像不得呢??我运行了,错误提示是:

错误类型:
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'ubound'
/SZT/untitled2.asp, 第 10 行
陆萧寒 2007-12-21
  • 打赏
  • 举报
回复
For i=0 to ubound(FullName)
IF FullName(i)=AA Then Response.write "有小赵"
Next

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧