足球游戏_中国足彩网¥体育资讯$

asp截取字符串重复间的内容
来源:易贤网 阅读:803 次 日期:2014-08-26 09:48:16
温馨提示:易贤网小编为您整理了“asp截取字符串重复间的内容”,方便广大网友查阅!

遇到了asp截取一个有规律的字符串,通过规律找到开始,结束,然后获取中间内容输出.

代码如下:

<%@LANGUAGE = VBScript%>

<%Option Explicit%>

<%Dim str,b_temp,e_temp,b_array,e_array,temp,cutstr,cutstr2,begin,minnum,i,falg

'w--str'原有字符串

'w--b_temp'开始字符串临时变量

'w--e_temp'结束字符串临时变量

'.--b_array'开始字符位置数组

'f--e_array'结束位置数组

'o--temp'函数中临时位置变量

'r--cutstr'开始字符串

'a--cutstr2'结束字符串

's--begin'开始位置

'p--minnum'位置最小值

'.--i'循环位置

'cn--falg'值如果为begin则求出开始字符串结束位置.如果不是,则是结束字符串位置

str = "abcded,abf,abixin,abodjf,absdifj,"

Function get_b(str,cutstr,begin,flag)

temp = InStr(begin,str,cutstr)

If temp >0 Then

If flag = "begin" then

temp = temp+Len(cutstr)&","&get_b(str,cutstr,temp+1,flag)

Else

temp = temp&","&get_b(str,cutstr,temp+1,flag)

End if

Else

Exit function

End If

get_b = temp

End Function

Function min(num1,num2)

If num1>num2 Then min = num2 Else min = num1 End if

End function

cutstr = "ab"

begin = 1

cutstr2 = ","

b_temp = get_b(str,cutstr,begin,"begin")

e_temp = get_b(str,cutstr2,begin,"end")

b_array = Split(b_temp,",")

e_array = Split(e_temp,",")

'response.write UBound(b_array)&"=="&UBound(e_array)&"<br>"&b_temp&"<br>"&e_temp

minnum = min(UBound(b_array),UBound(e_array))

For i = 0 To minnum-1

response.write mid(str,b_array(i),(e_array(i)-b_array(i)))&"<br>"'输出最后获得的字符串

next

'www.forasp.cn原创,转载请注明

%>

结果如下:

cded

f

ixin

odjf

sdifj

中国足彩网信息请查看IT技术专栏

中国足彩网信息请查看网络编程
上一篇:ByVal
下一篇:asp连接mysql
易贤网手机网站地址:asp截取字符串重复间的内容
由于各方面情况的不断调整与变化,易贤网提供的所有考试信息和咨询回复仅供参考,敬请考生以权威部门公布的正式信息和咨询为准!

2025国考·省考课程试听报名

  • 报班类型
  • 姓名
  • 手机号
  • 验证码
关于我们 | 联系我们 | 人才招聘 | 网站声明 | 网站帮助 | 非正式的简要咨询 | 简要咨询须知 | 加入群交流 | 手机站点 | 投诉建议
工业和信息化部备案号:滇ICP备2023014141号-1 足球游戏_中国足彩网¥体育资讯$ 滇公网安备53010202001879号 人力资源服务许可证:(云)人服证字(2023)第0102001523号
云南网警备案专用图标
联系电话:0871-65099533/13759567129 获取招聘考试信息及咨询关注公众号:hfpxwx
咨询QQ:526150442(9:00—18:00)版权所有:易贤网
云南网警报警专用图标