API example: Enabling a domain

This example shows how to enable an existing domain in your hMailServer installation. The script is written in VBA.

Enabling a domain

   Dim obApp
   Set obApp = CreateObject("hMailServer.Application")

   ' Authenticate. Without doing this, we won't have permission
   ' to change any server settings or add any objects to the
   ' installation.   
   Call obApp.Authenticate("Administrator", "your-main-hmailserver-password")
   
   ' Locate the domain we want to add the account to
   Dim obDomain
   Set obDomain = obApp.Domains.ItemByName("example.com")

   obDomain.Active = True
   obDomain.Save

Search documentation