西安网站制作ASP数组排除重复内容的函数

15682014-06-30
西安网站制作ASP数组排除重复内容的函数
<%
'原数组
u_id="0,1,2,3,4,5"
'去除不显示的内容
a_id="1,2,3"
if trim(u_id)<>"" then
Dim MyArray_cj,i_cj
MyArray_cj=trim(u_id)
 
MyArray_cj=split(MyArray_cj,",")
 
'MyArray = Array(myarray)
For i_cj = 0 to Ubound(MyArray_cj) 
b=0
a=split(a_id,",")
for ii=0 to Ubound(a)
if trim(MyArray_cj(i_cj))=a(ii) then
b=1
end if
next
if not b=1 then
Response.Write"<br>"
Response.Write(trim(MyArray_cj(i_cj)))
end if
 
 
Next
end if %> 

通过本文您对西安网站建设有了进一步了解,本公司温馨提醒:找西安做网站公司,请选择手续齐全、业务精、服务好的正规公司。

工商网上亮照

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1

客户服务电话:15229292610

公司注册地址:西安市雁塔区融鑫路丽湾蓝岛1幢3单元16层31605号

临时办公地址:西安市雁塔区朱雀大街紫郡长安F3

Sitemap 网站地图 手机版

服务热线:15229292610

客服信箱:vip@dianmo.cc

846461336327

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1