Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Can't send email

Status
Not open for further replies.

LeoLionHeart

Programmer
Apr 4, 2006
45
GB
I am using the following code in an ActiveX Script

Code:
Set oMail = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
iConf.Fields.Item("[URL unfurl="true"]http://schemas.microsoft.com/cdo/configuration/sendusing")[/URL] = 2
iConf.Fields.Item("[URL unfurl="true"]http://schemas.microsoft.com/cdo/configuration/smtpserver")[/URL] = "....."
iConf.Fields.Item("[URL unfurl="true"]http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")[/URL] = 10
iConf.Fields.Item("[URL unfurl="true"]http://schemas.microsoft.com/cdo/configuration/smtpserverport")[/URL] = 25
iConf.Fields.Update
Set oMail.Configuration = iConf
oMail.To 		= "....@......."
oMail.From 		= ".......@...."
oMail.Subject 		= "Subject"
oMail.TextBody 		= "Body"
oMail.Send
Set iConf = Nothing
Set Flds = Nothing

Main = DTSTaskExecResult_Success

Error source: CDO.Message.1
Error Description: The transport failed to connect to the server.

I've done a search for CDO on the server and there are no dlls.

Is there any other ways to perform this task when I have a mail client on the server.
 
Hi Leo,

Have you checked the items in this link? If so and no joy, can you give more detail as to what the DTS is doing and what file you want to send.

Are you running the package from your PC or on the server?

Cheers,

M.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top