VBScript Permission Access Denied

[general_iroh]

Hey All
I'm newbie in VBScript
I have error in the following Code :

Set us = CreateObject("Microsoft.Update.Session")
Set updates = CreateObject("Microsoft.Update.UpdateColl","IP")

updateTitle = "Security Updates for Windows 2000 (KB914388)"


Set download = us.CreateUpdateDownloader()
Set usearch = us.CreateupdateSearcher()
Set usresult = usearch.Search("IsInstalled=0 Or IsInstalled=1 and Type='Software'")

For a = 0 to usresult.Updates.Count - 1
Set patch = usresult.Updates.Item(a)
if UCase(updateTitle) = UCase(patch.Title) Then
updates.Add(patch)
End If
Next

download.Updates = updates
download.Download()


I want to update remote computer using WUA,
and i perform that task using VBScript

I have tried this solution that i get from internet :
Configure DCOM properties
Configure scrrun.dll
etc

But All failed
please help me

[ALL]

that is because IE will not allow you to have access to that type of information due to security risks.

You *might* beable to turn security all the way to it's lowest possable state, but chances are it still wont work.

You should just write an Active X controll to do what you want, i believe there is still a free version of VB5 that will allow you to write Active X controlls,

-ALL