❶ asp 正則 過濾重復字元串的代碼
<%
'過濾重復
Function norepeat(Str)
Dim RegEx
If IsNull(Str) Or Str="" Then Exit Function
Set RegEx=New RegExp
RegEx.Global = True
RegEx.IgnoreCase=True
RegEx.MultiLine = True
RegEx.pattern="(.)\1+"
str=regEx.replace(str,"$1")
Set RegEx=Nothing
Norepeat=str
End Function
'示例
s=""
response.write Norepeat(s)
%>
❷ ASP如何過濾數組內重復內容
dim a(4)
a(0)=1
a(1)=1
a(2)=2
a(3)=2
a(4)=3
for n=0 to ubound(a)-1
for s=1 to ubound(a)
if a(s)=a(n) then
a(n)=""
end if
next
next
a_new=filter(a,"")『把a數組裡面是空值的全部刪掉，然後重新組合成一個a_new數組。
for n=0 to ubound(a_new)』列印出a_new數組。
response.write a_new(n)&"<br>"
next
說明：a_new是新生成的數組，去掉了a數組裡面被清空的那些，重新生成了一個開頭角標是0的a_new數組。
❸ ASP如何去重復數據
最好在資料庫讀取的時候就用group by 合並一下，如果不能在資料庫操作只能用數組了！輸出時候遍歷檢索一下重復的不顯示了！