Jump to content

Hide Bing Desktop and other Windows Updates


Recommended Posts

Is the file saved as a simple text file with a .VBS extension? From the error messwage it thinks there is something wrong with the first cahacter on the first line of the file. You might want to upload an exact copy of your file somewhere and provide a link to it here so that someone can download your file and make sure there is nothing wrong with the format of the file.

Cheers and Regards

Link to comment
Share on other sites


Only edit this with notepad if you don't have a vbs editor

Updated 1st Post with my latest

' 05/02/2014 By adding KB and Bing Bar it gets them all and so far has not come back

Wish Bing Desktop would do same.

Link to comment
Share on other sites

  • 2 months later...
  • 1 year later...

I've run into something interesting, I've been trying to get this script working for the past 30 minutes, every time it runs, it shows that it didn't hide any updates.  I believe it's because I use ConfigMgr to push updates to computers.  However, the option for users to "Check online for updates from Microsoft Update" is available, if they click on that, it will show updates I would like to hide Skype & Language Packs.
The same script does work on computers that I'm not managing with ConfigMgr.  Is there a way to make this script hide those updates from users who click on "Check online for updates from Microsoft Update" when in a ConfigMgr enviroment?
 

http://www.files.com/set/559e7bad43cfb

Document with Images to help Explain Issue.  I was pasting the images in the body of this, but found out when I clicked "Post" that I was unable to use that feature.

Link to comment
Share on other sites

I was pasting the images in the body of this, but found out when I clicked "Post" that I was unable to use that feature.

 

The most reliable way to post images on this and almost any forum is to upload your images to the free image hosting service of your choice, such as TinyPic. To place the image where you want while you are editing or creating your post, position the cursor where you want the image to appear, click the "Image" button in the menu of the edit box, and insert the link to your image.  Your image should appear instantly.  This works on all forums that I am aware of.

 

Cheers and Regards

Link to comment
Share on other sites

The same script does work on computers that I'm not managing with ConfigMgr.  Is there a way to make this script hide those updates from users who click on "Check online for updates from Microsoft Update" when in a ConfigMgr enviroment?

 

I've had no dealing with ConfigMgr so it would be up to someone that uses that to invent a workaround.

Link to comment
Share on other sites

  • 1 month later...
  • 3 weeks later...
  • 3 months later...

I got something similar to that and running it as admin fixed it.

 

That said, on Windows 8.1 it seems to be broken, because it hid all my updates instead of the list I gave it.

Link to comment
Share on other sites

  • 3 weeks later...

Buenos, need help. The script works only with Internet, as correct to work without Internet ?? (from Win 7)

------------------------------------------------

Dim hideupdates(18)

hideupdates(0) = "KB971033"
hideupdates(1) = "KB2882822"
hideupdates(2) = "KB2952664"
hideupdates(3) = "KB2977759"
hideupdates(4) = "KB2990214"
hideupdates(5) = "KB3021917"
hideupdates(6) = "KB3022345"
hideupdates(7) = "KB3035583"
hideupdates(8) = "KB3050265"
hideupdates(9) = "KB3065987"
hideupdates(10) = "KB3068708"
hideupdates(11) = "KB3075249"
hideupdates(12) = "KB3075851"
hideupdates(13) = "KB3080149"
hideupdates(14) = "KB3081954"
hideupdates(15) = "KB3083324"
hideupdates(16) = "KB3083710"
hideupdates(17) = "KB3088195"
hideupdates(18) = "KB3102810"

Set WSHShell = CreateObject("WScript.Shell")
Set updateSession = CreateObject("Microsoft.Update.Session")
updateSession.ClientApplicationID = "MSDN Sample Script"
Set updateSearcher = updateSession.CreateUpdateSearcher()
Set searchResult = updateSearcher.Search("IsInstalled=0 and Type='Software' and IsHidden=0")

Checkagain = "True"

For K = 0 To 18
If Checkagain = "True" Then
Checkagain = "False"
CheckUpdates
ParseUpdates
End if
Next

Set objWshShell = nothing
Set WSHShell = Nothing
WScript.Quit

Function ParseUpdates
For I = 0 To searchResult.Updates.Count-1
Set update = searchResult.Updates.Item(I)
strUpdateName = update.Title

For j = 0 To UBound(hideupdates)
if instr(1, strUpdateName, hideupdates(j), vbTextCompare) = 0 then
Else
strAllHidden = strAllHidden _
& vbcrlf & update.Title
update.IsHidden = True'
Checkagain = "True"
end if
Next
Next
End Function

Function CheckUpdates
Set updateSession = CreateObject("Microsoft.Update.Session")
Set updateSearcher = updateSession.CreateUpdateSearcher()
Set searchResult = _
updateSearcher.Search("IsInstalled=0 and Type='Software' and IsHidden=0")
End Function

Edited by Prodif
Link to comment
Share on other sites

Buenos, need help. The script works only with Internet, as correct to work without Internet ?? (from Win 7)

------------------------------------------------

Dim hideupdates(18)

 

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

That's contacting the Update server on the internet. Where else could you search against?

I haven't tried or looked into it. I'm fighting 10 now so really can't say

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...