asp对指定数组元素删除和指定内容删除也可以删除重复数组方法介绍
方法一:asp对指定值从数组中删除方法介绍
Dim MyArray
MyArray = Array(50,10,425,304,511,223,243,320) '定义一个数组
Response.Write Join(ArrayPop(MyArray ,50),",")
Function ArrayPop(MyArray ,Key)
Dim tmp
tmp = "," & Join(arr, ",") & ","
tmp = Replace(tmp, "," & key & ",", ",")
if left(tmp,1)="," then
tmp = mid(tmp,2)
end if
if right(tmp,1)="," then
tmp = left(tmp,len(tmp)-1)
end if
ArrayPop = Split(tmp,",")
End Function
方法二:asp指定下标值删除数组中对应下标内容,得到一个新的数组
MyStr="tsest,1|aaaa,2|bbbb,3|cccc,4 " ' 字符串
MyArray=split(MyStr,"|") '字符串转数组
MyStr=""
DelId=1
For i=0 to ubound(MyArray)
if i<>DelId-1 then
if MyStr<>"" then
MyStr=MyStr& "|" & MyArray(i)
else
MyStr=MyArray(i)
end if
end if
next
NewArray=split(MyStr,"|") '得到新数组
response.Write MyStr
欢迎交流更好的方法 QQ:418888151 www.www.js-huaxin.com
下载地址