Function GetAUOptionStrings() As String
Select Case Val(sdaGetRegEntry("HKEY_LOCAL_MACHINE", "SOFTWARE/Microsoft/Windows/CurrentVersion/WindowsUpdate/Auto Update", "AUOptions"))
Case 1:
'自动更新未开启
Case 2:
GetAUOptionStrings = "通知下载"
Case 3
GetAUOptionStrings = "通知安装"
Case 4:
GetAUOptionStrings = "自动下载并安装"
Case Else
GetAUOptionStrings = "开启"
End Select
End Function如何判断Windows自动更新是否开启
本文介绍了一段VBScript代码,用于获取Windows系统中自动更新功能的当前配置状态。通过读取注册表项,该脚本可以返回自动更新是被设置为完全自动、通知下载、通知安装还是已关闭。

被折叠的 条评论
为什么被折叠?



