<%@LANGUAGE="VBSCRIPT"%> <% dim tabs(12) dim tabs_status(6) tabs(0)="tab3l.gif" tabs(1)="tab3r.gif" tabs(2)="tab1l.gif" tabs(3)="tab1r.gif" tabs(4)="tab2l.gif" tabs(5)="tab2r.gif" tabs(6)="tab2l.gif" tabs(7)="tab2r.gif" tabs(8)="tab2l.gif" tabs(9)="tab2r.gif" tabs(10)="tab2l.gif" tabs(11)="tab2r.gif" tabs_status(0)="off" tabs_status(1)="on" tabs_status(2)="off" tabs_status(3)="off" tabs_status(4)="off" tabs_status(5)="off" dim myAlbum dim myXML myAlbum=Request.QueryString("album") if myAlbum="familyandfriends" then myXML="familyandfriends.xml" tabs_status(1)="off" tabs(2)="tab3l.gif" tabs(3)="tab3r.gif" tabs(4)="tab3l.gif" tabs(5)="tab3r.gif" tabs(6)="tab3l.gif" tabs(7)="tab3r.gif" tabs_status(4)="on" tabs(8)="tab1l.gif" tabs(9)="tab1r.gif" elseif myAlbum="earlydays" then myXML="earlydays.xml" tabs_status(1)="off" tabs(2)="tab3l.gif" tabs(3)="tab3r.gif" tabs_status(2)="on" tabs(4)="tab1l.gif" tabs(5)="tab1r.gif" elseif myAlbum="parents" then myXML="parents.xml" tabs_status(1)="off" tabs(2)="tab3l.gif" tabs(3)="tab3r.gif" tabs(4)="tab3l.gif" tabs(5)="tab3r.gif" tabs_status(3)="on" tabs(6)="tab1l.gif" tabs(7)="tab1r.gif" elseif myAlbum="new" then myXML="july.xml" tabs_status(1)="off" tabs(2)="tab3l.gif" tabs(3)="tab3r.gif" tabs(4)="tab3l.gif" tabs(5)="tab3r.gif" tabs(6)="tab3l.gif" tabs(7)="tab3r.gif" tabs(8)="tab3l.gif" tabs(9)="tab3r.gif" tabs_status(5)="on" tabs(10)="tab1l.gif" tabs(11)="tab1r.gif" else myXML="brandon.xml" end if %> Brandon Richard Williams :: Photo Gallery <%=myXML%>