|
Toll Free
(866) 833-5521
Local
(409) 833-5521
Fax
(409) 833-5533
Celebrating 20 Years!

Click here
Pipe & Drapes
Golden Triangle Event Services
Services include delivery and set-ups of
exhibit booths, run ways, tables, chairs, draperies, stages, risers,
dance floors, and table skirts. Current and former customers are
industry, hotels, hospitals, civic centers, universities, convention and
visitors' bureaus, and professional and social service organizations
Visit the Beaumont CVB |
<%
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
%>

<%
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
Album |
Amber's Wedding
Compro Event Center |
 |
|
Photo
Album |
Barry and Burns Wedding
Mt. Gilead Baptist Church |
 |
|
Photo
Album |
Brister's Wedding -
First Baptist Church Gym
in Buna,
Texas |
 |
|
Photo
Album |
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
Album |
Derrick and Chelsea 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
%>
Photo
Album |
Jana
Henderson |
 |
|
Photo
Album |
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
%>
<%
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
Album |
Jessie Ly's Engagement
Party |
<%
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
Album |
Nutty Jery's |
 |
|
Photo
Album |
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
%>
|
|