订阅本栏目 RSS您所在的位置: 深山工作室 > ASP > 正文

asp中利用split,instr组合去除二维数组中重复项

深山行者个人网站 2011/1/21 13:10:06 深山行者 字体: 浏览 15618

<%
'******************************
'函数:MoveR(Rstr)
'参数:Rstr,以逗号做分隔的数组
'描述:去除数组中重复的项
'示例:MoveR("1,2,2,2,3,3,4,a,45,5,6,6")
'******************************

Function MoveR(Rstr)
 Dim i,SpStr
 SpStr = Split(Rstr,",")
 For i = 0 To Ubound(Spstr)
  If I = 0 then
   MoveR = MoveR & SpStr(i) & ","
  Else
   If instr(MoveR,SpStr(i))=0 and i=Ubound(Spstr) Then
    MoveR = MoveR & SpStr(i)
   Elseif instr(MoveR,SpStr(i))=0 Then
    MoveR = MoveR & SpStr(i) & ","
   End If
  End If
 Next
End Function

xxxlei = "1,2,2,2,3,3,4,a,45,5,6,6"

response.write "原来的:" & xxxlei
response.write "处理过的:" & MoveR(xxxlei)
%>

相关阅读
DIV与Table布局在大型网站的可用性比较
ASP.NET 2和IIS 7.0发生不兼容变化
微信小程序操作json与数组增加
北京泓源万国咨询服务有限公司
鼠标经过表格列时变色
360500怎么样?啥时候能帮我的工资给我。
以前的QQ强聊不管了,这个是非常管用的QQ强聊
利用javascript让PNG透明图片支持支持(IE6、IE7、firefox下测试通过)
更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
python
更多>>同类信息
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明
asp显示随机密码
通过阿里云服务接口获得ip地址详细信息
iis点开后任务栏上有显示,但是窗口看不到的解决办法
RSA加密解密插件
微软Encoder加密解密函数
更多>>最新添加文章
dw里面查找替换使用正则删除sqlserver里面的CONSTRAINT
Android移动端自动化测试:使用UIAutomatorViewer与Selenium定位元素
抖音直播音挂载小雪花 懂车帝小程序
javascript获取浏览器指纹可以用来做投票
火狐Mozilla Firefox出现:无法载入您的Firefox配置文件 它可能已经丢失 或是无法访问 问题解决集合处理办法
在Android、iOS、Windows、MacOS中微信小程序的文件存放路径
python通过代码修改pip下载源让下载库飞起
python里面requests.post返回的res.text还有其它的吗
更多>>随机抽取信息
利用java使图片左右上下循环连续滚动不出现空白
flash关闭动画时同时关闭网页的代码
[转]javascript缓冲效果
uni-app判断当前客户端是安卓还是ios还是其它平台
asp页面ip防火墙限制(判断ip内网还是外网)功能
Demo_随机显示图片