Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Error using cDo email send
Message
 
General information
Forum:
Visual FoxPro
Category:
Internet applications
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01050465
Message ID:
01050476
Views:
23
OK that was corrected - and now I get another err---
The server rejected one or more recipient addresses. The server responce was: 550 5.7.1 Unable to relay for myname@company.com
Are there any other changes that I need to make - or am I not allowed at this company to send email?


>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?
Edgar L. Bolton, B.S. B.B.A.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform