<% function hideFromBots(strE) dim bots, re, c bots = Array("^EmailSiphon","^EmailWolf","^ExtractorPro","^Mozilla.*NEWT","^Crescent","^CherryPicker","^[Ww]eb[Bb]andit","^WebEMailExtrac.*","^NICErsPRO","^Telesoft","^Zeus.*Webster","^Microsoft.URL","^Mozilla/3.Mozilla/2.01","^Xenu.*Link.*Sleuth.*","^EmailCollector") for each spambot in bots Set re = new RegExp re.IgnoreCase = false re.global = false re.Pattern = spambot if re.Test(request.servervariables("HTTP_USER_AGENT")) then c=c+1 next if c>0 then hideFromBots="Email address witheld" else hideFromBots=strE end if end function %> The Great Dinosaur Mistake

Home \ Online Books \ The Great Dinosaur Mistake
The Great Dinosaur Mistake

GONE!

Yes, they're gone. But why?
Why did the mighty dinosaur go extinct?
What are the implications for mankind?

There is an answer!

A frighteningly different answer than you may have ever heard. Based on scientific discoveries showing that man and dinosaurs lived at the same time, this book exposes...

 

 

Read The Great Dinosaur Mistake or
go to the Table of Contents.

 

Send questions or comments to "><%=hideFromBots("feedback@parentcompany.com")%> .