Incorrect constant definition. It should be

#DEFINE cdoSendUsingPort   2

>Program Error: OLE IDispatch exception code ) from CDO.Message.1:
>The pickup directory path is required and was not specified...
>
>With Company and name replaced with legit info in the following, I get an error.
>

>#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
>

>
>When oMSG.Send is attempted, the error is given - how do I correct this?