Top-Themen

Aktuelle Themen (A bis Z)

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
GELÖST

Rechte für Freigabe per VBScript übergeben funktioniert nicht korrekt

Frage Entwicklung VB for Applications

Mitglied: Rockotron

Rockotron (Level 1) - Jetzt verbinden

22.04.2009, aktualisiert 16:10 Uhr, 6494 Aufrufe, 1 Kommentar

Ich brauche Hilfe in Sachen Freigabeberechtigungen, die via VBS an einen Nutzer übergeben werden sollen.

Ich habe ein Script in VBS geschrieben, das ich zur Anlage von Domänennutzern verwende. Dieses legt den neben den ADS-Nutzerinformationen auf einem Server einen Ordner je Nutzer an, gibt diesen frei und ordnet den Freigabeberechtigungen einen Nutzer (Bsp: gast) zu. Nun möchte ich Freigabe- sowie NTFS-Berechtigungen für diesen Nutzer setzen, wobei die Freigaberechte immer gleich "Ändern" sind. Ich nutze für die Freigaberechte folgenden Quelltext:

ACCESS_ALLOWED_ACE_TYPE = &H0
FILE_SHARE_CHANGE_ACCESS = &H010116
SE_DACL_PRESENT = &H4

strComputer = "."
strShareName = "FreigabeName"
strUserName = "gast"
strDomainName = "DOM"

Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set objSecuritySettings = objWMIService.Get("Win32_LogicalShareSecuritySetting='" & strShareName & "'")

Set objTrustee = objWMIService.Get("Win32_Trustee").SpawnInstance_()

Set colAccounts = objWMIService.ExecQuery("SELECT * FROM Win32_Account WHERE Name = '" & strUserName & "'")

For Each objAccount In colAccounts
objTrustee.SIDString = objAccount.SID
Next

Set objSID = objWMIService.Get("Win32_SID.SID='" & objTrustee.SIDString & "'")

objTrustee.SID = objSID.BinaryRepresentation
objTrustee.SIDLength = objSID.SIDLength
objTrustee.Domain = strDomainName
objTrustee.Name = strUserName


Set objACE = objWMIService.Get("Win32_ACE").SpawnInstance_()
objACE.Trustee = objTrustee
objACE.AceType = ACCESS_ALLOWED_ACE_TYPE
objACE.AccessMask = FILE_SHARE_CHANGE_ACCESS
objACE.AceFlags = 0

Set objSD = objWMIService.Get("Win32_SecurityDescriptor").SpawnInstance_()
objSD.Owner = objTrustee
objSD.DACL = Array(objACE)
objSD.ControlFlags = SE_DACL_PRESENT

objSecuritySettings.SetSecurityDescriptor(objSD)

Das Problem ist nun, dass die Zuordnung von Leserechten und von Vollzugriff reibunglos funktioniert. Das Festlegen von Änderungsrechten hingegen funktioniert nicht. Hat jemand eine Idee, woran dies liegen könnte? Danke im Voraus!!
Mitglied: Rockotron
06.11.2009 um 14:10 Uhr
Habe das Problem selbst gelöst! Also falls es Interesse an dieser Thematik gibt, kann ich helfen.
Bitte warten ..
Ähnliche Inhalte
Samba
Nicht passende Rechte auf Samba-Freigab
Frage von diwaffmSamba9 Kommentare

Hi Leute, ich habe hier einen openSUSE Server auf dem ein Samba läuft. Auf die Freigaben dieses Samba greifen ...

Router & Routing
PFsense nach Update funktioniert CP nicht korrekt
gelöst Frage von killtecRouter & Routing3 Kommentare

Hallo, ich habe meine PFSense von 2.2 auf 2.3 upgegraded. Seit dem funktioniert mein Captive Portal leider nicht korrekt. ...

Windows Server
DFS - Freigaben konsolidieren funktioniert nicht
gelöst Frage von SchnuggieWindows Server4 Kommentare

Hallo, ich versuche mehre Freigaben zu bündeln. Als Lösung für diese Anforderung bin ich auf DFS aufmerksam geworden. Ausgangssituation: ...

Windows Server
Sharepoint 2013 Freigabe funktioniert nicht
Frage von technikdealerWindows Server

Hay Ihr. Ich habe ein Sharepoint 2013 Server auf dem auch SQL Server Express 2014 läuft im AD. Einrichtung ...

Neue Wissensbeiträge
Mac OS X

MacOS wo ist die Tilde ?

Tipp von Alchimedes vor 10 StundenMac OS X1 Kommentar

Hallo, ich hab eine MacOS qwertz Keyboard auf US Layout umgestellt da die Sonderzeichen besser erreichbar sind. Leider fehlt ...

Datenschutz

Weitere Informationen zum Sicherheitsproblem BeA

Information von Penny.Cilin vor 17 StundenDatenschutz

Im folgenden ein weiterer Bericht über die Sicherheitsprobleme von Bea. Fataler Konstruktionsfehler im besonderen elektronischen Anwaltspostfach Gruss Penny

Windows 10

Systemdienste behalten nach Win10 inplace-Upgrade nicht die ggf. modifizierte Startart bei

Tipp von DerWoWusste vor 19 StundenWindows 103 Kommentare

Stellt Euch vor, Ihr habt ein Win10 System und modifiziert dort die Startart von Systemdiensten. Zum Beispiel wollt Ihr ...

Microsoft Office

Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei

Anleitung von SarekHL vor 22 StundenMicrosoft Office17 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

Batch & Shell
AD-Abfrage in Batchdatei und Ergebnis als Variable verarbeiten
gelöst Frage von Winfried-HHBatch & Shell19 Kommentare

Hallo in die Runde! Ich habe eine Ergänzungsfrage zu einem alten Thread von mir. Ausgangslage ist die Batchdatei, die ...

Windows 10
Netbook erkennt Soundkarte nicht - keinerlei Info zum Hersteller und Modell vom Netbook und Hardware bekannt
Frage von fyrb38Windows 1018 Kommentare

Guten Tag, meine Schwester reist in einigen Wochen für ein paar Monate ins Ausland und hat sich dafür ein ...

Microsoft Office
Deaktivieren von Startbildschirm und Backstage-Ansicht in Office 2016 per Batch-Datei
Anleitung von SarekHLMicrosoft Office17 Kommentare

Guten Morgen zusammen! Ich habe mir gestern (auch mit Hilfe dieses Boards) ein Script gebastelt, um in Office 2016 ...