|
|
|
|
 |
|
문희철 / 2000-09-15 / 오후 2:26:12 / 211.49.9.47
조회수 : 126
|
| [질문] 오랫만에 드리는 질문이군요< |
다름이 아니라 현재 리스트에서 [이전글]1.2.3.4[다음글]....이런식으로 처리를 해줄려고 하는데 좀 처럼 안되는군요.이번것은 처음 시도거든요.예전엔 태오님의 소스 방식을 사용햇었는데,이제는 더 많은 것들을 알고 싶어지는거 있죠....
소스는 다음과 같습니다.
현재 이런 방식으로 태오님의 강좌를 이용해서 제작하였는데 잘 안되는군요.값은 뿌려지는데...넘기지 못하거든요....도와주세요...
<%
if request("page")="" then
page=1
else
page=request("page")
end if
Set db = Server.CreateObject("ADODB.Connection")
db.Open("dsn=carDB; uid=sa; pwd=")
SQL = "SELECT * FROM car2 ORDER BY num DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 1
rs.Open SQL,db,1
%>
<% if rs.BOF or rs.EOF then %>
==============>중간생략<============================================
< !--새로운 리스트 출력-- >
<%
GotoPage = Request("GotoPage")
if GotoPage = "" then
GotoPage = 1
end if
%>
< !--끝-- >
<
===>table중간생략 <=====================================================
<%
i = 1
Do until rs.EOF Or i>rs.PageSize
%>
==============>중간생략<==================================
<%
rs.MoveNext
i=i+1
loop
%>
===>중간 생략
< !--test...-- >
<%
blockPage=Int((GotoPage-1)/10)*10+1
'************************ 이전 10 개구문 시작 ***************************
if blockPage = 1 Then
Response.Write "[이전 10개] ["
Else
%>
< ahref="list.asp?GotoPage=<%=blockPage-10%>" >[이전 10개]< /a > [
<%
End If
'************************ 이전 10 개 구문 끝***************************
i=1
Do Until i > 10 or blockPage > pagecount
If blockPage = int(GotoPage) Then
%>
< font size= 2 color=gray ><%=blockPage%>< /font >
<%Else%>
< ahref="list.asp?GotoPage=<%=blockPage%>" ><%=blockPage%>< /a >
<%
End If
blockPage=blockPage+1
i = i + 1
Loop
'************************ 다음 10 개 구문 시작***************************
if blockPage > pagecount Then
Response.Write "] [다음 10개]"
Else
%>
] < ahref="list.asp?GotoPage=<%=blockPage%>" >[다음 10개]< /a >
<%
End If
'************************ 다음 10 개 구문 끝***************************
%>
< /center >
<% end if%>
< /body >
< /html >
<%
rs.Close
db.Close
Set rs = Nothing
Set db = Nothing
%>
|
|
|
|