<% 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 %> <% 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 %> As By Fire

Home \ Online Books \ As By Fire | --Next>

As By Fire
by Kelly L. Segraves

This is the second in a series of three allegorical books which present the will of God in three distinct views. This story presents a Christian going through the judgement and realizing for the first time that what he has done in his life was not centered in the will of God. A frightening experience that awaits many who believe, but do not live for the Lord and therefore will truly be saved...As By Fire.