scripting specific folder permissions

Giganews Newsgroups
Subject: scripting specific folder permissions
Posted by:  holleā€¦ (holler1nanaco…
Date: Wed, 9 Aug 2006

I have script that builds folder:
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.CreateFolder("C:\documents and

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"

I will be very thankfull if anyone can help me