%@ Language=VBScript %>
<%
page=CInt(Request.QueryString("p"))
high=6
If Request.QueryString("p") = "" Then page=1
Select Case page
Case 1
'St. Augustine 4/14/01
title="St. Augustine, April 14 2001"
text="Saturday we drove to St. Augustine, America's oldest city, with Ed's sister Colleen, two of Colleen's kids, and "
text=text & "their mother."
caption="Ice cream break in St. Augustine. Erica, Kelly and Lauren, Colleen, Gloria and Ed."
Case 2
'St. Augustine 4/14/01
title="St. Augustine, April 14 2001"
text="Some of the old architecture is beautiful. Flagler College is one example. The main building is the former Hotel "
text=text & "Ponce de Leon, built in the 1880's by Henry Flagler, cofounder of Standard Oil. Unfortunately, the area became "
text=text & "known for hurricanes, and the hotel was less than successful. It serves the college well, though."
caption="Lauren, Erica and Kelly by the fountain at Flagler college.
(warning: don't sit on the frogs!)."
Case 3
'St. Augustine 4/14/01
title="St. Augustine, April 14 2001"
caption="Ed and Erica in St. Augustine."
Case 4
'Orlando, Easter 4/15/01
title="Orlando, April 15 2001"
text="Ed's mother, Ed, Erica and I went to church Sunday morning. We stayed dressed up afterward just long enough for pictures."
caption="Ed and Erica poolside."
Case 5
'Orlando, Easter 4/15/01
title="Orlando, April 15 2001"
text="Ed's sister's family came in the afternoon for Easter. The traditional Easter pool party ensued. The pool was pretty full, "
text=text & "since she has five kids. "
caption="Kelly, Caitlin, Erica, Lauren, Matt and Mike, with "Uncle Ricky" as the Uncle. And Matt and Mike might be Mike and Matt - "
caption=caption & "they kept switching bathing suits."
Case 6
'Orlando, Easter 4/15/01
title="Orlando, April 15 2001"
text="Kids ate first, then went back in the pool while the adults ate.
I can't tell in this picture which twin is which, although "
text=text & "they are usually easy to tell apart if I can see their whole faces. They're identical, but very different weights.
I am quite "
text=text & "confident about the identities of the other kids."
caption="Kelly, Mike/Matt, Matt/Mike, Lauren, Erica, Caitlin."
Case 7
Case 8
Case 9
Case 10
Case 11
Case 12
Case 13
End Select
imgsrc = "../images/042001/flor" & page & ".jpg"
%>
| <%=title%> | |
| <%=text%> | |
| <%=caption%> | |
| <% If page > 1 Then %> << previous <% End If %> | <% If page < high Then %> next >> <% End If %> |