Error in loading DLL: 'cdoConfig.Fields'

I am getting following error while sending mail using CDOSYS

Microsoft VBScript runtime error '800a0030'
Error in loading DLL: 'cdoConfig.Fields'
/contact-us/enquirymail.asp, line 20


Here is the code I am using :


<%
'sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(sch & "smtpserver") = "mail.world.com"
cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.fields.update
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoMessage.Configuration = cdoConfig
cdoMessage.From = email
cdoMessage.To = "mail@world.com"
cdoMessage.cc = "india@yahoo.com"
cdoMessage.Subject = "enquiry form world.com"
cdoMessage.HTMLBody = Yahoo
cdoMessage.Send
Set cdoMessage = Nothing
Set cdoConfig = Nothing
response.redirect "http://www.world.com"
%>



Whats the issue can be ??