CDO Mail Sending

Question

Hi Guys,
Wondering if anyone can guide me in the correct direction
with this. Each time I include the CStr lines in this script I get
a server error.
I need to be able to get the values from a form into this
email..if I hard code it it works, i.e i remove the
objMail.CStr(Request ("Notes")
this is my script :
<!--METADATA TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library" -->
<!--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library" -->
<%
if(CStr(Request("Submit"))<> "") Then
Dim objMail
Set objMail = Server.CreateObject("CDO.Message")
Set objConfig = Server.CreateObject("CDO.Configuration")
'Configuration:
objConfig.Fields(cdoSendUsingMethod) = cdoSendUsingPort
objConfig.Fields(cdoSMTPServer)="mySMTP"
objConfig.Fields(cdoSMTPServerPort)=25
objConfig.Fields(cdoSMTPAuthenticate)=cdoBasic
objConfig.Fields(cdoSendUserName) = "xxxxxxxxxxxx"
objConfig.Fields(cdoSendPassword) = "xxxxxxxxxx"
'Update configuration
objConfig.Fields.Update
Set objMail.Configuration = objConfig
objMail.From ="[email protected]"
objMail.To = "[email protected]"
objMail.Subject = CStr(Request("Email"))'Email address
objMail.Body = CStr(Request("Notes")) 'Notes
objMail.Subject ="Website Enquiry"
objMail.TextBody="This is to let you know a users has just
added details to our database"
objMail.Send ()
if Err.Number = 0 Then
Response.Write("Mail sent")
Else
response.write("Error Sending Mail.Code: " & Err.Number)
Err.Clear
End if
End if
Set objMail = Nothing
Set objConfig=Nothing
%>
Any help would be most appreciated...I want/need to get this
completed for use tomorrow.
Thanks

Answer 1

https://support.microsoft.com/en-us/kb/171440?wa=wsignin1.0
"Error loading library" is your first error, all others are just follow up, as you surely have code WITH..ENDWITH using the CDO object, which couldn't be instanciated. You should expand your error handler to show more info, you can show PROGRAM()
and LINENO().
Anyway, the solution is not to install CDO, as the situation is so complex about prerequisites and incompatibilities, eg read the notes. The solution is to use something different. I pointed you to a wiki article listing about 20 alternatives.
Bye, Olaf.
Olaf Doschke - TMN Systemberatung GmbH
http://www.tmn-systemberatung.de