Reidblog [The Reid Report blog]: The fall and fall of CNN

My blog is worth $31,614.24.
How much is your blog worth?

<% dim done done = request.form("done") if done = "" then done = "No" %> Tell a friend

<% Else if request.form("done") = "Yes" then 'sets variables dim email, sendmail email = request.form("email") Set sendmail = Server.CreateObject("CDONTS.NewMail") 'put the webmaster address here sendmail.From = "webmaster@aspbasics.com" 'The mail is sent to the address entered in the previous page. sendmail.To = email 'Enter the subject of your mail here sendmail.Subject = "Check out this website" 'send a specific page or send a site url dim url 'url = Request.ServerVariables("HTTP_REFERER") url = "http://www.aspbasics.net" 'This is the content of the message. sendmail.Body = "Site recommendation from a friend!" & _ vbCrlf & vbCrlf & "A friend has sent you this email and thought you would should check out this site." & _ vbCrlf & url & vbCrlf 'this sets mail priority.... 0=low 1=normal 2=high sendmail.Importance = 1 sendmail.Send 'Send the email! response.redirect Request.ServerVariables("HTTP_REFERER") 'Response.write ("Sent to ") & email End if End if %>

Reidblog [The Reid Report blog]

Fave it!

NEW Subscribe To
The Daily Reid

Main Menu

Blog Relatives

Random Stuff

The ReidBlogroll

The Rest of the Storyf

Ring-surfing