Using EmailArchitectObjects Component

Create objects

EmailArchitectObjects object restricts access permission by security context, therefore, you can ONLY create ServerRoot object or Tools object (no security context for this object) directly in your application. Other objects must be retrieved from parent object so that the object can inherit the security context.

[ASP]
Set oSvr = Server.CreateObject("EmailArchitectObjects.ServerRoot")
r = oSvr.Connect( "localhost", "system", "pass", 0 )
If r <> 0 Then
  Response.Write( "connect server failed!" )
Else
  Set oDomains = oSvr.DomainCollection 
  'correct code, get domain collection object from ServerRoot with security context.
End If

'incorrect code, oDomains object can't initialize security context.
Set oDomains = Server.CreateObject("EmailArchitectObjects.DomainCollection")

Server Session

When Connect method is called, it can require a session for current user, after that you can use OpenSession method to connect to server without user and password before session expires.

[ASP]
Set oSvr = Server.CreateObject("EmailArchitectObjects.ServerRoot")
Dim sessionkey, SESSION_REQUIRED
SESSION_REQUIRED = 1
r = oSvr.Connect( "localhost", "system", "pass", SESSION_REQUIRED )
If r <> 0 Then
  Response.Write( "connect server failed!" )
Else
  sessionkey = oSvr.SessionKey
  oSvr.Close
End If

'now you can use OpenSession method to open a session under "system" user
r = oSvr.OpenSession( sessionkey, "localhost" )