|
发表于 2025-2-14 20:22:08
|
显示全部楼层
贵州省贵阳市
第一种:
.版本 2
.支持库 shell
.程序启动
调用命令("chkntfs /x C:") ' 禁止C盘的磁盘自检查
.子程序 调用命令, 整数型, (文本 命令)
局部变量 hShell, 整数型
hShell = ShellExecute(0, "open", "cmd.exe", "/c " + 命令, "", 0) ' 执行命令
如果 (hShell = 0) ' 判断是否成功执行命令
信息框("命令执行失败!", 0, 0)
否则
信息框("命令执行成功!", 0, 0)
结束
第二种:
禁用磁盘自检查的易语言代码:
易语言
复制
编辑
.版本 2
.支持库 registry
.程序启动
' 禁用磁盘自检查
禁用磁盘自检查()
.子程序 禁用磁盘自检查
局部变量 注册表路径, 文本
局部变量 键值, 文本
注册表路径 = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager"
键值 = "BootExecute"
' 设置注册表值为空,禁用磁盘自检查
写注册表文本(注册表路径, 键值, "")
' 提示完成
信息框("磁盘自检查已禁用!", 0, 0)
恢复磁盘自检查:
如果你想恢复磁盘自检查,可以将BootExecute键的值设置回autocheck autochk *,如下所示:
易语言
复制
编辑
.子程序 恢复磁盘自检查
局部变量 注册表路径, 文本
局部变量 键值, 文本
局部变量 键值内容, 文本
注册表路径 = "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager"
键值 = "BootExecute"
键值内容 = "autocheck autochk *"
' 恢复磁盘自检查
写注册表文本(注册表路径, 键值, 键值内容)
' 提示恢复完成
信息框("磁盘自检查已恢复!", 0, 0) |
|