Methods
UpdateLicense | Update license information by license code. |
Properties
MaxDomain | Maximum domains EAS supports. It is limited by current license. |
MaxUser | Maximum users EAS supports. It is limited by current license. |
Expired | Indicate whether current server is expired. |
Expiration | Date of expiration. |
Licensee | Licensee description. |
Description | Current license description. |
Version | Server version. |
Remarks
ISvrLicense object sets/gets license information of EmailArchitect Server. Only "system" account has the permission to access this 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 oLicense Set oLicense = oSvr.License If oLicense.Expired > 0 Then WScript.Echo( "trial expired" ) End If