Windows10一键优化带检查功能Autoit代码

最新推荐文章于 2024-05-11 09:39:25 发布
最新推荐文章于 2024-05-11 09:39:25 发布
阅读量389 收藏
点赞数 1
分类专栏： Autoit 文章标签： windows linux 运维
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/sd132072/article/details/128234700
版权 
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#PRE_Icon=..\..\..\系统美化\系统图标\FolderColorer_v0.3\Icons\全部\My Computer.ico
#PRE_Compile_Both=y
#PRE_Res_Comment=Windows10一键优化
#PRE_Res_Description=Windowns10一键优化
#PRE_Res_Fileversion=1.0.0.4
#PRE_Res_Fileversion_AutoIncrement=y
#PRE_Res_LegalCopyright=jiguilin@richtech.cn
#PRE_Res_requestedExecutionLevel=None
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <file.au3>
Opt("GUIOnEventMode", 1)
Opt("TrayIconHide", 1)
Opt("TrayIconDebug", 1) 
#Region ### START Koda GUI section ### Form=d:\我的文档\桌面\Form1.kxf
$arr = DriveGetDrive("FIXED")
For $i = 1 To $arr[0]
	$folder = _FileListToArray($arr[$i] & "\", "win*", 2)
	If @error Then ContinueLoop
	For $j = 1 To $folder[0]
		$kernel_path = $arr[$i] & "\" & $folder[$j] & "\system32\kernel32.dll"
		If FileExists($kernel_path) Then
			$version = FileGetVersion($kernel_path, "ProductVersion")
		EndIf
	Next
Next


Local $sFileVersion = FileGetVersion(@AutoItExe)

If @AutoItX64 = "1" Then
	$CPU = " 64位"
Else
	$CPU = " 32位"
EndIf

$Form1 = GUICreate("Windows10 一键优化" & "   软件版本：" & $sFileVersion  & $CPU &"   系统版本：" &  $version, 1070, 690)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$Button1 = GUICtrlCreateButton("正在检测中...", 900, 630, 105, 33)
GUICtrlSetState($Button1,$GUI_DISABLE)
GUICtrlSetOnEvent($Button1, "Button1Click")
$Checkbox1 = GUICtrlCreateCheckbox("禁用索引服务", 8, 8, 160, 17)
$Checkbox2 = GUICtrlCreateCheckbox("禁止window发送错误报告", 8, 32, 160, 17)
$Checkbox3 = GUICtrlCreateCheckbox("禁用最近使用的项目", 8, 56, 160, 17)
$Checkbox4 = GUICtrlCreateCheckbox("关闭 Windows Defender", 8, 80, 160, 17)
$Checkbox5 = GUICtrlCreateCheckbox("关闭 Windows 防火墙", 8, 104, 160, 17)
$Checkbox6 = GUICtrlCreateCheckbox("禁用自动下载更新", 8, 128, 180, 17)
$Checkbox7 = GUICtrlCreateCheckbox("推迟功能更新", 8, 152, 180, 17)
$Checkbox8 = GUICtrlCreateCheckbox("启动电源计划高性能", 8, 176, 180, 17)
$Checkbox9 = GUICtrlCreateCheckbox("关闭显示器前等待时间", 8, 200, 180, 17)
$Checkbox10 = GUICtrlCreateCheckbox("关闭计算机进入睡眠状态前等待时间", 8, 224, 210, 17)
$Checkbox11 = GUICtrlCreateCheckbox("禁用混合睡眠", 8, 248, 210, 17)
$Checkbox12 = GUICtrlCreateCheckbox("禁用休眠", 8, 272, 210, 17)
$Checkbox13 = GUICtrlCreateCheckbox("关闭快速启动(Hybrid Boot)", 8, 296, 210, 17)
$Checkbox14 = GUICtrlCreateCheckbox("关闭系统保护并删除还原点", 8, 320, 210, 17)
$Checkbox15 = GUICtrlCreateCheckbox("关闭用户账户控制(UAC)", 8, 344, 210, 17)
$Checkbox16 = GUICtrlCreateCheckbox("移除右键菜单中的 SkyDrive Pro", 8, 368, 210, 17)
$Checkbox17 = GUICtrlCreateCheckbox("禁用任务计划程序自启项", 8, 392, 210, 17)
$Checkbox18 = GUICtrlCreateCheckbox("禁止运行计算机自动维护计划", 8, 416, 210, 17)
$Checkbox19 = GUICtrlCreateCheckbox("关闭程序兼容性助手", 8, 440, 210, 17)
$Checkbox20 = GUICtrlCreateCheckbox("禁止一联网就打开浏览器", 8, 464, 210, 17)
$Checkbox21 = GUICtrlCreateCheckbox("桌面显示“这台电脑”", 8, 488, 210, 17)
$Checkbox22 = GUICtrlCreateCheckbox("关闭家庭组", 8, 512, 210, 17)
$Checkbox23 = GUICtrlCreateCheckbox("延迟启动 Superfetch 服务", 8, 536, 210, 17)
$Checkbox24 = GUICtrlCreateCheckbox("关闭开机画面(GUI引导)", 8, 560, 210, 17)
$Checkbox25 = GUICtrlCreateCheckbox("关闭 IPv6", 8, 584, 210, 17)
$Checkbox26 = GUICtrlCreateCheckbox("关闭客户体验改善计划", 8, 608, 210, 17)
$Label1 = GUICtrlCreateLabel("等待检测", 280, 8, 52, 17)
$Label2 = GUICtrlCreateLabel("等待检测", 280, 32, 52, 17)
$Label3 = GUICtrlCreateLabel("等待检测", 280, 56, 52, 17)
$Label4 = GUICtrlCreateLabel("等待检测", 280, 80, 52, 17)
$Label5 = GUICtrlCreateLabel("等待检测", 280, 104, 52, 17)
$Label6 = GUICtrlCreateLabel("等待检测", 280, 128, 52, 17)
$Label7 = GUICtrlCreateLabel("等待检测", 280, 152, 52, 17)
$Label8 = GUICtrlCreateLabel("等待检测", 280, 176, 52, 17)
$Label9 = GUICtrlCreateLabel("等待检测", 280, 200, 52, 17)
$Label10 = GUICtrlCreateLabel("等待检测", 280, 224, 52, 17)
$Label11 = GUICtrlCreateLabel("等待检测", 280, 248, 52, 17)
$Label12 = GUICtrlCreateLabel("等待检测", 280, 272, 52, 17)
$Label13 = GUICtrlCreateLabel("等待检测", 280, 296, 52, 17)
$Label14 = GUICtrlCreateLabel("等待检测", 280, 320, 52, 17)
$Label15 = GUICtrlCreateLabel("等待检测", 280, 344, 52, 17)
$Label16 = GUICtrlCreateLabel("等待检测", 280, 368, 52, 17)
$Label17 = GUICtrlCreateLabel("等待检测", 280, 392, 52, 17)
$Label18 = GUICtrlCreateLabel("等待检测", 280, 416, 52, 17)
$Label19 = GUICtrlCreateLabel("等待检测", 280, 440, 52, 17)
$Label20 = GUICtrlCreateLabel("等待检测", 280, 464, 52, 17)
$Label21 = GUICtrlCreateLabel("等待检测", 280, 488, 52, 17)
$Label22 = GUICtrlCreateLabel("等待检测", 280, 512, 52, 17)
$Label23 = GUICtrlCreateLabel("等待检测", 280, 536, 52, 17)
$Label24 = GUICtrlCreateLabel("等待检测", 280, 560, 52, 17)
$Label25 = GUICtrlCreateLabel("等待检测", 280, 584, 52, 17)
$Label26 = GUICtrlCreateLabel("等待检测", 280, 608, 52, 17)
$Checkbox27 = GUICtrlCreateCheckbox("隐藏操作中心任务栏托盘", 360, 8, 160, 17)
$Label27 = GUICtrlCreateLabel("等待检测", 632, 8, 52, 17)
$Checkbox28 = GUICtrlCreateCheckbox("关闭自动播放", 360, 32, 160, 17)
$Label28 = GUICtrlCreateLabel("等待检测", 632, 32, 52, 17)
$Checkbox29 = GUICtrlCreateCheckbox("设置窗口超窄边框", 360, 56, 160, 17)
$Label29 = GUICtrlCreateLabel("等待检测", 632, 56, 52, 17)
$Checkbox30 = GUICtrlCreateCheckbox("删除“回收站”右键固定到开始屏幕", 360, 80, 250, 17)
$Label30 = GUICtrlCreateLabel("等待检测", 632, 80, 52, 17)
$Checkbox31 = GUICtrlCreateCheckbox("关闭 Smartscreen 应用筛选器", 360, 104, 250, 17)
$Label31 = GUICtrlCreateLabel("等待检测", 632, 104, 52, 17)
$Checkbox32 = GUICtrlCreateCheckbox("关机时强制结束后台进程不等待", 360, 128, 250, 17)
$Label32 = GUICtrlCreateLabel("等待检测", 632, 128, 52, 17)
$Checkbox33 = GUICtrlCreateCheckbox("调整为最佳性能", 360, 152, 250, 17)
$Label33 = GUICtrlCreateLabel("等待检测", 632, 152, 52, 17)
$Checkbox34 = GUICtrlCreateCheckbox("关闭不必要的视觉动画效果", 360, 176, 250, 17)
$Label34 = GUICtrlCreateLabel("等待检测", 632, 176, 52, 17)
$Checkbox35 = GUICtrlCreateCheckbox("关闭磁盘碎片整理计划", 360, 200, 250, 17)
$Label35 = GUICtrlCreateLabel("等待检测", 632, 200, 52, 17)
$Checkbox36 = GUICtrlCreateCheckbox("禁用系统日志和内存转储", 360, 224, 250, 17)
$Label36 = GUICtrlCreateLabel("等待检测", 632, 224, 52, 17)
$Checkbox37 = GUICtrlCreateCheckbox("禁用疑难解答和系统诊断服务", 360, 248, 250, 17)
$Label37 = GUICtrlCreateLabel("等待检测", 632, 248, 52, 17)
$Checkbox38 = GUICtrlCreateCheckbox("去除快捷方式小箭头和后缀", 360, 272, 250, 17)
$Label38 = GUICtrlCreateLabel("等待检测", 632, 272, 52, 17)
$Checkbox39 = GUICtrlCreateCheckbox("去除UAC小盾牌", 360, 296, 250, 17)
$Label39 = GUICtrlCreateLabel("等待检测", 632, 296, 52, 17)
$Checkbox40 = GUICtrlCreateCheckbox("鼠标指向右上角不显示超级按钮", 360, 320, 250, 17)
$Label40 = GUICtrlCreateLabel("等待检测", 632, 320, 52, 17)
$Checkbox41 = GUICtrlCreateCheckbox("登录显示桌面而非开始屏幕", 360, 344, 250, 17)
$Label41 = GUICtrlCreateLabel("等待检测", 632, 344, 52, 17)
$Checkbox42 = GUICtrlCreateCheckbox("禁止弹出商店应用通知", 360, 368, 250, 17)
$Label42= GUICtrlCreateLabel("等待检测", 632, 368, 52, 17)
$Checkbox43 = GUICtrlCreateCheckbox("删除所有已经安装的商店应用", 360, 392, 250, 17)
$Label43 = GUICtrlCreateLabel("等待检测", 632, 392, 52, 17)
$Checkbox44 = GUICtrlCreateCheckbox("通知区域始终显示所有图标", 360, 416, 250, 17)
$Label44 = GUICtrlCreateLabel("等待检测", 632, 416, 52, 17)
$Checkbox45 = GUICtrlCreateCheckbox("使用小任务栏按钮", 360, 440, 250, 17)
$Label45 = GUICtrlCreateLabel("等待检测", 632, 440, 52, 17)
$Checkbox46 = GUICtrlCreateCheckbox("打开资源管理器默认打开我的电脑", 360, 464, 250, 17)
$Label46 = GUICtrlCreateLabel("等待检测", 632, 464, 52, 17)
$Checkbox47 = GUICtrlCreateCheckbox("关闭在使用 windows 时获取提示、技巧和建议", 360, 488, 250, 17)
$Label47 = GUICtrlCreateLabel("等待检测", 632, 488, 52, 17)
$Checkbox48 = GUICtrlCreateCheckbox("关闭获取来自应用或其他发送者的通知", 360, 512, 250, 17)
$Label48 = GUICtrlCreateLabel("等待检测", 632, 512, 52, 17)
$Checkbox49 = GUICtrlCreateCheckbox("不显示安全中心提示", 360, 536, 250, 17)
$Label49 = GUICtrlCreateLabel("等待检测", 632, 536, 52, 17)
$Checkbox50 = GUICtrlCreateCheckbox("关闭向Microsoft发送你的设备数据", 360, 560, 250, 17)
$Label50 = GUICtrlCreateLabel("等待检测", 632, 560, 52, 17)
$Checkbox51 = GUICtrlCreateCheckbox("关闭自动更新地图", 360, 584, 250, 17)
$Label51 = GUICtrlCreateLabel("等待检测", 632, 584, 52, 17)
$Checkbox52 = GUICtrlCreateCheckbox("关闭在所有媒体和设备上使用自动播放", 360, 608, 250, 17)
$Label52= GUICtrlCreateLabel("等待检测", 632, 608, 52, 17)

$Checkbox53= GUICtrlCreateCheckbox("禁止应用在后台运行", 720, 8, 160, 17)
$Label53 = GUICtrlCreateLabel("等待检测", 1000, 8, 52, 17)
$Checkbox54 = GUICtrlCreateCheckbox("任务栏隐藏Cortana", 720, 32, 250, 17)
$Label54 = GUICtrlCreateLabel("等待检测", 1000, 32, 52, 17)
$Checkbox55 = GUICtrlCreateCheckbox("输入法默认模式设置为英语", 720, 56, 250, 17)
$Label55 = GUICtrlCreateLabel("等待检测", 1000, 56, 52, 17)
$Checkbox56 = GUICtrlCreateCheckbox("关闭拼音输入法云计算", 720, 80, 250, 17)
$Label56 = GUICtrlCreateLabel("等待检测", 1000, 80, 52, 17)
$Checkbox57 = GUICtrlCreateCheckbox("关闭 Windows 应询问我的意见", 720, 104, 250, 17)
$Label57 = GUICtrlCreateLabel("等待检测", 1000, 104, 52, 17)
$Checkbox58 = GUICtrlCreateCheckbox("从不合并任务栏", 720, 128, 250, 17)
$Label58 = GUICtrlCreateLabel("等待检测", 1000, 128, 52, 17)
$Checkbox59 = GUICtrlCreateCheckbox("删除Windows Defender开机启动", 720, 152, 250, 17)
$Label59 = GUICtrlCreateLabel("等待检测", 1000, 152, 52, 17)
$Checkbox60 = GUICtrlCreateCheckbox("删除OneDrive开机启动", 720, 176, 250, 17)
$Label60 = GUICtrlCreateLabel("等待检测", 1000, 176, 52, 17)
$Checkbox61 = GUICtrlCreateCheckbox("删除右键Windows Defender菜单", 720, 200, 250, 17)
$Label61 = GUICtrlCreateLabel("等待检测", 1000, 200, 52, 17)
$Checkbox62 = GUICtrlCreateCheckbox("使用默认的图片浏览器", 720, 224, 250, 17)
$Label62 = GUICtrlCreateLabel("等待检测", 1000, 224, 52, 17)
$Checkbox63 = GUICtrlCreateCheckbox("不允许其他设备上的应用打开应用", 720, 248, 250, 17)
$Label63 = GUICtrlCreateLabel("等待检测", 1000, 248, 52, 17)
$Checkbox64 = GUICtrlCreateCheckbox("不允许其他设备上的应用使用蓝牙打开应用", 720, 272, 250, 17)
$Label64 = GUICtrlCreateLabel("等待检测", 1000, 272, 52, 17)
$Checkbox65 = GUICtrlCreateCheckbox("不允许网站访问我的语言列表", 720, 296, 250, 17)
$Label65 = GUICtrlCreateLabel("等待检测", 1000, 296, 52, 17)
$Checkbox66 = GUICtrlCreateCheckbox("不允许应用使用我的广告标识符", 720, 320, 250, 17)
$Label66 = GUICtrlCreateLabel("等待检测", 1000, 320, 52, 17)
$Checkbox67 = GUICtrlCreateCheckbox("关闭SmartScreen筛选器", 720, 344, 250, 17)
$Label67 = GUICtrlCreateLabel("等待检测", 1000, 344, 250, 17)
$Checkbox68 = GUICtrlCreateCheckbox("关闭定位服务", 720, 368, 250, 17)
$Label68 = GUICtrlCreateLabel("等待检测", 1000, 368, 52, 17)
$Checkbox69 = GUICtrlCreateCheckbox("禁用自动下载和安装应用商店更新", 720, 392, 250, 17)
$Label69 = GUICtrlCreateLabel("等待检测", 1000, 392, 52, 17)
$Checkbox70 = GUICtrlCreateCheckbox("开机自动开启小键盘灯", 720, 416, 250, 17)
$Label70 = GUICtrlCreateLabel("等待检测", 1000, 416, 52, 17)

$Checkbox71 = GUICtrlCreateCheckbox("设置IE首页为空白页", 720, 440, 250, 17)
$Label71 = GUICtrlCreateLabel("等待检测", 1000, 440, 52, 17)
$Checkbox72 = GUICtrlCreateCheckbox("设置IE新建标签页显示空白页", 720, 464, 250, 17)
$Label72 = GUICtrlCreateLabel("等待检测", 1000, 464, 52, 17)
$Checkbox73 = GUICtrlCreateCheckbox("第一次打开IE不显示微软网站", 720, 488, 250, 17)
$Label73 = GUICtrlCreateLabel("等待检测", 1000, 488, 52, 17)
$Checkbox74 = GUICtrlCreateCheckbox("第一次打开IE不显示设置提示", 720, 512, 250, 17)
$Label74 = GUICtrlCreateLabel("等待检测", 1000, 512, 52, 17)
$Checkbox75 = GUICtrlCreateCheckbox("设置Edge首页为空白页", 720, 536, 250, 17)
$Label75 = GUICtrlCreateLabel("等待检测", 1000, 536, 52, 17)
$Checkbox76 = GUICtrlCreateCheckbox("设置Edge第一次打开不显示微软网站", 720, 560, 250, 17)
$Label76 = GUICtrlCreateLabel("等待检测", 1000, 560, 52, 17)
$Checkbox77 = GUICtrlCreateCheckbox("设置Edge新建标签页显示空白页", 720, 584, 250, 17)
$Label77 = GUICtrlCreateLabel("等待检测", 1000, 584, 52, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


;检查优化选项
If RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WSearch", "Start") = 4  Then 
	GUICtrlSetData ($Label1,"已优化")
	GUICtrlSetColor($Label1, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label1,"建议优化")
	GUICtrlSetState ($Checkbox1, $GUI_CHECKED)
	GUICtrlSetColor ($Label1, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\Windows Error Reporting","DoReport")  = 1  Then
	GUICtrlSetData ($Label2,"已优化")
	GUICtrlSetColor($Label2, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label2,"建议优化")
	GUICtrlSetState ($Checkbox2, $GUI_CHECKED)
	GUICtrlSetColor ($Label2, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced","Start_TrackProgs")  = 0  Then
	GUICtrlSetData ($Label3,"已优化")
	GUICtrlSetColor($Label3, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label3,"建议优化")
	GUICtrlSetState ($Checkbox3, $GUI_CHECKED)
	GUICtrlSetColor ($Label3, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows Defender","DisableAntiSpyware")  = 1  Then
	GUICtrlSetData ($Label4,"已优化")
	GUICtrlSetColor($Label4, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label4,"建议优化")
	GUICtrlSetState ($Checkbox4, $GUI_CHECKED)
	GUICtrlSetColor ($Label4, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\WindowsFirewall\DomainProfile","EnableFirewall")  = 0 And RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\WindowsFirewall\PrivateProfile","EnableFirewall")  = "0" And RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\WindowsFirewall\PublicProfile","EnableFirewall")  = "0" And RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\DomainProfile","DisableNotifications")  = "1" And RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\PublicProfile","DisableNotifications")  = "1" And RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile","DisableNotifications")  = "1" Then
	GUICtrlSetData ($Label5,"已优化")
	GUICtrlSetColor($Label5, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label5,"建议优化")
	GUICtrlSetState ($Checkbox5, $GUI_CHECKED)
	GUICtrlSetColor ($Label5, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU","NoAutoUpdate")  = 1  Then
	GUICtrlSetData ($Label6,"已优化")
	GUICtrlSetColor($Label6, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label6,"建议优化")
	GUICtrlSetState ($Checkbox6, $GUI_CHECKED)
	GUICtrlSetColor ($Label6, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsUpdate\UX\Settings","DeferUpgrade")  = 1  Then
	GUICtrlSetData ($Label7,"已优化")
	GUICtrlSetColor($Label7, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label7,"建议优化")
	GUICtrlSetState ($Checkbox7, $GUI_CHECKED)
	GUICtrlSetColor ($Label7, 0xFF0000)
EndIf
Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes","ActivePowerScheme")  = "8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c"  Then
	GUICtrlSetData ($Label8,"已优化")
	GUICtrlSetColor($Label8, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label8,"建议优化")
	GUICtrlSetState ($Checkbox8, $GUI_CHECKED)
	GUICtrlSetColor ($Label8, 0xFF0000)
EndIf

Sleep (100)
RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\7516b95f-f776-4464-8c53-06167f40cc99\3c0bc021-c8a8-4e07-a973-6b14cbcb2b7e","ACSettingIndex")
If @error <> 0 Then
	GUICtrlSetData ($Label9,"建议优化")
	GUICtrlSetState ($Checkbox9, $GUI_CHECKED)
	GUICtrlSetColor ($Label9, 0xFF0000)
ElseIf	RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\7516b95f-f776-4464-8c53-06167f40cc99\3c0bc021-c8a8-4e07-a973-6b14cbcb2b7e","ACSettingIndex") <> 0 Then
	GUICtrlSetData ($Label9,"建议优化")
	GUICtrlSetState ($Checkbox9, $GUI_CHECKED)
	GUICtrlSetColor ($Label9, 0xFF0000)
Else
	GUICtrlSetData ($Label9,"已优化")
	GUICtrlSetColor ($Label9, 0xFF00FF)
EndIf

Sleep (100)
RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\238c9fa8-0aad-41ed-83f4-97be242c8f20\29f6c1db-86da-48c5-9fdb-f2b67b1f44da","ACSettingIndex") 
If @error <> 0 Then
	GUICtrlSetData ($Label10,"建议优化")
	GUICtrlSetState ($Checkbox10, $GUI_CHECKED)
	GUICtrlSetColor ($Label10, 0xFF0000)
ElseIf	RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\238c9fa8-0aad-41ed-83f4-97be242c8f20\29f6c1db-86da-48c5-9fdb-f2b67b1f44da","ACSettingIndex") <> 0 Then
	GUICtrlSetData ($Label10,"建议优化")
	GUICtrlSetState ($Checkbox10, $GUI_CHECKED)
	GUICtrlSetColor ($Label10, 0xFF0000)
Else
	GUICtrlSetData ($Label10,"已优化")
	GUICtrlSetColor ($Label10, 0xFF00FF)
EndIf

Sleep (100)
RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\238c9fa8-0aad-41ed-83f4-97be242c8f20\94ac6d29-73ce-41a6-809f-6363ba21b47e","ACSettingIndex") 
If @error <> 0 Then
	GUICtrlSetData ($Label11,"建议优化")
	GUICtrlSetState ($Checkbox11, $GUI_CHECKED)
	GUICtrlSetColor ($Label11, 0xFF0000)
ElseIf	RegRead("HKLM\SYSTEM\CurrentControlSet\Control\Power\User\PowerSchemes\8c5e7fda-e8bf-4a96-9a85-a6e23a8c635c\238c9fa8-0aad-41ed-83f4-97be242c8f20\94ac6d29-73ce-41a6-809f-6363ba21b47e","ACSettingIndex") <> 0 Then
	GUICtrlSetData ($Label11,"建议优化")
	GUICtrlSetState ($Checkbox11, $GUI_CHECKED)
	GUICtrlSetColor ($Label11, 0xFF0000)
Else
	GUICtrlSetData ($Label11,"已优化")
	GUICtrlSetColor ($Label11, 0xFF00FF)
EndIf

Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Power","HibernateEnabled")  = "0"  Then
	GUICtrlSetData ($Label12,"已优化")
	GUICtrlSetColor($Label12, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label12,"建议优化")
	GUICtrlSetState ($Checkbox12, $GUI_CHECKED)
	GUICtrlSetColor ($Label12, 0xFF0000)
EndIf

Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\System","HiberbootEnabled")  = "0"  Then
	GUICtrlSetData ($Label13,"已优化")
	GUICtrlSetColor($Label13, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label13,"建议优化")
	GUICtrlSetState ($Checkbox13, $GUI_CHECKED)
	GUICtrlSetColor ($Label13, 0xFF0000)
EndIf

Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRestore","RPSessionInterval")  = "0"  Then
	GUICtrlSetData ($Label14,"已优化")
	GUICtrlSetColor($Label14, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label14,"建议优化")
	GUICtrlSetState ($Checkbox14, $GUI_CHECKED)
	GUICtrlSetColor ($Label14, 0xFF0000)
EndIf

Sleep (100)
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System","ConsentPromptBehaviorAdmin")  = "0"  Then
	GUICtrlSetData ($Label15,"已优化")
	GUICtrlSetColor($Label15, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label15,"建议优化")
	GUICtrlSetState ($Checkbox15, $GUI_CHECKED)
	GUICtrlSetColor ($Label15, 0xFF0000)
EndIf

Sleep (100)
If Not RegEnumKey("HKEY_CLASSES_ROOT\AllFilesystemObjects\shell\SPFS.ContextMenu",0)  Then
	GUICtrlSetData ($Label16,"已优化")
	GUICtrlSetColor($Label16, 0xFF00FF) 
Else		
	GUICtrlSetData ($Label16,"建议优化")
	GUICtrlSetState ($Checkbox16, $GU
最低0.47元/天 解锁文章
sd132072
关注
  • 1
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
windows下的批处理工具AutoIt的源代码
02-25
AutoIt软件的源代码来的。可以用vc6来编译。 AutoIt 3.2.13.7.1 汉化版 AutoIt v3 是用以编写并生成具有 BASIC 语言风格的脚本程序的免费软件，它被设计用来在Windows GUI（用户界面）中进行自动操作。通过它可以...
文华财经转文本 autoit 代码
04-22
文华财经转文本 autoit 代码
[bat批处理] 一键清理 Windows10 系统垃圾
浪里个狼游记
01-17 8844
使用批处理文件是一种简单而有效的系统优化方法。
Win10优化脚本1
qq_43273874的博客
11-09 3585
用记事本将以下内容保存为bat，右键以管理员身份运行本批处理 -----------------------------------分割线不用复制-------------------------------------- @ECHO off ECHO 关闭Windows Defender reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Polici...
推荐一款强大的Windows 10优化工具：Debloat Windows 10
最新发布
gitblog_00037的博客
05-11 1254
推荐一款强大的Windows 10优化工具：Debloat Windows 10 项目地址:https://gitcode.com/W4RH4WK/Debloat-Windows-10 在数字化时代，我们依赖操作系统管理日常任务，而Windows 10作为最广泛使用的操作系统之一，它的性能和用户体验至关重要。但是，随着微软不断添加新功能和服务，系统可能会变得臃肿，影响速度和隐私。为了解决这个问题，...
批处理bat优化Win10 LTSC 2019系统设置
liupin67的博客
04-07 3733
批处理bat优化Win10 LTSC 2019系统 ::以下内容复制到文本中，修改后缀为.bat，双击运行即可。 setlocal enabledelayedexpansion&%1 mshta vbscript:CreateObject(“Shell.Application”).ShellExecute(“cmd.exe”,"/c %~s0 ::","",“runas”,1)(window.close)&&exit ::禁用 Windows Defender reg add “HK
Windows10系统优化（批处理）
w3340372244的博客
05-15 6930
经历过XP、Win7、Vista、Win8之后，Win10有了很大的改变,虽然Win10刚出时，非常糟糕，甚至很长一段时间被认为没有Win7，但是随着Win10的不断优化不断更新，已经慢慢的变得更好了，无论是功能，还是界面的体验都已经非常的优秀，并且微软也已经不再更新Win7，Win7虽然曾经很辉煌，但是已经慢慢的被微软淘汰 现在很多电脑，在更新了Win7补丁后会被微软提示升级到Win10，Win10需要的设备配置虽然很低，但是很多装了Win7的电脑都已经是老电脑了，而且Win10一些功能平时我们都用不到，
Windows10简单优化-2021-1-17
zisain的博客
01-17 818
windows10简单优化 @echo off @rem 关闭当前用户LUA验证 reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System" /v ConsentPromptBehaviorAdmin /t REG_DWORD /d 0 /f reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policie
autoit源代码
09-02
非常丰富的autoit源代码。
BASS Autoit 代码
01-13
BASS Autoit 代码，音乐 MP3. Autoit Coding for Bass Encode, Decode
AutoIT源代码汇总
09-04
10. **编译与运行**：AutoIT源代码可以通过`Aut2Exe`工具编译成可执行文件，方便分发和执行。 这个压缩包中的实例涵盖了以上各种功能的应用，每个实例都有详细的说明，对于初学者来说，可以通过阅读和分析这些代码...
windows10一键优化批处理关闭一些占用磁盘占用率较高的服务
10-14
windows10是微软最用心的一个系统，但是对机械硬盘很不友好他的很多服务对磁盘的占用率非常高经常百分百。从互联网上收集了一些会导致win10高占用率的服务然后做了个批处理让他们统统关闭不在占用资源
tool_win10优化代码_
10-01
win10优化的几个便捷代码，方便快捷，是管理员使用的好工具
电脑优化工具(PGWAREPcMedik)V8.1.28.2018绿色免费版
07-25
PCMedik可以优化你的电脑，让PC发挥更大的性能，大大减少死机的事件。你只须选择操作系统的类型和CPU名字，再点击[GO]按钮就会完成全部的有优化设定 2018最新版本值得你来一试！ 更新日志： 8.8.1.2016 去掉了验证码代码的所有可执行文件签名的签名，因为它是即将到期。
Win10一键自动优化(以管理员身份运行)
03-09
适用Win10和Win11 1. 关闭用户账户控制(UAC) 2. 关闭部分不常用服务（如出现账户登录选项会卡显示慢，找我解决） 3 . 禁用部分不常用任务计划程序 4. 关闭Windows Defender 5. 桌面显示“这台电脑” 6. 关闭磁盘碎片整理计划 7. 启动电源计划“高性能 8. 任务栏日期显示“星期几” 9. 修改默认软件安装路径（新装系统可以改，旧系统改原程序桌面快捷键路径会出错，找我解决） 10. 关闭Smartscreen应用筛选器 11. 关闭X$、admin$、IPC$共享 12. 删除Windows部分自带应用
Windows10常用功能一键设置优化工具分享
wfrgfs的博客
06-20 1838
大家都知道，win10安装后，有非常多臃肿且用不上的功能，但是不用担心，可以直接通过工具一键关闭。工具仅200k大小，麻雀虽小五脏俱全，支持一键隐藏电脑中的视频、 文档、下载、音乐等图标，显示控制面板、显示网络，一键关闭Windows Defender， 禁止Windows系统自动更新功能。更新日志:wwegs.lanzouy.com/iXybJ06oysbe...
win10关闭windows聚焦_Win10 优化合集 | 这9个简易小操作让你的Windows更流畅
weixin_42113380的博客
12-27 257
Win10 优化合集 | 这9个简易小操作让你的Windows更流畅 7SIZE丨插图文章部分来自于网络侵权删Win10 优化合集Windows目前的主流系统是Win7和Win10，自从微软发布将在2020年1月停止对Win7的支持后，Win10的市场份额开始逐渐提升，对于个人用户而言可能出于尝鲜也已早早加入了Win10家族。Win10其实相比Win7来说，在系统优化方面已经比较到位了，但还远远不...
win10优化开机进程
敲代码的机车男孩
06-26 5439
一种比杀毒软件都优化还给力的方法，还在为开机几百个程序启动发愁嘛。一般电脑在重装系统之后的开机进程在50左右，而随着安装程序的增多开机进程将越来越多。下面介绍怎么优化win10进程的方法之后重启电脑，打开任务栏就会看见进程变少了。...
win10 cpu占用率过高的解决办法
热门推荐
xhoo 的博客
11-07 1万+
来自：https://zhidao.baidu.com/question/370308132399151324.html?qbl=relate_question_0&word=win10%20cpu%D5%BC%D3%C3%C2%CA%B8%DF 亲测有用。 win10优化解决100% 01关闭家庭组 控制面板–管理工具–服务– HomeGroup Listener和Home
python+autoit操作windows浏览器窗口
05-13
要使用 Python 和 AutoIt 操作 Windows 浏览器窗口，可以通过以下步骤实现： 1. 安装 Python 和 AutoIt。 2. 安装 Python 的 pywin32 扩展。 3. 编写 Python 脚本，使用 pywin32 扩展和 win32com.client 模块调用 AutoIt。 例如，以下代码使用 Python 和 AutoIt 打开 Chrome 浏览器，输入网址并点击搜索按钮： ```python import win32com.client # 创建 AutoIt 对象 autoit = win32com.client.Dispatch("AutoItX3") # 打开 Chrome 浏览器 autoit.run("chrome.exe") # 等待浏览器加载 autoit.win_wait_active("[CLASS:Chrome_WidgetWin_1]") # 输入网址并点击搜索按钮 autoit.control_send("[CLASS:Chrome_WidgetWin_1]", "", "Edit1", "https://www.google.com") autoit.control_send("[CLASS:Chrome_WidgetWin_1]", "", "Edit1", "{ENTER}") ``` 注意，以上代码中的窗口类名 `[CLASS:Chrome_WidgetWin_1]` 和控件名 `Edit1` 可能因不同的浏览器版本而有所不同。可以使用 AutoIt 的 Window Info 工具获取窗口类名和控件名。 另外，AutoIt 还提供了诸如模拟鼠标和键盘输入、窗口操作等功能，可根据需要使用。

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值