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, 3769 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
Windows 10

Sticky Notes - Autostart unterbinden

Tipp von Pedant zum Thema Windows 10 ...

Ähnliche Inhalte
Windows Server
gelöst Windows Server 2003 DNS Server - Ping auf Subdomain nicht möglich in windows 7 (15)

Frage von aif-get zum Thema Windows Server ...

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? (11)

Frage von Herbrich19 zum Thema Exchange Server ...

Heiß diskutierte Inhalte
Flatrates
DeutschlandLAN der Telekom - welche internen IPs? (19)

Frage von qualidat zum Thema Flatrates ...

Batch & Shell
gelöst Base64 Decode (Batch,VBS) (16)

Frage von clragon zum Thema Batch & Shell ...

LAN, WAN, Wireless
Wie Gäste ins Internet bringen? (15)

Frage von xSiggix zum Thema LAN, WAN, Wireless ...