PC Review


Reply
 
 
SS
Guest
Posts: n/a
 
      26th Jun 2006
Hi

I get the following when submitting a form

name test

address test

CDO.Message.1 error '80040213'

The transport failed to connect to the server.

/Forms/confirmation2.asp, line 56



the following is the script on the confirmaion page having changed the
server name and the from and to fields

<!--

METADATA

TYPE="typelib"

UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"

NAME="CDO for Windows 2000 Library"

-->



<%

Set cdoConfig = CreateObject("CDO.Configuration")



With cdoConfig.Fields

.Item(cdoSendUsingMethod) = cdoSendUsingPort

.Item(cdoSMTPServer) = "<servername.com>"

.Update

End With



Set cdoMessage = CreateObject("CDO.Message")



With cdoMessage

Set .Configuration = cdoConfig

.From = "(E-Mail Removed)"

.To = "(E-Mail Removed)"

.Subject = "Sample CDO Message"

.TextBody = "This is a test for CDO.message"

.Send

End With



Set cdoMessage = Nothing

Set cdoConfig = Nothing

%>



</body>



Any ideas would be great?



Thanks






 
Reply With Quote
 
 
 
 
=?Utf-8?B?SHVtaSBLaGFu?=
Guest
Posts: n/a
 
      26th Jun 2006

http://help.maximumasp.com/SmarterTi...?articleid=892

This should answer your question!
"SS" wrote:

> Hi
>
> I get the following when submitting a form
>
> name test
>
> address test
>
> CDO.Message.1 error '80040213'
>
> The transport failed to connect to the server.
>
> /Forms/confirmation2.asp, line 56
>
>
>
> the following is the script on the confirmaion page having changed the
> server name and the from and to fields
>
> <!--
>
> METADATA
>
> TYPE="typelib"
>
> UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
>
> NAME="CDO for Windows 2000 Library"
>
> -->
>
>
>
> <%
>
> Set cdoConfig = CreateObject("CDO.Configuration")
>
>
>
> With cdoConfig.Fields
>
> .Item(cdoSendUsingMethod) = cdoSendUsingPort
>
> .Item(cdoSMTPServer) = "<servername.com>"
>
> .Update
>
> End With
>
>
>
> Set cdoMessage = CreateObject("CDO.Message")
>
>
>
> With cdoMessage
>
> Set .Configuration = cdoConfig
>
> .From = "(E-Mail Removed)"
>
> .To = "(E-Mail Removed)"
>
> .Subject = "Sample CDO Message"
>
> .TextBody = "This is a test for CDO.message"
>
> .Send
>
> End With
>
>
>
> Set cdoMessage = Nothing
>
> Set cdoConfig = Nothing
>
> %>
>
>
>
> </body>
>
>
>
> Any ideas would be great?
>
>
>
> Thanks
>
>
>
>
>
>
>

 
Reply With Quote
 
SS
Guest
Posts: n/a
 
      26th Jun 2006
Thanks I'll give it a go

Shona


 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off



Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 07:16 PM.