字符串替换有可能吗?
$it="abc" & @CRLF & "bcd" & @CRLF &"rty" & @CRLF &"iop" & @CRLF上面的字符串弄成下面的格式,请问有可能吗?
$it = "<a href=http://www.baidu.com/s?wd=abc>abc</a>" & @CRLF & "<a href=http://www.baidu.com/s?wd=bcd>bcd</a>" & @CRLF & "<a href=http://www.baidu.com/s?wd=rty>rty</a>" & @CRLF & "<a href=http://www.baidu.com/s?wd=iop>iop</a>" & @CRLF & 我试了,无论使用啥方法,都无奈的失败。正则貌似也搞不定,请问各位大神有什么好的办法吗? 不需要正则,就用 StringSplit() + StringFormat() 就行了 Local $it = "abc" & @CRLF & "bcd" & @CRLF & "rty" & @CRLF & "iop" & @CRLF
Local $sS = StringSplit($it, @CRLF, 1)
Local $str = StringFormat("<a href=http://www.baidu.com/s?wd=%s>%s</a>\r\n<a href=http://www.baidu.com/s?wd=%s>%s</a>\r\n<a href=http://www.baidu.com/s?wd=%s>%s</a>\r\n<a href=http://www.baidu.com/s?wd=%s>%s</a>\r\n", _
$sS, $sS, $sS, $sS, $sS, $sS, $sS, $sS)
MsgBox(0, '', $str) Local $Str = _
'abc' & @CRLF & _
'bcd' & @CRLF & _
'rty' & @CRLF & _
'lop' & @CRLF
MsgBox(0, '原字符串', $Str)
$s1 = "<a href=http://www.baidu.com/s?wd="
$s10 = ">"
$s11 = "</a>"
Local $Test = StringRegExpReplace($str, '\V+', $s1 & '$0' & $s10 & '$0' & $s11)
MsgBox(0, '替换结果', $Test)正则替换法 经过测试,版主的正则很厉害。很实用啊。{:face (411):} 回复 6# jjf 回复 6# jjf
Afan大大果然不是盖的 回复 7# afan
A大,能不能教我正则? stringregexpreplace($str,'"(\w+)"','"<a href=http://www.baidu.com/s?wd=$1>$1</a>"') 回复 5# afan
请问a版,\v是神马意思啊?匹配引号间的? 格式化字符 以后来看 回复 9# hzxymkb
略懂,只粗学了一点…
回复 11# drunk
\v 匹配回车换行,\V 匹配非回车换行~ {:face (125):}
afan的技术还是值得信任的,和pcbar,三恨一样强了。 afan的技术还是值得信任的,和pcbar,三恨一样强了。
jjf 发表于 2011-9-21 19:32 http://www.autoitx.com/images/common/back.gif
让我汗颜,让诸多高手笑而不语…他们是技术师,我是勤杂工。
页:
[1]
2