Reidblog [The Reid Report blog]: Who said it?

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!

Countdown to Denver: No riots for Rush.

Subscribe

Blogroll

Ring-surfing