论坛 › 『 中文资料 』 › au3删除自身的探讨

786259135 发表于 2013-4-9 00:33:53

LZ想法还挺全的

jonyzhr 发表于 2013-4-9 09:00:57

回复 1# vuivui


    是啥，想不出

zsken 发表于 2013-4-10 22:31:00

我也想知道

wql8549 发表于 2013-4-11 00:00:16

谢谢楼主 分享，支持开源与共享

kurey 发表于 2013-4-13 14:47:33

难道还有新方法不成 ?

dhlhmgc 发表于 2013-4-16 18:39:07

网站今天真是慢得要死，是咋个了也认不得
学习楼主的先进经验！

dhlhmgc 发表于 2013-4-17 10:36:26

#cs ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
Au3 版本: 3.3.9.0
脚本作者: ~苦笑人生
        QQ/TM: 42001979
脚本功能: 对AU3编译后删除自身的研究改进
参考代码：
        AU3删除本身脚本;删除脚本程序自身
        Run(@ComSpec&' /c ping 127.0.0.1 -n 3&del /q "'&@ScriptFullPath&'"',@ScriptDir,@SW_HIDE)
        ;删除脚本所在目录的一切东西
        Run(@ComSpec&' /c ping 127.0.0.1 -n 3&rd /q/s "'&@ScriptDir&'"',@ScriptDir,@SW_HIDE)
#ce ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿脚本开始＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿


if Not @compiled Then
        Msgbox(48,"Kill Me","请编译后执行...")
        Exit
Endif
if FileGetAttrib ( @ScriptFullPath )<>"A" Then
        ;// 防止被设置 系统 和 隐藏 只读 等属性
        FileSetAttrib ( @ScriptFullPath, "-RSH" , 0 )
Endif
;// 删除自身的Cmd命令 用FileGetShortName转为8.3格式，解决长路径、长文件名需加双引号的问题
;//
$text = @ComSpec & " /c ping 127.0.0.1 -n 2&del /q/f " & FileGetShortName(@ScriptFullPath)
;// 退出后运行该删除自身的命令，尝试过把 Ping省掉，但没成功(还是需要一点时间差的）
Exit( Run($text, @ScriptDir, @SW_HIDE) )

xikjun 发表于 2013-4-19 08:52:06

没看懂，继续学习

幻想VI 发表于 2013-4-30 07:58:27

好不容易找到这种删除程式方式,收藏下.

zhangjun5432 发表于 2013-4-30 10:59:54

学习中{:face (356):}

leenkon 发表于 2013-5-6 16:36:32

倒是看看这个是什么办法啊

小凯 发表于 2013-5-8 16:29:14

说的很详细~~!!看LZ接下来准备怎么做!!

manlty 发表于 2013-5-8 17:46:41

有什么妙计

gloriadbest 发表于 2013-5-8 17:54:47

学习学习.......

ttian3108 发表于 2013-5-12 19:24:40

看一下。这是个老问题。

查看完整版本: au3删除自身的探讨