asp 如何去掉数组中指定的值

yonkerking 2009-11-13 12:45:06
我的意思是有连个数组是第一个是从数据库中取出来的,第二个是自己指定的数字,如何把第一个数组中的含有第二个数组的数字去掉啊,比如:
first={12,13,14,15,16,17}
second={12,14,18,19,20}
执行结果是
first={13,15,16,17}
就是去掉第二个数组中的数字,代码如何写啊 ,请教高手了,高分啊
...全文
75 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
hookee 2009-11-13
  • 打赏
  • 举报
回复

<%
n1 = "12,13,14,15,16,17"
n2 = "12,14,18,19,20"

a = Split(n1, ",")
Set dic = CreateObject("Scripting.Dictionary")
For k=0 To UBound(a)
If a(k)<> "" Then dic.Add "_" & a(k), a(k)
Next
a = Split(n2, ",")
For k=0 To UBound(a)
If a(k)<> "" Then
If dic.Exists("_" & a(k)) Then
dic.Remove "_" & a(k)
End If
End If
Next

items = dic.Items()
Set dic = Nothing
Response.Write "最后得到: " & Join(items, ",")
%>
Dogfish 2009-11-13
  • 打赏
  • 举报
回复
a="12,13,14,15,16,17"
a = "," & a & ","
b="12,14,18,19,20"
br = Split(b,",")
For i=0 To UBound(br)
a = Replace(a, "," & br(i) & ",",",")
Next
a = Replace("," & a & ",",",,","")
'新的数组 ar
ar = Split(a,",")

28,406

社区成员

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

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