#DEFINE cdoSendUsingPort 2>
>>#DEFINE cDoSendUsingPickup 1 >>#DEFINE cDoSendUsingPort 1 >>#DEFINE cDoSendUsingExchange 3 >>#DEFINE cDoSendUsingMethod 1 >>#DEFINE cDoSMTPServerPort 25 >>oMSG = CREATEOBJECT("CDO.Message") >>iConf= CREATEOBJECT("CDO.Configuration") >>flds= iConf.Fields >>flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cDoSendUsingPort >>flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")= "CompanyNET" >>flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")= 10 >>flds.Update >>oMSG.Configuration= iconf >>oMSG.To = "name@company.com" >>oMSG.From = "name@hotmail.com" >>oMSG.Subject = "Hello Email" >>oMSG.HTMLBody = [< b >< P >< FONT COLOR="#CC0000" >Hello In Color< /FONT >< /b >] >>oMSG.Send >>oMSG= null >>>>