100分求一字符串分割

fxxyz 2007-04-24 02:47:09
字符串结构是这样的
以"-"标记的话,有的字符串有一个"-",有的有两个,而且前面的字符个数是不一定的
abc-110x50 宽:110,高:50
abcd-180x40 宽:180,高40
abc-449x34-1 宽:449,高:34
abcd-345x33-1 宽:345,高33
以上这个是图片名称
我要得到图片的宽和高

用什么方法可行?

请帮忙,谢谢,解决马上给分:100!!!
...全文
214 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
fxxyz 2007-04-24
  • 打赏
  • 举报
回复
谢谢,OK了~!

jinjuduo 2007-04-24
  • 打赏
  • 举报
回复
<textarea name=textarea1>
abc-110x50 宽:110,高:50
abcd-180x40 宽:180,高40
abc-449x34-1 宽:449,高:34
abcd-345x33-1 宽:345,高33
</textarea>
<script>
alert(aaa(textarea1.value))
function aaa(x)
{
var rtn="";
var arr = x.match(/\b(\d+?)x(\d+)/ig);
for(i=0;i<arr.length;i++)
{
rtn += arr[i].replace(/x(\d+)/g,"")+"\n";
rtn += arr[i].replace(/(\d+?)x/g,"")+"\n";}
return(rtn);
}
</script>
muxrwc 2007-04-24
  • 打赏
  • 举报
回复
<%
Dim str, res, ms, i
str = _
"abc-110x50 宽:110,高:50 " & _
"abcd-180x40 宽:180,高40" & _
"abc-449x34-1 宽:449,高:34" & _
"abcd-345x33-1 宽:345,高33"

Set res = new RegExp
res.Pattern = "[a-z]+-(\d+)x(\d+)"
res.IgnoreCase = True
res.Global = True
Set ms = res.Execute(str)
For Each i In ms
Response.Write "宽:" & i.Submatches(0) & ",高:" & i.Submatches(1) & "<br />"
Next
Set ms = Nothing : Set res = Nothing
%>
fxxyz 2007-04-24
  • 打赏
  • 举报
回复
saite_bottle()

好像不行啊~!
saite_bottle 2007-04-24
  • 打赏
  • 举报
回复
正则表达式我不会
ItString '字符串
DataArr = Split(Split(ItString,"-")(1),"*")
宽 = DataArr(0)
高 = DataArr(1)
hqcsx 2007-04-24
  • 打赏
  • 举报
回复
用split
fxxyz 2007-04-24
  • 打赏
  • 举报
回复
小弟初学者,请给具体的代码,谢谢
xie_yanke 2007-04-24
  • 打赏
  • 举报
回复
/\b\d+x\d+\b/

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧