通过编程删除 OCS 用户

通过编程删除 OCS 用户

我正在寻找以编程方式从 OCS 2007 R2 中删除用户帐户的方法。

我更喜欢 vbscript 解决方案,因为它将成为用于跨应用程序删除各种用户相关内容的更大的取消配置脚本的一部分。

答案1

在 MSDN 文档中找到了下面的代码这里;这能达到你的目的吗?

    Public Function DeleteInstance(UserURI)


        ' Connect to WMI server

        Set wmiServer = CreateObject("WbemScripting.SWbemLocator").ConnectServer()

        'Do error checking here

        Query = "SELECT * FROM MSFT_SIPESUserSetting where PrimaryURI = '" & UserURI & "'"

        Set LCUserEnum = wmiServer.ExecQuery(Query)

        For each LCUser in LCUserEnum           
            Err.Clear
            LCUser.Delete_

            'Do error checking here
        Next

        DeleteInstance = true

End Function

相关内容