<% OP=request("OP") if op="" then op="7" Set OBJdbConnection = Server.CreateObject("ADODB.Connection") OBJdbConnection.Open DSN %>

.jpg" border="0" width="196" height="23" alt="" name="menu_man7"> .jpg" border="0" width="196" height="23" alt="" name="menu_man8"> .jpg" border="0" width="196" height="23" alt="" name="menu_man9">

.jpg" border="0" width="87" height="20" alt="" name="menu_man1">   .jpg" border="0" width="133" height="20" alt="" name="menu_man2">   .jpg" border="0" width="77" height="20" alt="" name="menu_man3">   .jpg" border="0" width="105" height="20" alt="" name="menu_man4">   .jpg" border="0" width="62" height="20" alt="" name="menu_man5">   .jpg" border="0" width="96" height="20" alt="" name="menu_man6">

<%IF OP="1" THEN%> <%END IF%> <%IF OP="2" THEN%> <%END IF%> <%IF OP="3" THEN%> <%END IF%> <%IF OP="4" THEN%> <%END IF%> <%IF OP="5" THEN%> <%END IF%> <%IF OP="6" THEN%> <%END IF%> <%IF OP="7" THEN%> <%END IF%> <%IF OP="8" THEN%> <%END IF%> <%IF OP="9" THEN%> <%END IF%>

<% OBJdbConnection.close Set OBJdbConnection = nothing %>