---

<% If cPage > 1 Then %> <% Else %> <% End If %>

<% If cPage > 1 Then %> <% Else %> <% End If %>

<%= cPage %> / <%= rs.PageCount %>

<% If cPage < rs.PageCount Then %> <% Else %> <% End If %>

<% If cPage < rs.PageCount Then %> <% Else %> <% End If %>

---

<% Else %> <% rs.AbsolutePage = cpage k = 1 DO WHILE NOT rs.EOF and k <= rs.pagesize %> <% if UCase(left(Rs("ftp"),4))="HTTP" or UCase(left(Rs("ftp"),4))="FTP:" then %> <% else %> <% end if '''------------------------------------------------------------------------------------- '' ''' step ÀÌ 0ÀÌ ¾Æ´Ï¸é Áï,, ´äº¯À̸é.. '''---------------------------------------------------------------------- k = k + 1 rs.MoveNext LOOP %>

Á¦ ¸ñ	U R L	±Û ¾´ ÀÌ	³¯ Â¥	Á¶È¸¼ö
<% if rs("fnum") <> 0 then if searchkey = "" then for i = 1 to rs("fnum") response.write " " next end if if cint(rs("date") - now()) < 2 then response.write " " else Response.Write " " end if else if cint(rs("date") - now()) < 2 then response.write " " else Response.Write " " end if end if %> &cpage=<%=cPage %>&fnum=<%=rs("fnum")%>&searchkey=<%=searchkey %>&searchtext=<%=searchtext%>')"> <% if rs("fnum") <> 0 then %> <%= rs("subject") %> <% else %> <%= rs("subject") %> <% end if %>	" target="_blank" title="<%= rs("ftp") %>"> <% if Ucase(left(Rs("ftp"),4))="HTTP" then %> HTTP <% else %> FTP <% end if %>	" title=<%= rs("email") %>><%= rs("writer") %>	<%= formatdatetime(rs("date"),2) %>	<%= rs("visited") %>
No Link	<%= rs("writer") %>	<%= left(rs("date"),10) %>	<%= rs("visited") %>

[ ÆäÀÌÁö: <% intNumOfPage=15 intstart = ((cpage-1) \ intNumOfPage) * intNumOfPage + 1 intEnd = (((cpage-1) + intNumOfPage) \ intNumOfPage) * intNumOfPage if Rs.Pagecount <= intEnd then intEnd = Rs.Pagecount end if if cpage > intNumOfPage then %> ÀÌÀü<%=intNumOfPage%>°³ <% End If For a = intStart To intEnd If a = cpage Then Response.Write a else %> <%=a%> <% End If Next if Rs.Pagecount > intEnd then %> ´ÙÀ½<%=intNumOfPage%>°³ <% end if %> ] <% end if %>