李岸 发表于 2015-7-5 11:51:51

正则替换

请将：https://app.yinxiang.com/shard/s8/nl/1657458/18b0a879-ced7-461d-8cbb-2bd9d22c5d64
替换成：evernote:///view/1657458/s8/18b0a879-ced7-461d-8cbb-2bd9d22c5d64/18b0a879-ced7-461d-8cbb-2bd9d22c5d64/
谢谢老师啦！

afan 发表于 2015-7-5 12:29:31

Local $Str = 'https://app.yinxiang.com/shard/s8/nl/1657458/18b0a879-ced7-461d-8cbb-2bd9d22c5d64'
Local $sRE = StringRegExpReplace($str, 'https:.+?/shard(/[^/]+)/[^/]+(/[^/]+)(/[^/\v]+)', 'evernote:///view$2$1$3$3/')
MsgBox(0, '', '源' & @LF & $Str & @LF & '替换结果' & @LF & $sRE)

李岸 发表于 2015-7-5 22:31:34

回复 2# afan


    老师您的正则已经学的出神入化了,学生我不甚感激也不甚佩服！

zhaoyun 发表于 2015-7-6 09:56:06

学习了。。。。。。。。。。。。

kemyliu 发表于 2015-7-13 21:59:04

非常感谢，单鞋AFan
页: [1]
查看完整版本: 正则替换