精易论坛

标题: 易语言如何写强制删除指定正在运行的文件,类似粉碎 [打印本页]

---

作者: x646526020    时间: 2019-8-22 23:50
标题: 易语言如何写强制删除指定正在运行的文件,类似粉碎
如题 急

---

作者: 走一回    时间: 2019-8-22 23:50
这个代码基本上可行

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
文件名	文本型

通用对话框1.打开 ()
文件名 ＝ 通用对话框1.文件名
进程_结束 (进程_名取ID (取文本右边 (文件名, 取文本长度 (文件名) － 倒找文本 (文件名, “\”, , 假)), ))
延迟 (1000)
删除文件 (文件名)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文件名, 文本型<br /> <br /> 通用对话框1.打开 ()<br /> 文件名 ＝ 通用对话框1.文件名<br /> 进程_结束 (进程_名取ID (取文本右边 (文件名, 取文本长度 (文件名) － 倒找文本 (文件名, “\”, , 假)), ))<br /> 延迟 (1000)<br /> 删除文件 (文件名)

---

作者: 白天不懂爺的黑    时间: 2019-8-23 01:05
只能结束当前调用的程序才能删除。360也是如此。

---

作者: 已注销474226    时间: 2019-8-23 01:34
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 白嫖之黑    时间: 2019-8-23 01:56
参照电脑管家的粉碎，粉碎之前是先解锁。而解锁就是判断他有没有在运行。然后强制关闭。

---

作者: Bszk    时间: 2019-8-23 02:22
枚举进程，取进程路径对比，结束进程，删除文件，这是思路。

---

作者: 白嫖之黑    时间: 2019-8-23 02:23

  

变量名	类 型	静态	数组	备 注
假设要删除的文件路径	文本型
文件号	整数型
进程ID	整数型

进程_提升权限 (, )
假设要删除的文件路径 ＝ 目录_取桌面目录 () ＋ “333.txt”
进程ID ＝ 进程_名取ID (文件_取文件名 (假设要删除的文件路径, 真), )
如果真 (进程ID ≠ 0)
进程_结束 (进程ID)
延时 (500)
文件号 ＝ 打开文件 (假设要删除的文件路径, 4, 1)
如果真 (文件号 ＝ 0)
信息框 (“文件被占用，无法删除，例如运行中的DLL是无法被删除的。电脑管家也删不了。”, 0, , )
关闭文件 (文件号)
判断 (删除文件 (假设要删除的文件路径))
信息框 (“删除成功”, 0, , )
信息框 (“删除失败”, 0, , )

.版本 2<br /> <br /> .局部变量 假设要删除的文件路径, 文本型<br /> .局部变量 文件号, 整数型<br /> .局部变量 进程ID, 整数型<br /> <br /> 进程_提升权限 (, )<br /> 假设要删除的文件路径 ＝ 目录_取桌面目录 () ＋ “333.txt”<br /> 进程ID ＝ 进程_名取ID (文件_取文件名 (假设要删除的文件路径, 真), )<br /> .如果真 (进程ID ≠ 0)<br />     进程_结束 (进程ID)<br /> .如果真结束<br /> 延时 (500)<br /> 文件号 ＝ 打开文件 (假设要删除的文件路径, 4, 1)<br /> .如果真 (文件号 ＝ 0)<br />     信息框 (“文件被占用，无法删除，例如运行中的DLL是无法被删除的。电脑管家也删不了。”, 0, , )<br /> .如果真结束<br /> 关闭文件 (文件号)<br /> .判断开始 (删除文件 (假设要删除的文件路径))<br />     信息框 (“删除成功”, 0, , )<br /> .默认<br />     信息框 (“删除失败”, 0, , )

---

作者: x646526020    时间: 2019-8-23 11:16

lan枫 发表于 2019-8-23 02:23
[e=0].版本 2

.局部变量 假设要删除的文件路径, 文本型

没用 删不了运行中的文件

---

作者: 白嫖之黑    时间: 2019-8-23 18:38

x646526020 发表于 2019-8-23 11:16
没用 删不了运行中的文件

可以删除啊。我试过 的。除非。进程权限特别高。无法结束。

---

作者: 215029993    时间: 2019-8-23 21:25
结束当前调用的程序才能删除

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4