scripting specific folder permissions

Giganews Newsgroups
Subject: scripting specific folder permissions
Posted by:  holleā€¦@nana.co.il (holler1nanaco…@discussions.microsoft.com)
Date: Wed, 9 Aug 2006

Hello,
I have script that builds folder:
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("C:\documents and
settings\administrator\desktop\Boris")

what I want to do is to add specific permissions to this folder or any other
folder that will be built.

Another thing that I need is to do the same to the printer creation script
that I have:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set objPrinter = objWMIService.Get("Win32_Printer").SpawnInstance_

objPrinter.DriverName = "HP LaserJet 4000 Series PS"
objPrinter.PortName = "IP_20.20.22.100"
objPrinter.DeviceID = "ScriptedPrinter"
objPrinter.Location = "USA/Redmond/Building 37/Room 114"
objPrinter.Network = True
objPrinter.Shared = True
objPrinter.ShareName = "ScriptedPrinter"
objPrinter.Put_

I will be very thankfull if anyone can help me

Replies