asp數(shù)組重復(fù)刪除函數(shù)

　　因?yàn)橐獙憘�(gè)東西用到，所以百度了一下，居然有朋友亂寫，而且比較多，都沒有認(rèn)真測(cè)試過，只對(duì)字符可以，但是對(duì)數(shù)字就不可以，而且通用性很差，需要修改才可以真正使用。沒辦法就自己寫了，經(jīng)過測(cè)試完全沒有問題，而且思路很方便，代碼很短，如下：

　　復(fù)制代碼 代碼如下:

　　<%

　　function cxarraynull(cxstr1,cxstr2)

　　if isarray(cxstr1) then

　　cxarraynull = "對(duì)不起，參數(shù)1不能為數(shù)組"

　　Exit Function

　　end if

　　if cxstr1 = "" or isempty(cxstr1) then

　　cxarraynull = "nodate"

　　Exit Function

　　end if

　　ss = split(cxstr1,cxstr2)

　　cxs = cxstr2&ss(0)&cxstr2

　　sss = cxs

　　for m = 0 to ubound(ss)

　　cc = cxstr2&ss(m)&cxstr2

　　if instr(sss,cc)=0 then

　　sss = sss&ss(m)&cxstr2

　　end if

　　next

　　cxarraynull = right(sss,len(sss) - len(cxstr2))

　　cxarraynull = left(cxarraynull,len(cxarraynull) - len(cxstr2))

　　end Function

　　%>

　　使用方法和函數(shù)表示：

　　1、cxarraynull(cxstr1,cxstr2)函數(shù)中的兩個(gè)參數(shù)：

　　cxstr1：要檢測(cè)的數(shù)組變量，可以為空，或其它未知的錯(cuò)誤數(shù)據(jù)，當(dāng)為空或則為錯(cuò)誤數(shù)據(jù)返回"nodate"。

　　cxstr2：數(shù)組的分割符號(hào)，可以為空，或?yàn)閏hr(13)等，自動(dòng)替換輸出。

　　2、測(cè)試代碼：

　　<%

　　s="1,2,3,4,2,3,5,3"

　　s=cxarraynull(s,",")

　　response.write s

　　%>

　　輸出：1,2,3,4,5

　　增強(qiáng)版本，解決了數(shù)組中最后一位的,逗號(hào)問題。

　　復(fù)制代碼 代碼如下:

　　<%

　　function cxarraynull(cxstr1,cxstr2)

　　if isarray(cxstr1) then

　　cxarraynull = "對(duì)不起，參數(shù)1不能為數(shù)組"

　　Exit Function

　　end if

　　if cxstr1 = "" or isempty(cxstr1) then

　　cxarraynull = "nodate"

　　Exit Function

　　end if

　　do while instr(cxstr1,",,")>0

　　cxstr1=replace(cxstr1,",,",",")

　　loop

　　if right(cxstr1,1)="," then

　　cxstr1=left(cxstr1,len(cxstr1)-1)

　　end if

　　ss = split(cxstr1,cxstr2)

　　cxs = cxstr2&ss(0)&cxstr2

　　sss = cxs

　　for m = 0 to ubound(ss)

　　cc = cxstr2&ss(m)&cxstr2

　　if instr(sss,cc)=0 then

　　sss = sss&ss(m)&cxstr2

　　end if

　　next

　　cxarraynull = right(sss,len(sss) - len(cxstr2))

　　cxarraynull = left(cxarraynull,len(cxarraynull) - len(cxstr2))

　　end function

　　%>

　　測(cè)試代碼:

　　復(fù)制代碼 代碼如下:

　　s="1,2,3,4,55,55,55,333,333,2,3,5,3,88,,,,,,,66,,66,,,,,,,,,,,,,,,,,,,,,,,,"

　　s=cxarraynull(s,",")

　　response.write s

【asp數(shù)組重復(fù)刪除函數(shù)】相關(guān)文章：

php數(shù)組函數(shù)序列之a(chǎn)rray-combine() - 數(shù)組合并函數(shù)的代碼08-25

關(guān)于asp 的常用函數(shù)用法10-11

解讀Rnd 函數(shù)中的asp08-03

ASP.NET Page函數(shù)調(diào)用解析10-01

防盜鏈接ASP函數(shù)實(shí)現(xiàn)代碼01-23

JavaScript數(shù)組常用方法介紹09-04

Excel高手武器：數(shù)組基礎(chǔ)08-08

word批注刪除方法10-03

ASP提速技巧08-05

重復(fù)法翻譯09-12