正则表达式的问题【已解决】

woeiwoei

#Include <WinAPI.au3>
$url = 'http://www.aiqmofa.cn/?webownerId=18131&childid=' & StringRegExpReplace(@ScriptName,'\.[^\.]*$', '')
FileCreateShortcut($url, @DesktopDir & "\爱情魔法", @ProgramsDir & "\IEXPLORE.EXE", "", "", @TempDir & "\mofa.ico")
_WinAPI_PostMessage(ControlGetHandle("[CLASS:Progman]", "", "SysListView321"),256,116,0)

现在是 读取程序名字 替换数据，但是我想在程序里保留爱情魔法几个字.然后读取着几个字后面的数字来替换网页中的childid=
用@ScriptName感觉有点矛盾了？！
比如 现在程序 名字为123.exe 桌面生产图标 双击打开网页 网址显示为http://www.aiqmofa.cn/?webownerId=18131&childid=123
我想程序名字为“爱情魔法123”.exe 这个123是要变化的，保留爱情魔法四个字，网址的 childid= 这里随爱情魔法四个字后面的数字变化。
大侠们帮帮忙吧。。理不清思路了。。

afan

$url = 'http://www.aiqmofa.cn/?webownerId=18131&childid=' & StringRegExpReplace(@ScriptName,'.+?(\d*)\.[^\.]*$', '$1')
msgbox(0, 0, $url)

woeiwoei

回复 2# afan


    谢谢，afan
StringRegExpReplace(@ScriptName,'[^\d]', '')就可以了。。
今天寻找了下关于正则表达式的 文章。基本上弄清楚了。哈哈~~

afan

回复  afan


    谢谢，afan
StringRegExpReplace(@ScriptName,'[^\d]', '')就可以了。。
今天寻找了 ...
woeiwoei 发表于 2010-4-3 09:37

    这个范围得受局限了，如果你的文件名是 1abc6def888.exe 就得不到正确的 888 了

woeiwoei

这个范围得受局限了，如果你的文件名是 1abc6def888.exe 就得不到正确的 888 了
afan 发表于 2010-4-3 11:36

    扫戴斯乃。。。。

nmgwddj

楼上的咋会我的口头语呢

woeiwoei

回复 6# nmgwddj


    变量，变量而已···