Remove Method

Remove a domain from server.

long Remove([in] BSTR Name)

Parameters

Name

Name of the domain to be removed.

Return Value

Return value is zero if this method succeeds; otherwise return value is non-zero.

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
Set oDomains = oSvr.DomainCollection

If oDomain.Remove("adminsystem.com") <> 0  Then
  WScript.Echo  "remove domain failed!"
Else
  WScript.Echo "remove domain succeeded!"
End If