Windows10のwindows updateで「ダウンロードしてインストール」などのボタンをuwscで強制的にクリックしてやる

windows10windows update「ダウンロードしてインストール」などのボタンが表示されていてインストールが保留されてしまっている場合が結構ある

最新のupdateは速やかに適用するポリシーの場合、各パソコンで操作する必要があるため、ちょっとめんどくさい

そこで、UWSCを使って自動的にボタンをクリックするスクリプトを書いたのでメモしておきます

※Windows10以外のWindows7,8にも対応できるようにしてます

◆VBScriptでuwmcを起動する

【win_update.vbs】

Dim objWshShell     ' WshShell オブジェクト
Set objWshShell = WScript.CreateObject("WScript.Shell")

objWshShell.Run("""C:\●●\UWSC.exe"" ""\\landisk\●●\win_update.uws""")
WScript.Quit

◆uwscでWindows update画面のボタンを押す

【win_update.uws】

//Windows update画面を表示させる
EXEC("\\landisk\●●\win_update.bat")
sleep(2)

for i = 1 to 2
    
    ID = GETID("設定")
    if ID <> -1 then
                
        clkitem(ID,"今すぐダウンロードしてインストールする",CLK_link)
        clkitem(ID,"ダウンロードしてインストール",CLK_link)
        clkitem(ID,"ダウンロード",CLK_BTN)
        clkitem(ID,"更新プログラムのチェック",CLK_BTN)
	clkitem(ID,"今すぐインストール",CLK_BTN)
	IF CHKBTN(ID,"今すぐ再起動する") <> -1 then EXITEXIT
        sleep(2)
        ctrlWin(ID,CLOSE)
        
    endif

    ID = GETID("Windows Update")
    if ID <> -1 then

        clkitem(ID,"更新プログラムのインストール",CLK_BTN)
	IF CHKBTN(ID,"今すぐ再起動する") <> -1 then EXITEXIT
        sleep(2)
        ctrlWin(ID,CLOSE)
        
    endif

    sleep(1)

next

◆Windows10,Windows8でWindows update画面を表示させる

【win_update.bat】

@ECHO OFF

ver | find /i "Version 10.0." > nul
if %ERRORLEVEL% equ 0 GOTO :WIN10
goto :OTHER
:WIN10
start ms-settings:windowsupdate
exit
:OTHER
wuapp
exit

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です