+ Post New Thread
Results 1 to 9 of 9
Scripts Thread, Script to share multiple folders in Coding and Web Development; Hey all, I'm in need of a script that I can use to share alot of folders all in one ...
  1. #1
    originofsymmetry's Avatar
    Join Date
    Jun 2007
    Posts
    188
    Thank Post
    9
    Thanked 15 Times in 12 Posts
    Rep Power
    18

    Script to share multiple folders

    Hey all, I'm in need of a script that I can use to share alot of folders all in one directory. I have the following for example:
    net share <sharename>=<path> /CACHE:no /GRANT:domain\user,READ|CHANGE|FULL

    but obviously this requires me to type in each folder name, anyone have a script for automating this? Any help appreciated.

  2. #2


    Join Date
    Feb 2007
    Location
    Northamptonshire
    Posts
    4,706
    Thank Post
    354
    Thanked 807 Times in 722 Posts
    Rep Power
    348
    For each loop?

  3. #3

    SYNACK's Avatar
    Join Date
    Oct 2007
    Posts
    11,271
    Thank Post
    884
    Thanked 2,749 Times in 2,322 Posts
    Blog Entries
    11
    Rep Power
    785
    how good are you with VBS?

    enumerate all subfolders in a folder:
    Scripting Files and Folders using VBScript

    use a for each loop that runs a command for each returned folder name
    How to: Execute a file/program in VBScript - CRM Developer

    Code:
    dim folderpath
    folderpath = "C\folder"
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objFolder = objFSO.GetFolder(folderpath)
    Set colSubfolders = objFolder.Subfolders
    For Each objSubfolder in colSubfolders
        Wscript.Echo objSubfolder.Name
        Run "net share " & objSubfolder.Name & "=" & folderpath & "\" & objSubfolder.Name & " /CACHE:no /GRANT:domain\user,READ|CHANGE|FULL"
    Next
    Sub Run(ByVal sFile)
    Dim shell
    
        Set shell = CreateObject("WScript.Shell")
        shell.Run Chr(34) & sFile & Chr(34), 1, false
        Set shell = Nothing
    End Sub
    
    Haven't tested it but it should be a good start if it does not work straight away.
    Last edited by SYNACK; 20th August 2008 at 05:53 PM.

  4. #4


    Join Date
    Jul 2007
    Location
    Rural heck
    Posts
    2,662
    Thank Post
    120
    Thanked 433 Times in 352 Posts
    Rep Power
    127
    Other way to do this if you're not very confident of your scripting it to use a spread. Use the CONCATENATE function to combine the variables with the rest of the code.

  5. #5

    Ric_'s Avatar
    Join Date
    Jun 2005
    Location
    Boston, MA
    Posts
    7,601
    Thank Post
    110
    Thanked 771 Times in 599 Posts
    Rep Power
    183
    Why don't you just share the root of all these folders? With the correct permissions, people would only be able to get into what they should be able to anyway.

    If mapping drives off these shares, it is possible to map a subdirectory of a share as a drive letter too.

  6. #6
    box_l's Avatar
    Join Date
    May 2007
    Location
    Herefordshire
    Posts
    439
    Thank Post
    80
    Thanked 95 Times in 79 Posts
    Rep Power
    63
    i use this:

    FOR /D %%G IN (*.*) DO NET SHARE "%%G=%CD%\%%G" /GRANT:Everyone,FULL /CACHE:None

    yours might look like this:

    FOR /D %%G IN (*.*) DO net share <sharename>=<path> /CACHE:no /GRANT:domain\user,READ|CHANGE|FULL

    run this bat file from the folder containing folders to be shared.
    or *.* probably will not work

    BoX

  7. 2 Thanks to box_l:

    originofsymmetry (22nd August 2008), simpsonj (16th September 2010)

  8. #7
    originofsymmetry's Avatar
    Join Date
    Jun 2007
    Posts
    188
    Thank Post
    9
    Thanked 15 Times in 12 Posts
    Rep Power
    18
    Thanks for these scripts guys, will try them out when I get home tonight

  9. #8
    originofsymmetry's Avatar
    Join Date
    Jun 2007
    Posts
    188
    Thank Post
    9
    Thanked 15 Times in 12 Posts
    Rep Power
    18
    Quote Originally Posted by box_l View Post
    i use this:

    FOR /D %%G IN (*.*) DO NET SHARE "%%G=%CD%\%%G" /GRANT:Everyone,FULL /CACHE:None

    yours might look like this:

    FOR /D %%G IN (*.*) DO net share <sharename>=<path> /CACHE:no /GRANT:domain\user,READ|CHANGE|FULL

    run this bat file from the folder containing folders to be shared.
    or *.* probably will not work

    BoX
    Thanks for that BoX, worked a treat

  10. #9
    box_l's Avatar
    Join Date
    May 2007
    Location
    Herefordshire
    Posts
    439
    Thank Post
    80
    Thanked 95 Times in 79 Posts
    Rep Power
    63
    no problem.

  11. Thanks to box_l from:

    simpsonj (16th September 2010)



SHARE:
+ Post New Thread

Similar Threads

  1. Replies: 3
    Last Post: 26th October 2012, 03:15 PM
  2. Script to delete certain folders
    By Pumaedition in forum Scripts
    Replies: 4
    Last Post: 22nd April 2008, 11:08 PM
  3. Replies: 15
    Last Post: 19th September 2007, 11:46 PM
  4. VB Script to create folders
    By markesmith in forum Scripts
    Replies: 2
    Last Post: 26th April 2007, 04:03 PM
  5. Replies: 8
    Last Post: 1st February 2007, 09:42 AM

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •