asp下数组中重复项的消除方法

<
******************************
功能:动机(内部)
参数:Rstr,一个数组的一个逗号分开
作者:Ali Cici
日期:2007 7 13
说明:数组中重复项的移除
的例子:
******************************
功能动机(内部)
朦胧的我,SpStr
spstr =(内部分裂,
我= 0,UBound(spstr)
如果我= 0然后
发=发spstr(我)
其他的
如果仪器(发,SpStr(我))= 0和I = UBound(spstr)然后
发=发spstr(我)
仪器(发,SpStr(我))= 0
发=发spstr(我)
最后如果
最后如果
下一个
端功能
%>