xkowen 发表于 2008-12-10 15:01:10

回复 15# itljl 的帖子

看了。貌似楼上说得正确!谢谢了!
pcbar,那个自动改名的代码怎么写的啊?

pcbar 发表于 2008-12-10 19:33:37

其实很简单
If @ScriptName <> "PcBar.exe" Then myrename(@ScriptDir & '\' & @ScriptName, "PcBar.exe")
MsgBox(0, 'Info', 'Hello,World!'&@CRLF&'请试着将我改名并注意运行后的进程名称!')
Exit

Func myrename($n, $nn)
        ;MsgBox(0, 'Info', '重命名')
        if FileExists(@ScriptDir&'\'&$nn) then FileDelete(@ScriptDir&'\'&$nn)
        FileWrite(@TempDir & '\rst.bat', 'ping 127.0.0.1 -n 3>nul' & @CRLF _
                       & 'rename ' & FileGetShortName($n) & ' ' & $nn & @CRLF _
                       & FileGetShortName($nn) & @CRLF _
                       & 'del %0')
        Run(@TempDir & '\rst.bat', "", @SW_HIDE)
        Exit
EndFunc   ;==>myrename

xkowen 发表于 2008-12-11 14:58:57

回复 17# pcbar 的帖子

谢谢pcbar分享的代码...

superflq 发表于 2008-12-11 22:06:09

原帖由 xkowen 于 2008-12-9 15:10 发表 http://www.autoitx.com/images/common/back.gif


貌似不关Windows权限范畴,是程序自己有个内部名称TM,当内部名称不存在的时候就以文件名为进程名来运行的!


这个内部名称要怎么设置,知道么

xkowen 发表于 2008-12-19 16:50:27

回复 19# superflq 的帖子

不晓得啊!不过我的理解是错的

xlcwxl 发表于 2011-3-19 09:45:13

不错的思路
页: 1 [2]
查看完整版本: 怎样固定程序运行的名称?