|
|
|
|
俵ÀÌ / 2000-09-15 / ¿ÀÈÄ 5:01:00 / 203.255.3.190
Á¶È¸¼ö : 115
|
[Áú¹®] ¿À·§¸¸¿¡ µå¸®´Â Áú¹®À̱º¿ä< |
> ´Ù¸§ÀÌ ¾Æ´Ï¶ó ÇöÀç ¸®½ºÆ®¿¡¼ [ÀÌÀü±Û]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
> %>
>
>
-----------------------------------------------------------
¸µÅ©ÇϽǶ§ a href¶ó°í ÇØ¾ß µÇ´Âµ¥ ahref¶ó°í Çؼ ¸µÅ©°¡ ¾È µÇ´Â°Å ¾Æ´Ñ°¡¿ä?
|
|
|
|