禁用win10系统更新，写的不完善，希望大佬指点 - 精易论坛

窗口程序集名	保留	保留	备注
窗口程序集_启动窗口

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

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

' 禁用更新后台系统服务
修改系统服务.停止服务 (“wuauserv”)
修改系统服务.置启动类型 (“wuauserv”, 4) ' 有一个点击恢复的设置不会写
' 修改注册表法，
修改注册表.写DWORD值 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\UsoSvc”, “Start”, 4)
' 这个应该是修改二进制字符集，不会，直接删除吧。
修改注册表.删除键名 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\UsoSvc”, “FailureActions”)
' 禁用任务计划程序
运行 (“schtasks /change /tn ” ＋ #引号＋ “\Microsoft\Windows\WindowsUpdate\Scheduled Start” ＋ #引号＋ “ /disable”, 假, )
' 下面这个是修改注册表里面的更新
修改注册表.写DWORD值 (“HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU”, “NoAutoUpdate”, 0)
' 本地策略禁用不会写，先分享这些吧

子程序名	返回值类型	公开	备注
禁用Windows自动更新	逻辑型

变量名	类型	静态	数组	备注
temp	逻辑型
temp1	逻辑型
temp2	逻辑型
temp3	逻辑型
temp4	逻辑型
注册表	注册表操作

' https://support.microsoft.com/zh-cn/topic/%E5%8D%B3%E4%BD%BF-au-%E9%80%89%E9%A1%B9%E8%A2%AB%E7%A6%81%E7%94%A8-windows-8-1-%E5%92%8C-windows-server-2012-r2-%E4%B8%AD%E6%8E%A5%E6%94%B6%E5%88%B0%E4%B8%8D%E6%AD%A3%E7%A1%AE%E7%9A%84%E8%87%AA%E5%8A%A8%E6%9B%B4%E6%96%B0%E9%80%9A%E7%9F%A5-18b4b73a-3910-9408-809c-7eaad0e1fbc7
temp ＝写注册项 ( #本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoUpdate”, 1)
temp1 ＝写注册项 ( #本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\AUOptions”, 1)

判断 (注册项是否存在 ( #本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv”))

temp2 ＝写注册项 ( #本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv\Start”, 4) ' 设置 Windows Update 更新服务为禁用

temp3 ＝运行 (“net stop wuauserv”, 假, #隐藏窗口 )

temp4 ＝注册表.项重命名 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\wuauserv”, “wuauservbak”) ' 将Windows Update服务的注册表更名，使该服务不可用

判断 (注册项是否存在 ( #本地机器, “SYSTEM\CurrentControlSet\Services\wuauservbak”))

返回 (真)

返回 (位与 (1, 到整数 (temp), 到整数 (temp1), 到整数 (temp2), 到整数 (temp3), 到整数 (temp4)) ＝ 1)

子程序名	返回值类型	公开	备注
启用Windows自动更新	逻辑型

变量名	类型	静态	数组	备注
temp	逻辑型
temp1	逻辑型
temp2	逻辑型
temp3	逻辑型
temp4	逻辑型
注册表	注册表操作

' https://support.microsoft.com/zh-cn/topic/%E5%8D%B3%E4%BD%BF-au-%E9%80%89%E9%A1%B9%E8%A2%AB%E7%A6%81%E7%94%A8-windows-8-1-%E5%92%8C-windows-server-2012-r2-%E4%B8%AD%E6%8E%A5%E6%94%B6%E5%88%B0%E4%B8%8D%E6%AD%A3%E7%A1%AE%E7%9A%84%E8%87%AA%E5%8A%A8%E6%9B%B4%E6%96%B0%E9%80%9A%E7%9F%A5-18b4b73a-3910-9408-809c-7eaad0e1fbc7
temp ＝删除注册项 ( #本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoUpdate”)
temp1 ＝删除注册项 ( #本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\AUOptions”)

判断 (注册项是否存在 ( #本地机器, “SYSTEM\CurrentControlSet\Services\wuauservbak”))

temp2 ＝注册表.项重命名 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\wuauservbak”, “wuauserv”) ' 恢复Windows Update服务的注册表名

temp3 ＝写注册项 ( #本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv\Start”, 3) ' 设置 Windows Update 更新服务为启用

temp4 ＝运行 (“net start wuauserv”, 假, #隐藏窗口 )

返回 (假)

返回 (位与 (1, 到整数 (temp), 到整数 (temp1), 到整数 (temp2), 到整数 (temp3), 到整数 (temp4)) ＝ 1)

.版本 2<br />
<br />
.子程序 禁用Windows自动更新, 逻辑型<br />
.局部变量 temp, 逻辑型<br />
.局部变量 temp1, 逻辑型<br />
.局部变量 temp2, 逻辑型<br />
.局部变量 temp3, 逻辑型<br />
.局部变量 temp4, 逻辑型<br />
.局部变量 注册表, 注册表操作<br />
<br />
' https://support.microsoft.com/zh-cn/topic/%E5%8D%B3%E4%BD%BF-au-%E9%80%89%E9%A1%B9%E8%A2%AB%E7%A6%81%E7%94%A8-windows-8-1-%E5%92%8C-windows-server-2012-r2-%E4%B8%AD%E6%8E%A5%E6%94%B6%E5%88%B0%E4%B8%8D%E6%AD%A3%E7%A1%AE%E7%9A%84%E8%87%AA%E5%8A%A8%E6%9B%B4%E6%96%B0%E9%80%9A%E7%9F%A5-18b4b73a-3910-9408-809c-7eaad0e1fbc7<br />
temp ＝ 写注册项 (#本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoUpdate”, 1)<br />
temp1 ＝ 写注册项 (#本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\AUOptions”, 1)<br />
.判断开始 (注册项是否存在 (#本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv”))<br />
    temp2 ＝ 写注册项 (#本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv\Start”, 4)  ' 设置 Windows Update 更新服务为禁用<br />
    temp3 ＝ 运行 (“net stop wuauserv”, 假, #隐藏窗口)<br />
    temp4 ＝ 注册表.项重命名 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\wuauserv”, “wuauservbak”)  ' 将Windows Update服务的注册表更名，使该服务不可用<br />
.判断 (注册项是否存在 (#本地机器, “SYSTEM\CurrentControlSet\Services\wuauservbak”))<br />
    返回 (真)<br />
.默认<br />
<br />
.判断结束<br />
<br />
返回 (位与 (1, 到整数 (temp), 到整数 (temp1), 到整数 (temp2), 到整数 (temp3), 到整数 (temp4)) ＝ 1)<br />
<br />
<br />
.子程序 启用Windows自动更新, 逻辑型<br />
.局部变量 temp, 逻辑型<br />
.局部变量 temp1, 逻辑型<br />
.局部变量 temp2, 逻辑型<br />
.局部变量 temp3, 逻辑型<br />
.局部变量 temp4, 逻辑型<br />
.局部变量 注册表, 注册表操作<br />
<br />
' https://support.microsoft.com/zh-cn/topic/%E5%8D%B3%E4%BD%BF-au-%E9%80%89%E9%A1%B9%E8%A2%AB%E7%A6%81%E7%94%A8-windows-8-1-%E5%92%8C-windows-server-2012-r2-%E4%B8%AD%E6%8E%A5%E6%94%B6%E5%88%B0%E4%B8%8D%E6%AD%A3%E7%A1%AE%E7%9A%84%E8%87%AA%E5%8A%A8%E6%9B%B4%E6%96%B0%E9%80%9A%E7%9F%A5-18b4b73a-3910-9408-809c-7eaad0e1fbc7<br />
temp ＝ 删除注册项 (#本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\NoAutoUpdate”)<br />
temp1 ＝ 删除注册项 (#本地机器, “SOFTWARE\Policies\Microsoft\Windows\WindowsUpdate\AU\AUOptions”)<br />
.判断开始 (注册项是否存在 (#本地机器, “SYSTEM\CurrentControlSet\Services\wuauservbak”))<br />
    temp2 ＝ 注册表.项重命名 (“HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\wuauservbak”, “wuauserv”)  ' 恢复Windows Update服务的注册表名<br />
    temp3 ＝ 写注册项 (#本地机器, “SYSTEM\CurrentControlSet\Services\wuauserv\Start”, 3)  ' 设置 Windows Update 更新服务为启用<br />
    temp4 ＝ 运行 (“net start wuauserv”, 假, #隐藏窗口)<br />
<br />
.默认<br />
    返回 (假)<br />
.判断结束<br />
<br />
返回 (位与 (1, 到整数 (temp), 到整数 (temp1), 到整数 (temp2), 到整数 (temp3), 到整数 (temp4)) ＝ 1)