本篇文章給大家分享的是有關VBSCript中GenerateSDDL函數如何使用，小編覺得挺實用的，因此分享給大家學習，希望大家閱讀完這篇文章后可以有所收獲，話不多說，跟著小編一起來看看吧。

創新互聯于2013年創立，先為衛東等服務建站，衛東等地企業，進行企業商務咨詢服務。為衛東企業網站制作PC+手機+微官網三網同步一站式服務解決您的所有建站問題。

Function GenerateSDDL(AccountName, AccessFlag, AccessType, AccessMask) Dim Accounts, ObjWMI, ObjSID, ObjTru, ObjACE Const SET_DACL_PRESENT = &H8004 Set ObjWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate, (Security)}!\\.\root\cimv2")
 Set Accounts = ObjWMI.ExecQuery("SELECT * FROM Win32_Account WHERE Name='" & AccountName & "'") For Each Account In Accounts  StrSID = Account.SID Next Set ObjSID = ObjWMI.Get("Win32_SID.SID='"& StrSID &"'")
 Set ObjTru = ObjWMI.Get("Win32_Trustee").SpawnInstance_() ObjTru.Domain  = ObjSID.ReferencedDomainName ObjTru.Name   = ObjSID.AccountName ObjTru.SID   = ObjSID.BinaryRepresentation ObjTru.SidLength = ObjSID.SidLength ObjTru.SIDString = ObjSID.Sid
 Set ObjACE = ObjWMI.Get("Win32_ACE").SpawnInstance_() ObjACE.Trustee   = ObjTru ObjACE.AceType   = AccessType ObjACE.AccessMask  = AccessMask ObjACE.AceFlags  = AccessFlag
 Set GenerateSDDL = ObjWMI.Get("Win32_SecurityDescriptor").SpawnInstance_() GenerateSDDL.Owner   = ObjTru GenerateSDDL.DACL   = Array(ObjACE) GenerateSDDL.ControlFlags = SET_DACL_PRESENTEnd Function

例子：

strPath = "d:\\1.txt"
Set ObjWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate, (Security)}!\\.\root\cimv2")
Set ObjSec = ObjWMI.Get("Win32_LogicalFileSecuritySetting.Path='" & strPath & "'")
ObjSec.SetSecurityDescriptor(GenerateSDDL("everyone", &H0, &H1, &H100E0))

以上就是VBSCript中GenerateSDDL函數如何使用，小編相信有部分知識點可能是我們日常工作會見到或用到的。希望你能通過這篇文章學到更多知識。更多詳情敬請關注創新互聯行業資訊頻道。

當前標題：VBSCript中GenerateSDDL函數如何使用-創新互聯
鏈接URL：http://vcdvsql.cn/article6/cdgdig.html

成都網站建設公司_創新互聯，為您提供外貿建站、網站維護、標簽優化、Google、網站設計公司、動態網站

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯