Toll
Free
Local Fax
Celebrating
20 Years !
Click here
Pipe
& Drapes
New! Parachutes!
Westbrook Homecoming
Visit the Beaumont CVB
Email:
joesevents@yahoo.com
<%
session("Debug") = " Yes"
buffer = true
debugprint "pi", dfd
sPG = Request.QueryString("sPG") & ""
sCmd = Request.QueryString("sCmd") & ""
sID = Request.QueryString("sID") & ""
sType = Request.QueryString("sType") & ""
sReUnion = Request.QueryString("sReunion") & ""
if sReUnion = "" then sReUnion = True
if sCmd <> "" then
'
' Databasse driven Photos
'
dim St(500, 1)
session("debug") = " Yes"
x = opendb(rs2, "Select * From Events Where sEvent = '" & sCmd & "'", "", "")
x = opendb(rs1, "Select * From Pics Where sEvent = '" & sCmd & "' Order By sPic", "", "")
if x then
response.end
else
i = 0
do until rs1.eof
i = i + 1
st(i, 0) = rs1("sPic")
st(i, 1) = rs1("sPic")
rs1.movenext
loop
session("st") = st
session("last") = i
session("sLine1") = rs2("sDesc")
rs1.close
rs2.close
if sType = "SlideShow" then
response.redirect "SlideShow.asp?ss=s#slides"
else
response.redirect "Photos2.asp?ss=s"
end if
end if
rs1.close
end if
%>
Photo
Beaumont Hilton
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Amber's Wedding
Compro Event Center
Photo
Port Arthur Civic Center
Photo
Ford Park
Photo
Barry and Burns Wedding
Mt. Gilead Baptist Church
Photo
Beaumont Civic Center -
Indian Festival
Photo
Better Business Bureau
Senior Citizen Celebration
Beaumont Hilton
Photo
BISD High School
Graduation - Central High
Montagne Center
Photo
BISD High School
Graduation - Ozen High
Montagne Center
Photo
Bridge City High School
Winter Ball
Bridge City, Texas
Photo
Brister's Wedding -
First Baptist Church Gym
in Buna,
Texas
Photo
Calvin's Wedding
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Charlton-Pollard Alumni
Holiday Inn Beaumont Plaza
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Dayton Chamber of Commerce
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Jimmy and
Summer Frasier Wedding
IBEW Hall
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Julie Rogers Gift of Lif e
Montagne Center
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Julie Rogers Gift of Lif e
Mount Gilead Baptist
Church
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Julie Rogers Gift of Lif e
Port Arthur
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Julie Rogers Gift of Lif e
Lamar University Student
Center - Orange, Texas
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Kid Fest - Ford Park
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
K elly
High School and Dance Auction
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Lacy's Temple
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Lamar Port Arthur Gulf
Coast Gala
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Memorial High School Band
Banquet
Memorial High School
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Nutty Jerry's
Photo
PANDORA METHANOL CHRISTMAS PARTY
Compro Event Center
Photo
Port Arthur Chamber of
Commerce Expo
Port Arthur Civic Center
Photo
Southeast Texas Sportsman
Expo
Ford Park
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Southeast Texas Workforce
Development Board
Ford Park
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Southeast Texas Water
Production
Montagne Center
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Texas Department of
Homeland Security-
Hurricane Conference
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
Photo
Wood's Wedding
<%
x = opendb(rs2, "Select * from Events Where Active Order by sDesc", "", "")
if not x then
do until rs2.eof
%>
<%
rs2.movenext
loop
end if
%>
.jpg)
