Domain object

Methods

Update domain setting to server.

Properties

Name	Domain name.
MaxMessageSize	Maximum message size limited in this domain.
Enabled	Status of current domain, active or inactive.
MaxMBXSize	Maximum storage size for single user of current domain.
MaxUsers	Maximum count of users of current domain.
IsAlias	Indicate if current domain is a remote domain.
Option	Optional value of current domain.
UserCollection	UserCollection object of current domain.
Flags	Flags of current domain.
DomainSetting	PersonalSetting object of current domain.
IncomingFilters	FilterCollection object of current domain for incoming emails.
OutgoingFilters	FilterCollection object of current domain for outgoing emails.
ContactCollection	ContactCollection object of current domain for global address book.

Remarks

Domain object contains all settings of a domain on EAS. Only "system" account has the permission to invoke UpdateFields method of domain object.

Usage Example

Dim server, user, password, requestAddr
server = "localhost"
user = "system"
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

If oDomain.IsAlias > 0 Then
  WScript.Echo( "this is a remote domain" )
Else
  WScript.Echo( "this is a local domain" )
End If