Methods
Add | Add a new user. |
Remove | Remove user. |
AddAlias | Add a user alias (mail list). |
SetFilter | Filter users by wildcard characters (* and ?). |
Properties
Count | Users count. |
Items | Get specified User object. |
OrderAscent | Sort user by name ascent or descent. |
Remarks
UserCollection object is a collection made up of User objects. It can be used to manage all users in a specified domain.
Usage Example
Dim server, user, password, requestAddr server = "localhost" user = "admin@emailarchitect.net" password = "mypassword" requestAddr = "192.168.0.1" Dim oSvr Set oSvr = CreateObject("EmailArchitectObjects.ServerRoot") r = oSvr.Connect( server, user, password, 0, requestAddr ) If r <> 0 Then WScript.Echo( "connect server failed!" ) WScript.Quit End If Dim oDomains, oDomain Set oDomains = oSvr.DomainCollection 'get domain "emailarchitect.net" Set oDomain = oDomains.Items("emailarchitect.net") If oDomain Is Nothing Then WScript.Echo( "domain doesn't exist" ) WScript.Quit End If Dim oUsers, oUser Set oUsers = oDomain.UserCollection 'enumerate all users in "emailarchitect.net" Dim i, nCount nCount = oUsers.Count For i = 0 To nCount-1 Set oUser = oUsers.Items(CLng(i)) WScript.Echo( oUser.Name ) Next