|
|
|
|
 |
| Home
> News |
|
|
| |
|
번호
|
제목
|
글쓴이
|
등록일
|
<%Response.Expires=0%>
<%
select case Request.QueryString("page")
case ""
session("currentpage") = 1
case "next"
session("currentpage") = session("currentpage") + 1
case "previ"
session("currentpage") = session("currentpage") - 1
end select
%>
<%
'이 부분은 페이지로 직접 접근하는 부분이다.
If Request.QueryString("GoTopage") <> "" then
session("currentpage") = Cint(Request.QueryString("GoTopage"))
end if
%>
<%
set conn=server.createobject("ADODB.connection")
conn.open "goto_dsn","sa","goto1234"
sqlstring = "select * from tb_news order by num desc"
set rs=server.createobject("adodb.recordset")
rs.pagesize = 10
rs.open sqlstring,conn,1
%>
<%rs.absolutePage = session("currentpage")%>
<% i=1
do until rs.eof or i>rs.pagesize%>
| <%=rs("num")%> |
&visit=<%=rs("visit")%>"><%=rs("subject")%> |
관리자 |
<%=rs("nalja")%> |
 |
<%rs.movenext
i=i+1
loop
%>
|
|
|
|
<% If Session("CurrentPage") > 1 then %>
">◀
<%else%>◀
<% end if %>
<%if rs.PageCount > 0 then %>
<% for Gopage = 1 to rs.PageCount %>
<%if Gopage <> session("currentpage") then%>
["><%=Gopage%>]
<%else%>
[<%=Gopage%>]
<%end if%>
<% next %>
<%end if%>
<% If Session("CurrentPage") < rs.PageCount then %>
">▶
<%else%>▶
<% end if
rs.close
%>
|
|
|
| |
|
|
|
|
|
|
