질문과 답변

윈 도 우 특정 업데이트 삭제 및 숨기기 스크립트

2016.05.19 23:48

컨피그 조회:862

============== 시작 ==============


RequireAdmin


Remove3146706


Dim WSHShell, StartTime, ElapsedTime, strUpdateName, strAllHidden


Dim hideupdates

hideupdates = "KB3146706"



Set updateSession = CreateObject("Microsoft.Update.Session")

updateSession.ClientApplicationID = "MSDN Sample Script"

Set updateSearcher = updateSession.CreateUpdateSearcher()

Set searchResult = updateSearcher.Search("IsInstalled=0 and Type='Software'")


For I = 0 To searchResult.Updates.Count-1

Set update = searchResult.Updates.Item(I)

strUpdateName = update.Title


if instr(1, strUpdateName, hideupdates, vbTextCompare) <> 0 then

update.IsHidden = True

end if


Next




Function RequireAdmin()

Dim reg_valuename, WShell, Cmd, CmdLine, I


GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\default:StdRegProv")_

.EnumValues &H80000003, "S-1-5-19\Environment",  reg_valuename

If IsArray(reg_valuename) <> 0 Then

RequireAdmin = 1

Exit Function

End If


Set Cmd = WScript.Arguments

For I = 0 to Cmd.Count - 1

If Cmd(I) = "/admin" Then

Wscript.Echo "To script you must have administrator rights!"

'RequireAdmin = 0

'Exit Function

WScript.Quit

End If

CmdLine = CmdLine & Chr(32) & Chr(34) & Cmd(I) & Chr(34)

Next

CmdLine = CmdLine & Chr(32) & Chr(34) & "/admin" & Chr(34)


Set WShell= WScript.CreateObject( "WScript.Shell")

CreateObject("Shell.Application").ShellExecute WShell.ExpandEnvironmentStrings(_

"%SystemRoot%\System32\WScript.exe"),Chr(34) & WScript.ScriptFullName & Chr(34) & CmdLine, "", "runas"

WScript.Quit

End Function




Function Remove3146706()

Dim reg_valuename, WShell, Cmd, CmdLine, I


Dim objShell, SDCommand


Set objShell = CreateObject("Wscript.Shell")


SDCommand = objShell.Run("wusa.exe /kb:3146706 /uninstall /quiet /norestart")

End Function


============== 끝 ==============


인터넷에서 얻은 소스 인데요


스크립트를 실행하면

관리자권한을 얻은 후

KB3146706 업데이트를 삭제 및 숨김 처리를 자동으로 한방에 해줍니다


이것을

KB3146706, KB3147071 두개의 업데이트 삭제 스크립트로 수정해주실분 계실까요?


그리고 삭제 부분에서

wusa.exe /kb:3146706 /uninstall /quiet /norestart

이 부분을

dism /Remove-Package /PackageName:Package_for_KB3146706~31bf3856ad364e35~x86~~6.1.1.2 /quiet /norestart

이런식으로 바꿔서도 가능한가요?


32비트 64비트 상관없이 한방에 됐으면 싶네요..


번호 제목 글쓴이 조회 등록일
[공지] 질문과 답변 게시판 이용간 유의사항 gooddew - -
63993 서버 / IT| 스위치 만으로 인터넷 가능 할까요??? [7] 대빵락커 1085 06-07
63992 윈 도 우| Microsoft Windows and Office ISO Download Tool [4] EAGLE 2192 06-07
63991 윈 도 우| 제가 처음으로 윈도7 WIM파일을 ESD로 바꿔봤는데요... [3] 동그란네모 941 06-07
63990 윈 도 우| 다른 컴에도 사용하기 [6] 나르다 1318 06-07
63989 기 타| kt 인터넷 속도 문제 [5] 툴캅 1470 06-06
63988 소프트웨어| 간단한 동영상 편집 프로그램 추천 부탁드립니다. [4] 윤아짱 1035 06-06
63987 하드웨어| 키보드 누르면 전원이 켜지는 현상 [3] 켄치 2135 06-06
63986 윈 도 우| 윈도우 10의 마우스 오른쪽 메뉴 일부를 삭제하고 싶습니다 연향 722 06-06
63985 윈 도 우| 추가로 SSD를 달았는데 예상치 못한 에러가 발생합니다. [7] 결비 1416 06-06
63984 윈 도 우| 윈10 종료속도 [3] 이탈 1342 06-06
63983 윈 도 우| BCD 제거/생성 CMD??? 바람낙엽 766 06-06
63982 하드웨어| 이 노트북 내장용 dvd를 다른 노트북에 연결하려면, [3] 질문00 769 06-06
63981 소프트웨어| 디지털사이니지(전자간판) 소프트를 원해요... 최악군 622 06-06
63980 윈 도 우| 윈도 7 install 에 usb3.0 통합실패--도움요청 [2] 누구.. 824 06-06
63979 소프트웨어| norton internet security [1] 무명거사 725 06-06
63978 윈 도 우| 윈도우10 가로 스크롤바 조정하는 옵션 없나요? [1] 야인 1256 06-06
63977 기 타| 혹시 VBS 관련 vbsedit 7.1.1.0 쓰시는 분 있으신지요.. [1] 왕초보 755 06-05
63976 윈 도 우| Win10 드라이버 디지털 서명 해제 문제인데요.... [6] 무주처사 2319 06-05
63975 윈 도 우| 크롬에서 렉 현상 [3] 흑마왕 1070 06-05
63974 소프트웨어| ABBYY FineReader Professional 12.0 쓰는데 어는날 갑자기... [7] 짜가41 996 06-05
XE1.11.6 Layout1.4.8