Custom Error Pages

[UncleCake]

Hi,

I successfully created a custom 404 error page which also e-mails me information using CDONTS. When I tried to use the same script on the 500.100 error page I am getting this error:

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'objMessage'

/Error/500-100.asp, line 291

My CDONTS script goes like this:
set objMessage = server.CreateObject("CDONTS.NewMail&quot
objMessage.BodyFormat = CdoBodyFormatHTML
objMessage.MailFormat = 0
objMessage.From = strFrom
objMessage.To = strTo
If len(strCC) > 0 then
objMessage.Cc = strCC
End If
if len(strBcc) > 0 then
objMessage.Bcc = strBCC
end if
objMessage.Body = strBody
objMessage.Subject = strSubject

objMessage.Send
Set objMessage = Nothing

Line 291 is the first line: set objMessage = server.CreateObject("CDONTS.NewMail&quot

Is there some reason that I could use CDONTS on the 404 page and it would error out on the 500.100 page?

-Uncle Cake

 

[mwolf00]

Sounds like you have OPTION EXPLICIT

dim objMessage
set objMessage = server.CreateObject("CDONTS.NewMail&quot
objMessage.BodyFormat = CdoBodyFormatHTML

etc.... -----------------------------------------------------------------
Be nice. It's only doing what you tell it to do.
mikewolf@tst-us.com

 

[UncleCake]

Thanks Mike,

That was it!

-Uncle Cake