自动发送EMAIL问题？？？
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
提示：：：无效的类别字符串

<%

dim objCDOMail
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.From ="jlw1357@sina.com" '发信人的EMAIL
objCDOMail.To = "jlw1357@sina.com" '收信人的EMAIL
objCDOMail.Subject ="欢迎您访问流水不腐" 'EMAIL的标题

'EMAL的内容
objCDOMail.Body = "您好！"&chr(13)&" 这只是一个简单的邮件列表例子！！"

'发送
objCDOMail.Send
Set objCDOMail = Nothing

%>