<% Response.Buffer=true%> <% galleryid=Request.QueryString ("galleryid") session("first")=galleryid Set conn = Server.CreateObject("ADODB.Connection") conn.Open ("DSN=seoulart;UID=seoulart;PWD=seoulart0217") sql ="Select * from galleryall where galleryid="& 324 &" " Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql,conn sql1="Select * from worksall where galleryid=" & 324 & " order by workid" set rs1=server.CreateObject ("ADODB.Recordset") rs1.Open sql1,conn rs1.PageSize=7 %> Seoul Art Fair
   

















<% do until rs1.EOF i=1%> <%do until rs1.EOF or i>rs1.pagesize%> <% rs1.MoveNext i=i+1 loop%> <% if rs1.eof and i<=rs1.PageSize then%> <%for j=i to rs1.pagesize %> <% next end if%> <%loop%>