//Ӽ
<%
	id = Request("id")
	if not isnumeric(Request("id")) then id = 1
	set rs = Server.CreateObject("adodb.recordset")
	if Request("title_1")<>"" and Request("title_2")="" then
	rs.open "select id,title,title_1,name from title where tshow=true and title_1 = '"&HTMLEncode(request("title_1"))&"' order by id desc ",conn,1,3
	Else
	rs.open "select id,title,title_2,name from title where tshow=true and title_2 = '"&HTMLEncode(request("title_2"))&"' order by id desc ",conn,1,3
	End if
	if rs.eof then
	Response.Write "δҵϢ! <a href=index.asp></a> "
	Response.End
	End if
%>
//Ŀбʾ

<td width="100%" height="100%" valign="top">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
            <%
            rs.pagesize=10
            if not isnumeric(Request("Page")) then
            Page=1
            else
            page = cint(request("page"))
            End if
            if page = "" then page = 1
            if page < 1 then page=1
            if page >= rs.pagecount then page = rs.pagecount
            rs.absolutepage = page
            for i=1 to rs.PageSize
            %>
              <tr>
                <td width="100%" align="center" bgcolor="#F7F7F7">
                <p align="left">
                <%
                Response.Write "<a href=article.asp?id="&rs("id")&"&title="&rs("id")&"><font size='1' color='#808080'></font>&nbsp;"&rs("title")&"</a><font color='#808080'>[:"&rs("name")&"]</font>"
                rs.movenext
                %></td>
              </tr>
              <%if not rs.eof then%>
              <tr>
                <td width="100%" align="center">
                <p align="left">
                <%
                Response.Write "<a href=article.asp?id="&rs("id")&"&title="&rs("id")&"><font size='1' color='#808080'></font>&nbsp;"&rs("title")&"</a><font color='#808080'>[:"&rs("name")&"]</font>"
                %>
                </td>
              </tr>
              <%
              rs.movenext
              End if
              if rs.eof then exit for
              next
              %>
              <tr>
                <td width="100%" align="center">
                <hr noshade color="#C0C0C0" size="1"></td>
              </tr>
              <tr>
                <td width="100%" align="center">
                <p align="left">
                <a href="?title_1=<%=Request("title_1")%>&title_2=<%=Request("title_2")%>&page=1">һҳ</a>
                <a href="?title_1=<%=Request("title_1")%>&title_2=<%=Request("title_2")%>&page=<%=page-1%>">һҳ</a><%
if rs.pagecount<10 then
for x=1 to rs.pagecount
Response.Write("&nbsp;<a href='"&request.servervariables("document_name")&"?title_1="&Request("title_1")&"&title_2="&Request("title_2")&"&page="&x&"'>"&Replace("["&x&"]","["&page&"]","<font color=#FF0000>"&page&"</font>")&"</a>&nbsp;")
next
else
if page<10 then
for x=1 to 10
Response.Write("&nbsp;<a href='"&request.servervariables("document_name")&"?title_1="&Request("title_1")&"&title_2="&Request("title_2")&"&page="&x&"'>"&Replace("["&x&"]","["&page&"]","<font color=#FF0000>"&page&"</font>")&"</a>&nbsp;")
next
Else
if page+10>rs.pagecount then
for x=page to rs.pagecount
Response.Write("&nbsp;<a href='"&request.servervariables("document_name")&"?title_1="&Request("title_1")&"&title_2="&Request("title_2")&"&page="&x&"'>"&Replace("["&x&"]","["&page&"]","<font color=#FF0000>"&page&"</font>")&"</a>&nbsp;")
next
Else
for x=page to page+10
Response.Write("&nbsp;<a href='"&request.servervariables("document_name")&"?title_1="&Request("title_1")&"&title_2="&Request("title_2")&"&page="&x&"'>"&Replace("["&x&"]","["&page&"]","<font color=#FF0000>"&page&"</font>")&"</a>&nbsp;")
next
End if
End if
End if
%><a href="?title_1=<%=Request("title_1")%>&title_2=<%=Request("title_2")%>&page=<%=page+1%>">һҳ</a>
                <a href="?title_1=<%=Request("title_1")%>&title_2=<%=Request("title_2")%>&page=<%=rs.pagecount%>">һҳ</a></td>
              </tr>
            </table>
            </td>
          </tr>
        </table>
        </td>