Reidblog [The Reid Report blog]

FURUSH-Denver - Customizedbyj2thaizzo
Get this custom shirt at Zazzle

Enter your email address below to subscribe to ReidBlog!


powered by Bloglet

Mahatma Hillary
"If it happened in the world,
Hillary was there!"

Finalist: Best Liberal Blog
Thanks to all who voted!

The Gross National Debt

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

Recommend ReidBlog:

<% 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 %>