I have the following error message from email.asp page....

CDO.Message.1 (0x80040220)
The "SendUsing" configuration value is invalid.

'---------- My code....
Set MyCDO = Server.CreateObject("CDO.Message")
Set MyCDOConf = Server.CreateObject("CDO.Configuration")
If IsObject (MyCDO) Then
Set Flds = MyCDOConf.Fields
With Flds
.Item("http://Schemas/microsoft.com/cdo/configuration/sendusing") = 2
.Item("http://Schemas/microsoft.com/cdo/configuration/smtpserver") =
"localhost" ' "127.0.0.1"
.update
End With
Set MyCDO.Configuration = MyCDOConf
MyCDO.From = "from@me"
MyCDO.To = "to@you" ' request("to")
MyCDO.Subject = "Registration Complete "
TBdy = "Dear " & Request("whom")
TBdy = TBdy & "Thank you."
MyCDO.TextBody = TBdy
MyCDO.Send
End If
Set MyCDO = nothing
Set MyCDOConf = nothing
'---------------

I have winxp iis 5.1 and smtp installed to my notebook. Is something to do
with my local SMTP?
I had similar code using autoemail.vbs which work fine....

Thank in advance for any help.....

Philip

Try:

.Item("http://Schemas.microsoft.com/cdo/configuration/sendusing") = 2

rather than

..Item("http://Schemas/microsoft.com/cdo/configuration/sendusing") = 2

(note the "/" after "schemas" has been changed to a ".")

Cheers
Ken

--

Web: www.adOpenStatic.com
IIS Blog: www.adOpenStatic.com/cs/blogs/ken

[quoted text, click to view]
:
: I have the following error message from email.asp page....
:
: CDO.Message.1 (0x80040220)
: The "SendUsing" configuration value is invalid.
:
: '---------- My code....
: Set MyCDO = Server.CreateObject("CDO.Message")
: Set MyCDOConf = Server.CreateObject("CDO.Configuration")
: If IsObject (MyCDO) Then
: Set Flds = MyCDOConf.Fields
: With Flds
: .Item("http://Schemas/microsoft.com/cdo/configuration/sendusing") =
2
: .Item("http://Schemas/microsoft.com/cdo/configuration/smtpserver") =
: "localhost" ' "127.0.0.1"
: .update
: End With
: Set MyCDO.Configuration = MyCDOConf
: MyCDO.From = "from@me"
: MyCDO.To = "to@you" ' request("to")
: MyCDO.Subject = "Registration Complete "
: TBdy = "Dear " & Request("whom")
: TBdy = TBdy & "Thank you."
: MyCDO.TextBody = TBdy
: MyCDO.Send
: End If
: Set MyCDO = nothing
: Set MyCDOConf = nothing
: '---------------
:
: I have winxp iis 5.1 and smtp installed to my notebook. Is something to do
: with my local SMTP?
: I had similar code using autoemail.vbs which work fine....
:
: Thank in advance for any help.....
:
: Philip
:
: