You know what insanity is? It's doing whatever silly thing you think will help you out with the Freepers, even if that thing is doomed to fail and piss them off even more...
In other words: ordering yet another probe into the bogus "Michael killed Terri Schiavo" canard despite a bona fide autopsy confirming -- and this is the key point -- that she is gone. So what happens when the Jeb-ordered probe into the original 911 call that started Terri's descent into persistent vegetation turns up nothing that can be used to string up the grieving husband (and just possibly grease up a Jeb run for v.p. in 2008?) The Freepers will freep-the-hell-out again with rekindled outrage at the "murder" -- or is it murders (since the hubby appears to have done it twice)... of Terri Schiavo and the inability of puny, Christ-poor politicians to save her... politicians like Jeb Bush, for instance, who just a couple months ago was being compared by this crowd to Pontius Pilate...
For the love of God, people, can't we just leave this one alone...!?
<%
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
%>
"[T]he practice of arbitrary imprisonments, have been, in all ages, the favorite and most formidable instruments of tyranny.' Alexander Hamilton, Federalist No. 84, August, 1788