【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《软件自定义卸载器(可结束进程、删除目录、文件、注册表键值)》,欢迎阅读!
软件自定义卸载器(可结束进程、删除目录、文件、注册表键
值)
软件自定义卸载器 (可结束进程、删除目录、文件、注册表键值)
本人随笔 软件自定义卸载器 (可结束进程、删除目录、文件、注册表键值、执行命令等)该程序能根据配置好的信息卸载指定的任何程序。如结束进程、删除目录/文件、删除 注册 表键值以及执行相应的命令。第一次运行该程序时会自动创建配置文件,用户只需填入相
本人随笔 软件自定义卸载器 (可结束进程、删除目录、文件、注册表键值、执行命令等)该程序能根据配置好的信息卸载指定的任何程序。如结束进程、删除目录/文件、删除注册表键值以及执行相应的命令。第一次运行该程序时会自动创建配置文件,用户只需填入相应信息即可正常使用。
如要删除 c:\program files 目录下的 sky808 文件夹,只需在[目录]字段添加: 1 = c:\program files\sky808 即可。序号可根据添加的条数类增。
程序代码: #NoTrayIcon
Const $IniFile=StringTrimRight(@ScriptName,3)&"ini" If NOT FileExists($IniFile) Then _IniCreate() Local $ProcessSec=IniReadSection($IniFile,"进程") If Not @Error Then
For $i=1 To $ProcessSec[0][0] ProcessClose($ProcessSec[$i][1]) Next EndIf
Local $FolderSec=IniReadSection($IniFile,"目录") If Not @Error Then
For $i=1 To $FolderSec[0][0] DirRemove($FolderSec[$i][1],1) Next EndIf
Local $FileSec=IniReadSection($IniFile,"文件") If Not @Error Then For $i=1 To $FileSec[0][0] FileDelete($FileSec[$i][1]) Next EndIf
Local $RegSec=IniReadSection($IniFile,"注册表") If Not @Error Then For $i=1 To $RegSec[0][0] RegDelete($RegSec[$i][1]) Next EndIf
Local $CmdSec=IniReadSection($IniFile,"命令行") If Not @Error Then For $i=1 To $CmdSec[0][0]
Run($CmdSec[$i][1],@ScriptDir,@SW_HIDE) Next EndIf
MsgBox(64,"OK","Finish!") Func _IniCreate() Local $IniStr = _ "[进程]"&@CRLF& _
";序号 = 结束进程名"&@CRLF&@CRLF& _ "[目录]"&@CRLF& _
本文来源:https://www.wddqxz.cn/c3437b4fb62acfc789eb172ded630b1c59ee9b85.html