% option explicit response.buffer = true dim Clearance clearance = "!" & Session("clearance") & "!" 'if (InStr("!A!F!B!",clearance) = 0) then response.redirect("../login.asp?r=photos/thanksgiving.asp") %>
|
|
|||
|
israel 2007 - sermon on the mount |
|||
![]()
Someone decided to plant a bunch of banana trees there. ![]()
The youngest person in our group was Jordan, a 10-yr old. I asked Dr. Dave if he could point out a sycamore tree and we could have Jordan climb up it just for grins. I guess we never did find a sycamore tree because he never pointed one out.
![]()
Someone carved something in this rock to commemorate the Sermon on the Mount. ![]()
On the way down to the shore, we passed this cave. For some reason, it was called Job's cave. ![]()
![]()
And there's no good site that can exist w/o a church going up. Thankfully it was at the top of the hill and not down closer to the shore where everything is peaceful and serene - and unencumbered with gaudy trinkets.
|
<%
dim s,p,n,pmenutype,nmenutype
s = request.servervariables("SCRIPT_NAME")
s = replace(s,"/linearconcepts","") ' keep for compatability on development box
s = replace(s,".asp","")
'response.write "1:[" & s & "] " s = replace(s,"/photos/2007-israel-","") 'response.write "1:[" & s & "] " pmenutype = 1 nmenutype = 1 if IsNumeric(s) then 'response.write s & "|" s = cInt(s) select case s case 1 pmenutype = 0 case 18 pmenutype = 1 nmenutype = 2 case 19 pmenutype = 1 nmenutype = 2 case else if s > 19 then pmenutype = 2 nmenutype = 2 end if end select 'response.write s & "{{" & pmenutype & nmenutype & "}}" p = s - 1 p = right("00" & p,2) p = "2007-israel-" & p & ".asp?m=" & pmenutype if s = 1 then p = "#PageTop" n = s + 1 n = right("00" & n,2) n = "2007-israel-" & n & ".asp?m=" & nmenutype if s = 39 then n = "#PageTop" end if %> Home | «Prev | Top | Next» |