asp 數(shù)組 重復(fù)刪除函數(shù)(腳本之家增強(qiáng)版)
更新時(shí)間：2010年05月31日 22:49:29 作者：
這篇文章是asp下刪除重復(fù)數(shù)組的函數(shù)，已經(jīng)經(jīng)過測(cè)試。
因?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ù)組中的最大值的方法
- asp下使用數(shù)組存放數(shù)據(jù)的代碼
- asp 得到動(dòng)態(tài)數(shù)組中元素的個(gè)數(shù)
- asp.net 數(shù)組中字符串替換的幾種方式
- asp 動(dòng)態(tài)數(shù)組 提供Add、Insert、Remove、RemoveAt、Search等方法。
- asp.net 字符串、二進(jìn)制、編碼數(shù)組轉(zhuǎn)換函數(shù)
- asp.net通過js實(shí)現(xiàn)Cookie創(chuàng)建以及清除Cookie數(shù)組的代碼
- asp textarea 多行數(shù)組分割處理方法
- ASP 過濾數(shù)組重復(fù)數(shù)據(jù)函數(shù)(加強(qiáng)版)
- ASP 使用Filter函數(shù)來檢索數(shù)組的實(shí)現(xiàn)代碼
- asp數(shù)組的使用介紹
- Asp與JS的數(shù)組和字符串下標(biāo)介紹
- asp中使用redim、preserve創(chuàng)建動(dòng)態(tài)數(shù)組實(shí)例
- ASP定義數(shù)組方法的技巧
相關(guān)文章
一段在asp中加密與解密對(duì)應(yīng)的函數(shù)
一段在asp中加密與解密對(duì)應(yīng)的函數(shù)...2007-03-03
ASP 連接Access數(shù)據(jù)庫的登陸系統(tǒng)
這篇文章主要為大家詳細(xì)介紹了ASP 連接Access數(shù)據(jù)庫的登陸系統(tǒng)，感興趣的小伙伴們可以參考一下2016-07-07
用ASP實(shí)現(xiàn)寫IIS日志的代碼...2007-11-11
發(fā)郵件的asp(CDONTS.NewMail)...2006-08-08
解決ASP（圖像）上傳漏洞的方法...2006-11-11
本文介紹的是用ASP編寫代碼的時(shí)候，我們應(yīng)該遵守的八個(gè)原則。希望對(duì)你有幫助，一起來看吧！2015-10-10
asp下調(diào)試程序的debug類...2007-04-04
這篇文章主要介紹了asp限制域名訪問實(shí)現(xiàn)代碼,需要的朋友可以參考下2020-09-09
這篇文章主要介紹了asp中獲取日期為星期幾的方法,主要就用是weekday函數(shù)和weekdayname函數(shù)的應(yīng)用,需要的朋友可以參考下2014-08-08
很多時(shí)候，我們需要用到定時(shí)生成html頁面的功能，原理簡介：利用文件如index.html的最后修改時(shí)間和當(dāng)前的時(shí)間做比較，當(dāng)時(shí)間差超過一定間隔如2小時(shí)，則調(diào)用相關(guān)頁面進(jìn)行生成新頁面。原始源代碼如下2021-07-07