如何实现程序的自销毁

skypaladin 2003-11-07 11:22:18
例如,做好了一个.exe,如何实现运行后删除自身(就是删除.exe文件)?
...全文
99 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
vbanddelphi 2003-11-11
  • 打赏
  • 举报
回复
学习,学习
Julies 2003-11-11
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Open "c:\killme.bat" For Output As #1
Print #1, "@echo off" '讓批次檔不會出現指令訊息
Print #1, ":aa": Print #1, "if exist c:\killme.exe goto bb" 'c:\killme.exe為本執行檔的完整路徑
Print #1, "goto cc": Print #1, ":bb"
Print #1, "del c:\killme.exe": Print #1, "cls" '螢幕訊息立即消掉
Print #1, "if exist c:\killme.exe goto aa" '殺不死!再殺!
Print #1, "cls" '再有螢幕訊息也消掉
Print #1, ":cc": Print #1, "echo Hello!!!>c:\killme.exe " '再補一刀!讓undelete也救不回來!
Print #1, "del c:\killme.exe": Print #1, "del c:\killme.bat" '連批次檔也自毀
Print #1, "cls" '最後總清理

Print #1, "exit"
Close #1
'dos執行後也消失!工作列上dos會一閃即逝!即成功了!
Shell "command.com /c c:\killme.bat", 6
End '自己結束!後續的工作交給非同步的批次檔完成!
End Sub
(有人會質疑,費心寫的程式,又為何要把它毀掉...那不要寫就好了?! "代誌ㄟ意義" 當然不是只是好玩!如果搭配在程式防盜保謢上,也不失為一種方式! ^_^)
oc100 2003-11-11
  • 打赏
  • 举报
回复
回复人: zhuqingxipy(竹青) ( ) 信誉:100 2003-11-11 17:14:00 得分:0
可以用KILL方法
例:kill d:\test.txt


程序在启动时不能删除自己阿
zhuqingxipy 2003-11-11
  • 打赏
  • 举报
回复
可以用KILL方法
例:kill d:\test.txt
handsomge 2003-11-07
  • 打赏
  • 举报
回复
win98 下边通过Wininit.ini实现过(得重启系统)
win2000下好像没有找到这个文件。但是肯定有其他途径
还看到过一个老外写的汇编,只有简单的几行。
射天狼 2003-11-07
  • 打赏
  • 举报
回复
程序的路径,文件名,自己改吧~~
射天狼 2003-11-07
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
Open "C:\aa.bat" For Output As #1
Print #1, "del -y C:\aa.exe"
Print #1, "del -y C:\aa.bat"
Close #1

Unload Me
DoEvents

Shell "Cmd /c aa.bat" ' 2000下
'Shell "Command.com /c aa.bat" ' 98下
End Sub

'假如程序是放在C盘根目录下,这是利用批处理文件来删除自身的原理!

7,766

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧