<% DBpath="admin/"%>

	SPA <% set rs=server.CreateObject("adodb.recordset") strsql="select * from product where pclass='6' order by psort" rs.open strsql,Conn,3,3 if not rs.eof then for i=1 to rs.recordcount %> <% rs.movenext if i mod 3=0 then response.Write " "><% if rs("pic1")<>"" then %>" width="165" height="110" border="0" class="img"><% else response.write rs("pname") end if%> <%=rs("pname")%> <%=rs("intr")%>   " end if if rs.eof then exit for next end if %>