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

Home \ Online Books \ The Creation Explanation

The Creation Explanation
a scientific alternative to evolution

A beetle that carries a gun?

Spider aquanauts?

A dirty fish that blushes

Sea slugs that defend themselves with
stolen anemone stingers?

These and other intriguing examples of design in living organisms introduce a comprehensive, positive structure of scientific evidence in support of the Biblical account of creation.

Clearly and forcefully written, in language both scientifically precise and understandable to the student and layman, The Creation Explanation presents an impressive array of data from the natural world for anyone who seeks a valid alternative to the theory of evolution.

Read The Creation Explanation
or go to the Table of Contents.


Read The Creation Explanation!