<%@LANGUAGE="VBSCRIPT"%> <% 'MAIN LEVEL CONNECTION 'conn_STRING1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("_db/gallery.mdb") conn_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.ServerVariables("APPL_PHYSICAL_PATH") & "\access_db\gallery.mdb" 'SECOND LEVEL CONNECTION 'conn_STRING2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../_db/gallery.mdb") conn_STRING2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.ServerVariables("APPL_PHYSICAL_PATH") & "\access_db\gallery.mdb;" 'THIRD LEVEL CONNECTION 'conn_STRING3 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../../_db/gallery.mdb") conn_STRING3 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.ServerVariables("APPL_PHYSICAL_PATH") & "\access_db\gallery.mdb" %> <% If request("catID") = "" then catID = "1" Else catID = trim(request("catID")) End If Set cn = Server.CreateObject("ADODB.Connection") cn.Open conn_STRING2 'strSQL = "SELECT * FROM gImages WHERE gID = 1 ORDER BY gOrder " strSQL = "SELECT gCats.CatName, gCats.CatDesc, gImages.gID, gImages.gName, gImages.gDesc, gImages.gFile, gImages.gOrder " _ & "FROM gCats RIGHT JOIN gImages ON gCats.catID = gImages.catID " _ & "WHERE gImages.catID = "& catID &" ORDER BY gOrder" Set rs= Server.CreateObject("ADODB.Recordset") rs.Open strSQL, cn, 1, 3 %> Janice Wilson
[an error occurred while processing this directive]
[an error occurred while processing this directive]
Janice and Friends
<% rs.movefirst %>
<% x=1 rs.movefirst Do While not rs.eof %> <% If x = 5 then Exit Do End If x=x+1 rs.movenext loop %>
','<%=rs("gDesc")%>')" onMouseOut="showImg('tmb<%=x%>','tmb<%=x%>','','');showImg('mfran','roll_a','Mouse Over an Image','')">" width="100" height="75" border="0" id="tmb<%=x%>">
 
Mouse Over an Image
<% x=1 rs.movefirst Do While not rs.eof If x >= 6 then %> <% End If x=x+1 rs.movenext loop %>
','<%=rs("gDesc")%>')" onMouseOut="showImg('tmb<%=x%>','tmb<%=x%>','','');showImg('mfran','roll_a','Mouse Over an Image','')">" width="100" height="75" border="0" id="tmb<%=x%>">
[an error occurred while processing this directive]
<% cn.close %>