Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Windows Server 2003 Ordnerberechtigung

Frage Microsoft Windows Server

Mitglied: hibbert

hibbert (Level 1) - Jetzt verbinden

23.09.2005, aktualisiert 19:32 Uhr, 3767 Aufrufe, 1 Kommentar

Konsolenbefehle

Hi,
ich habe gerade einen Windows Server 2003 eingereichtet. Nun soll ich knapp 200 User einrichten. Die Uswer kann ich schon über ie Konsole anlegen, dafür habe ich schon ein kleines Programm geschrieben.

Nun möchte ich gerne über die Konsole vom Server Ordner in einem Bestimmten Verzeichnis anlegen.

Nachdem(!) die Ordner angelegt wurden, sollen die Ordner im Netzwerk freigegeben werden und folgende Rechte sollen enthalten sein:

? Der User "Jeder" User" soll keine Rechte haben
? Der User "Administrator" soll Vollzugrigff haben
? Der User "XYZ" soll Vollzugriff haben

Kann ich das über die Windows Konsole machen, wenn ja, wie ?

thx hibbert
Mitglied: gemini
23.09.2005 um 19:32 Uhr
' Ein überarbeitetes Beispiel aus dem Scriptcenter
' Erzeugt den Ordner C:\Finance und gibt ihn als 'FinanceShare' frei,
' gibt eine Beschreibung 'Public share for the Finance group.' an
' und begrenzt die Verbindungen auf 25
Const FILE_SHARE = 0
Const MAXIMUM_CONNECTIONS = 25
Const strAclF = "F"
Const strAdmin = "Administrator"
Const strJeder = "Jeder"
strDir = "C:\Finance"
strComputer = "<<a>computername<a>>"
strUserName = "XYZ"

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objItem = objFSO.CreateFolder(strDir)
Set objNewShare = objWMIService.Get("Win32_Share")
Set WshShell = Wscript.CreateObject("Wscript.Shell")

errReturn = objNewShare.Create("C:\Finance", "FinanceShare", FILE_SHARE, MAXIMUM_CONNECTIONS, "Public share for the Finance group.")

'~~~~~~~~~~~~~~~~~~~~~
' Für die Rechte
' Hilfe zu den cacls Parametern: cmd > cacls /?
If Right(strDir, 1) = "\" Then strDir = Left(strDir, Len(strDir) -1)
WshShell.Run("cacls " & strDir & " /T /E /P " & strAdmin & ":" & strAclF)
WshShell.Run("cacls " & strDir & " /T /E /P " & strUserName & ":" & strAclF)
WshShell.Run("cacls " & strDir & " /T /E /R " & strJeder)
If Not Right(strDir, 1) = "\" Then strDir = strDir & "\"


Das ganze musst du halt noch in eine Schleife einbauen.
Ist nicht schön ausprogrammiert, funktioniert aber.
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Windows Netzwerk
Windows Server 2003 SBS Netzwerk durch neuen Server Ersetzen (13)

Frage von MultiStorm zum Thema Windows Netzwerk ...

Exchange Server
gelöst Microsoft Excange Server 2007 auf Windows Server 2003 Installieren? (9)

Frage von Herbrich19 zum Thema Exchange Server ...

Windows Server
gelöst Suche Windows Server 2003 Enterprise ISO (8)

Frage von Herbrich19 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Hardware
Laptop ins Salzwasser gefallen (18)

Frage von Marcel94 zum Thema Hardware ...

Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (13)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

Hardware
Lenovo Yoga 500 über angeschlossene USB Tastatur booten (13)

Frage von thomasreischer zum Thema Hardware ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...