VBS changing homepage on all comps in local network

[cbh1]

Hi all
I need your help masters:
The task is - to set the intranet-site of the company on all computers in the local network (more than 350)
The local user shouldn't have possibility to change it.
I am planning to realize it by VBscript.

What we have:
No domen
No antivirus
All comps using only IE browser
Because there is no domen every computer uses different logins and passwords (all logins are with administrator rights)

So I have wrote a small VBScript which changes two registry keys sets the intranet site as a homepage and blocks the field where the user change it.

What I need now:
is to write another script or update the current to work through the network and run automaticaly.
I just need to run it on any computer in local network and it should run automaticaly on anothers comps something like Warm/Virus but for peaceful purposes)))
so in my vision it should be something like that

http://www.ca.com/us/securityadviso...

but may be it is another solution?

 

[acl03]

Is there a reason why you don't run a domain? It would simplify this process greatly.

Thanks,
Andrew

Hard work often pays off over time, but procrastination pays off right now!

 

[cbh1]

I know...WMI
but believe me it is not depend from me...domen is impossible solution at now,and I just want to take my money, so i know that it can be processed by script or something like little virus
I have made first part of it but i don't want how to extend the script on the local network and run it automaticaly on every machine

 

[mrmovie]

do you have rights on all of the machines?, i.e. do you have a master account? if not, then i fail to see how this can be achieved without the co-operation of all of your users. if you have no rights to access their machines (remotely via WMI or psexec or any other means) then you will need to get them to go somewhere and run 'something'. e.g, setup a share or an intranet page, instruct them to go to that area and click on a link to run your configuration script. unfortunately you may have to tempt them with the promise of something in return...

 

[cbh1]

I have found another solution, to scan the local network via Netowrk Connection and if the script will find the shared folders and copy to every of them two files
So there is the first part of the script which the acanning the network and shared folders but i have no idea how to make a second part, if the shared folder was found copy files to it.

Set objNetwork = CreateObject("Shell.Application").NameSpace(&H12) ' ????????? ??????? "??????? ?????????"
Set objEntireNetwork = objNetwork.Items().Item("EntireNetwork").GetFolder ' ????????? ??????? "??? ????"
For Each objNetItem In objEntireNetwork.Items()
If objNetItem.Name = "Microsoft Windows Network" Then
Set objMSWinNetwork = objNetItem.GetFolder ' ????????? ??????? "Microsoft Windows Network"
Exit For
End If
Next

For Each objMSNetItem In objMSWinNetwork.Items()
WScript.Echo objMSNetItem.Name & ":"
Set objDomain = objMSNetItem.GetFolder ' ????????? ??????? WORKGROUP ??? DOMAIN
For Each objDomainItem In objDomain.Items()
WScript.Echo vbTab & "\\" & objDomainItem.Name
Set objComputer = objDomainItem.GetFolder ' ????????? ??????? Computer
For Each objCompItem In objComputer.Items()
If objCompItem.IsFileSystem Then
WScript.Echo vbTab & vbTab & objCompItem.Name
End If
Next
Next
Next

 

[pellet]

I just want to take my money, so i know that it can be processed by script or something like little virus

Hmmm... you have me wondering what exactly you are trying to accomplish.

 

[cbh1]

ouu)) don't be affraid my friend)) the purpose is not virus
as you can see
1. it's need time to run and search all comps and shares in the network so it can take much time
2. if there will be any antivirus, the script will easily blocked by him
3. the user have to run the files manually
4. the script is working only for IE so all comps should have IE as default browser...hmmm where i got this information?because it's my network))


Why i need solution like this:
1. I have developed the intranet portal for this company so the customer wants every user when he comes at morning first have to see the intranet portal.
2. by this script customer wants to deliver to users some corporate docs and policies which are related to them


P.S I am from a poor country sharepoint and others 100% automated portal solutions just are in the dreams))