By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
434,984 Members | 2,832 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 434,984 IT Pros & Developers. It's quick & easy.

Wats the error in this code

P: n/a
Hello,

dim receiptto
receiptto="a2*@yahoo.com"
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="a2***@yahoo.com"
.To="my****@yahoo.com"
.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
Jul 22 '05 #1
Share this Question
Share on Google+
7 Replies


P: n/a
Turn off friendly error messages in your browser

http://support.microsoft.com/default...;en-us;Q294807
--
Jason Brown
Microsoft GTSC, IIS

This posting is provided "AS IS" with no warranties, and confers no
rights.
"Rajani" <Ra****@discussions.microsoft.com> wrote in message
news:B1**********************************@microsof t.com...
Hello,

dim receiptto
receiptto="a2*@yahoo.com"
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="a2***@yahoo.com"
.To="my****@yahoo.com"
.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

Jul 22 '05 #2

P: n/a
Is that Atrax?


"Jason Brown [MSFT]" <i-******@online.microsoft.com> wrote in message
news:ei**************@TK2MSFTNGP14.phx.gbl...
Turn off friendly error messages in your browser

http://support.microsoft.com/default...;en-us;Q294807

Jul 22 '05 #3

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

--
http://www.aspfaq.com/
(Reverse address to reply.)


"Rajani" <Ra****@discussions.microsoft.com> wrote in message
news:B1**********************************@microsof t.com...
Hello,

dim receiptto
receiptto="a2*@yahoo.com"
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.we
bmail.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="a2***@yahoo.com"
.To="my****@yahoo.com"
.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

Jul 22 '05 #4

P: n/a
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.

"Aaron [SQL Server MVP]" wrote:
Might try this code:
http://www.aspfaq.com/2252

--
http://www.aspfaq.com/
(Reverse address to reply.)


"Rajani" <Ra****@discussions.microsoft.com> wrote in message
news:B1**********************************@microsof t.com...
Hello,

dim receiptto
receiptto="a2*@yahoo.com"
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.we
bmail.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="a2***@yahoo.com"
.To="my****@yahoo.com"
.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


Jul 22 '05 #5

P: n/a
yeah mate.
--
Jason Brown
Microsoft GTSC, IIS

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

"Aaron [SQL Server MVP]" <te*****@dnartreb.noraa> wrote in message
news:%2****************@tk2msftngp13.phx.gbl...
Is that Atrax?


"Jason Brown [MSFT]" <i-******@online.microsoft.com> wrote in message
news:ei**************@TK2MSFTNGP14.phx.gbl...
Turn off friendly error messages in your browser

http://support.microsoft.com/default...;en-us;Q294807


Jul 22 '05 #6

P: n/a
On Mon, 22 Nov 2004 22:37:15 -0800, Rajani
<Ra****@discussions.microsoft.com> wrote:
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

"Aaron [SQL Server MVP]" wrote:
Might try this code:
http://www.aspfaq.com/2252

--
http://www.aspfaq.com/
(Reverse address to reply.)


"Rajani" <Ra****@discussions.microsoft.com> wrote in message
news:B1**********************************@microsof t.com...
> Hello,
>
> dim receiptto
> receiptto="a2*@yahoo.com"
> 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.we
bmail.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="a2***@yahoo.com"
> .To="my****@yahoo.com"
> .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



Jul 22 '05 #7

P: n/a
This is the code i used
dim receiptto
receiptto="ra****@tom.com.bn"
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="a2***@yahoo.com"
.To="ra****@tom.com.bn"
.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


"Jeff Cochran" wrote:
On Mon, 22 Nov 2004 22:37:15 -0800, Rajani
<Ra****@discussions.microsoft.com> wrote:
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

"Aaron [SQL Server MVP]" wrote:
Might try this code:
http://www.aspfaq.com/2252

--
http://www.aspfaq.com/
(Reverse address to reply.)


"Rajani" <Ra****@discussions.microsoft.com> wrote in message
news:B1**********************************@microsof t.com...
> Hello,
>
> dim receiptto
> receiptto="a2*@yahoo.com"
> 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.we
bmail.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="a2***@yahoo.com"
> .To="my****@yahoo.com"
> .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


Jul 22 '05 #8

This discussion thread is closed

Replies have been disabled for this discussion.