Wats the error in this code

[Rajani]

Hello,

dim receiptto
receiptto="(e-mail address removed)"
set cdoconfig=CreateObject("CDO.configuration")
set cdomsg=CreateObject("CDO.Message")

with cdoconfig.Fields
.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2

..Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="mail8.webmail.com"

'this is the SMTP server setting in my outlook.

.Update
end with
with cdomsg
set .Configuration=cdoconfig

..Fields("urn:schemas:mailheader:disposition-notification-to")=receiptto
.Fields("urn:schemas:mailheader:return-receipt-to") =receiptto
.From="(e-mail address removed)"
.To="(e-mail address removed)"
.Subject="Sample mail"
.HTMLBody="<b><font color=#ff0000 size=3
face='arial'>Hello</font></b>"
.DSNOptions=4
.Fields.update
.Send
end with
set cdoconfig=nothing
set cdomsg=nothing


Response.Write "Mail sent"


I am getting the error ar .Send (Internal Server error 500
If i didnt use configuration, sending mail correctly. (Simple from, to,
subject, htmlbody, send).


Thanx in advance

 

[Jason Brown [MSFT]]

Turn off friendly error messages in your browser

http://support.microsoft.com/default.aspx?scid=kb;en-us;Q294807


--
Jason Brown
Microsoft GTSC, IIS

This posting is provided "AS IS" with no warranties, and confers no
rights.

 

[Aaron [SQL Server MVP]]

Is that Atrax?

 

[Aaron [SQL Server MVP]]

Might try this code:
http://www.aspfaq.com/2252

 

[Rajani]

Hello,

I off friendly error messages in the browser. Still the same
error(screen). I copied from that article only and changed values to suit my
requirements. If i didnt use configuration, its sending mail w/o error. When
i use config only its displaying error.

 

[Jason Brown [MSFT]]

yeah mate.


--
Jason Brown
Microsoft GTSC, IIS

This posting is provided "AS IS" with no warranties, and confers no
rights.

 

[Jeff Cochran]

I off friendly error messages in the browser. Still the same
error(screen). I copied from that article only and changed values to suit my
requirements. If i didnt use configuration, its sending mail w/o error. When
i use config only its displaying error.

Post the full error message as you see it. If it works without the
config, then you have something wrong in your config settings. You
did edit the code to match your SMTP server, correct?

Jeff

 

[Rajani]

This is the code i used
dim receiptto
receiptto="(e-mail address removed)"
set cdoconfig=CreateObject("CDO.configuration")
set cdomsg=CreateObject("CDO.Message")

with cdoconfig.Fields
' .Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
' .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="mail4.webindia.com"
' .Update
end with
with cdomsg
' set .Configuration=cdoconfig
.Fields("urn:schemas:mailheader:disposition-notification-to")=receiptto
.Fields("urn:schemas:mailheader:return-receipt-to") =receiptto
.From="(e-mail address removed)"
.To="(e-mail address removed)"
.Subject="Sample mail"
.HTMLBody="<b><font color=#ff0000 size=3 face='arial'>Hello</font></b>"
.DSNOptions=4
.Fields.update
.Send
end with
set cdoconfig=nothing
set cdomsg=nothing