Jump to content

Batch install Windows Updates


Recommended Posts

I think it might work if you change the line like this.

strdesktop = Act.SpecialFolders("Desktop")
Rpt = (strdesktop & "\" & CN & "_KbReport.hta")

This is because Desktop is "Työpöytä" in finnish. I think the name changes on every language.

There was also an error later on, I'll think it was line 82 after my changes. It worked perfectly.

It's nice to see tools like this. This can be very useful, but I think it needs more features. But very níce start.

Edited by geezery
Link to comment
Share on other sites


This line runs the script the use of Chr(34) is to add quotes to take out spaces, now

I have no way of testing this on any other langauge other then english. The other thing

to note is that all the services needed for updates can not be disable as this uses that

object.

Runs The HTA

 Set Arg1 = Fso.GetFile(Rpt) 
Act.Run("mshta.exe " & Chr(34) & Arg1.Path & Chr(34)),1,True

This returns the path to the user desktop, it might be different for other langauges.

Rpt = Act.ExpandEnvironmentStrings("%UserProfile%\desktop\" & CN & "_KbReport.hta")

geezery, I will change the desktop varible I use to what you posted, thanks.

Link to comment
Share on other sites

I think it might work if you change the line like this.

strdesktop = Act.SpecialFolders("Desktop")
Rpt = (strdesktop & "\" & CN & "_KbReport.hta")

This is because Desktop is "Työpöytä" in finnish. I think the name changes on every language.

There was also an error later on, I'll think it was line 82 after my changes. It worked perfectly.

It's nice to see tools like this. This can be very useful, but I think it needs more features. But very níce start.

Kitoksia Paljon

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...