WMI查询将visualsvn_service的访问权限导出为excel格式

【问题标题】：WMI query to export the access rights of visualsvn_service to excel formatWMI查询将visualsvn_service的访问权限导出为excel格式
【发布时间】：2013-08-07 12:32:30
【问题描述】：

我正在使用 VisualSVN 服务器 2.5.8 并启用了 windows 身份验证。

我需要编写一个 vbscript 以使用 WMI 查询将用户的所有存储库的访问权限导出为 excel 格式。

我是 vbscript 和 WMI 的新手。

是否有任何示例 vbscript 可以导出访问权限？

谢谢

【问题讨论】：

标签： vbscript wmi wmi-query

【解决方案1】：

根据 svnforum.org 上的this thread，这样的事情应该可以工作：

Set svn = GetObject("winmgmts://./root/VisualSVN")
Set wmi = GetObject("winmgmts://./root/cimv2")

Set accessLevel = CreateObject("Scripting.Dictionary")
accessLevel.Add 0, "No Access"
accessLevel.Add 1, "Read Only"
accessLevel.Add 2, "Read/Write"

For Each sd In svn.ExecQuery("SELECT * FROM VisualSVN_SecurityDescriptor")
  For Each perm in sd.Permissions
    Set account = wmi.Get("Win32_SID.SID='" & perm.Account.SID & "'")
    WScript.Echo sd.AssociatedObject & ": " _
      & account.AccountName & "\" & account.ReferencedDomainName & " " _
      & accessLevel(perm.AccessLevel)
  Next
Next

【讨论】：