<%
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
%>
CCMS Scripture Reference
 |
Scripture Reference |
To see a list of dramas and
their related Scripture references,
click on the following:
ID Listing
or to find a specific
Scripture reference, try one of these:
Old Testament Listing
New Testament Listing
CCMS Start Page / Topic's Cross-Reference List / Complete List / Ordering Information
CCMS
7026 E Kiva Ave
Mesa, AZ 85208 |
1-800-575-2267
Fax 480-641-8048 |