Sending email with classic ASP with out authentication

<%


Dim Emailstr
Emailstr = "<p>Dear "&qname&"</p>"
Emailstr = Emailstr & "<p>Hello</p>"
Emailstr = Emailstr & "<p>Thanks,<br></p>"
Set myMail=CreateObject("CDO.Message")
myMail.Subject="Subject Line"
myMail.From = "classical-asp.blogspot.com <classical-asp@blogspot.com>" ' Change it with your email ID
myMail.To = Eemail
myMail.HTMLBody = Emailstr
myMail.Send
set myMail=nothing
%>