CDONTS authentication

<% Dim objMsg Dim objConfig Set objMsg    = CreateObject(«CDO.Message») Set objConfig = CreateObject(«CDO.Configuration») Dim objFields Set objFields = objConfig.Fields ‘ Setup server information objFields(«http://schemas.microsoft.com/cdo/configuration/smtpserver»)       = «mysmtpserver.com» objFields(«http://schemas.microsoft.com/cdo/configuration/smtpserverport»)   = 25 objFields(«http://schemas.microsoft.com/cdo/configuration/sendusing»)        = 2 ‘ Setup server login information if your server require it objFields(«http://schemas.microsoft.com/cdo/configuration/smtpauthenticate») = 1 objFields(«http://schemas.microsoft.com/cdo/configuration/sendusername»)   […]