|
<%
i=0
Rs.Open "select * from tblgallery order by order_list",Con,3,3
strCount = Rs.RecordCount
while not Rs.EOF
strPID = Rs.Fields("id")
if i = 0 then Response.write("| | ") end if
if Rs.Fields("strwidth") = 2 then
i = i + 1
strwidth = "55"
else
i = i + 2
strwidth = "118"
end if
%>
|
">
|
<%
if i = 12 then
Response.write("
|
|
")
i = 0
end if
Rs.MoveNext
wend
if i < 12 AND i > 0 then
Response.write("
")
end if
Response.write("")
Rs.Close : set Rs = nothing : Con.Close : set Con = nothing%>
