|
|
<%
if rs.EOF then
%>
µî·ÏµÈ ±ÛÀÌ ¾ø½À´Ï´Ù. |
<%
else
' j = firstNum
do until rs.EOF
filename = rs("filename")
seq = rs("seq")
title = rs("title")
content = rs("content")
write_date = Left(rs("write_date"),10)
if len(title) > 18 then
title = Left(title,16) & "..."
end if
if len(content) > 60 then
content = Left(content,60) & "..."
end if
%>
|
|
<%
rs.MoveNext
loop
end if
' i = i + 1
' next
%>
|
<%
'ÆäÀÌ¡ ½ÃÀÛ
Dim ph
Set ph = New PageHelper
ph.url = "data05_list.asp?code=" & code & "&sp="&sp&"&key="&key&"&page=" 'À̵¿ÇÒ ÁÖ¼Ò ¼¼ÆÃ
ph.currentPage = page 'ÇöÀç ÆäÀÌÁö ¼¼ÆÃ
ph.totalPage = biz.getTotalPage 'Àüü ÆäÀÌÁö¼ö ¼¼ÆÃ,Àüü ÆäÀÌÁö´Â BoardManager Ŭ·¡½º¿¡¼ ã¾Æ¿Â´Ù..
ph.calPageNum()
%>
<%= ph.prevBlock(" ") %>
<%= ph.pageNum2("class='page'","",""," ") %>
<%= ph.nextBlock("") %>
|
|
|
|