%
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
%>
Walking in the Light 3-2
Section
III - Applying the Will of God
|

| |
| References: |
Matthew 6:33-34
33 But seek ye first the kingdom of God, and his righteousness;
and all these things shall be added unto you.
34 Take therefore no thought for the morrow: for the morrow shall
take thought for the things of itself. Sufficient unto the day
is the evil thereof. (KJV)
I John 4:14-16
14 And we have seen and do testify that the Father sent the Son
to be the Saviour of the world.
15 Whosoever shall confess that Jesus is the Son of God, God dwelleth
in him, and he in God.
16 And we have known and believed the love that God hath to us.
God is love; and he that dwelleth in love dwelleth in God, and
God in him. (KJV)
Philippians
1:6
6 That the
communication of thy faith may become effectual by the acknowledging
of every good thing which is in you in Christ
Jesus. (KJV)
|
|