ASP advanced article online Management Update (vii)

ASP advanced article online Management Update--Homepage and search
Author: Beach Boy
After the addition of the article, save, display, so now it's time to talk about the management of the display of the main page, that is, to display the title of all articles connected to facilitate the viewer to find articles, it should have the function: Display all the article title connection, add date, browse times and other information, but also must provide paging function, Otherwise, the title of so many articles in a page are displayed, it will be very time-consuming and inconvenient to browse, in addition because this program here combined with the article column search function, so here will also be introduced.
The following is a detailed introduction to the main page of the index.asp of these functions of the implementation process and its specific functions:
"Establish a database connection
<!--#include file= "conn.asp"-->
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
<title>asp Special Section </title>
<meta name= "generator" content= "Microsoft FrontPage 3.0" >
<link rel= "stylesheet" type= "Text/css" href= "Style.css" >
<script language= "JavaScript" >
function popwin2 (path)
{window.open (Path, "", "Height=450,width=600,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no, Location=no ");
}
</script>
<%
"Define the maximum article title per page maxperpage, you can modify the number here to achieve your best display effect
Const MAXPERPAGE=18
Dim totalput
Dim currentpage
Dim totalpages
Dim i,j
"If the returned page information is empty, that is, if you enter index.asp directly, then use the first page of the pages defined here
If not IsEmpty (Request ("page") Then
Currentpage=cint (Request ("page")
Else
Currentpage=1
End If
Dim sql
Dim rs
Dim Rstype
Dim typesql
Dim typeid,typename
"If the returned column information is empty, then use the column defined here, where the third column is specified
If not IsEmpty (Request ("typeID")) Then
Typeid=request ("typeID")