📄 gongao.asp
字号:
<!--#include file="../global/inc/global.inc.asp"-->
<%
on error resume next
ClassId = Request("ClassId")
NewsType = Request("NewsType")
oConn_Start
'本页地址
thisurl = "?ClassId="&ClassId&"&NewsType="&NewsType&"&"
strPagedList = strPagedList + "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""4"">"& vbCrLf
'获取分页产品分类
strSql = strSql + "Select * From sm_Content Where ValidFlag=1"
if ClassId<>"" then strSql = strSql + " And ClassId="&ClassId
if NewsType<>"" then strSql = strSql + " And NewsType="&NewsType
strSql = strSql + " Order by NewsId Desc"
'Response.Write(strSql)
set oRs = server.CreateObject("adodb.recordset")
oRs.Open strSql,oConn,1,1
intcount = 0
pgsz=20 '设定每页显示记录数
if oRs.Eof Then
strPagedList = strPagedList &"<tr><td align=center height=25 bgcolor=white><font color=red>还没有相关的信息！</red></td></tr>"
Else
count=oRS.recordcount '记录总数
oRS.PageSize = Cint(PgSz) '页面总数
Total=INT(count / PgSz * -1)*-1 '总的页数
PageNo=Request("pageno")
if PageNo="" Then
PageNo = 1
end if
if PageNo < 1 Then
PageNo = 1
end if
oRS.AbsolutePage = PageNo
While Not oRs.Eof and intcount<pgsz
NewsId = oRs("NewsId")
NewsType = oRs("NewsType")
Title = oRs("Title")
if intcount mod 2 = 1 then
bgColor = "#f5f5f5"
Else
bgColor = "#ffffff"
End If
strPagedList = strPagedList + "<tr bgcolor=""DFDFDF""><td bgcolor="""&bgColor&"""><img src=""../images/q.gif"" width=""15"" height=""15""> <a href=""../KGNews/"&NewsId&".htm"" target=_blank>"&Title&"</a> </td></tr>"
intcount = intcount+1
oRs.MoveNext
Wend
strPageInfo = list_total(count,pageno,pgsz,total,thisurl)
End If
strPagedList = strPagedList + " </table>"& vbCrLf
oRs.Close
Set oRs = Nothing
strInterTicket = GetInterTicket()
oConn_Close
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>机票-上海神马航空特价打折飞国际机票票价查询票务中心021-51099919</title>
<link href="../style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {
font-size: 16px;
font-weight: bold;
color: #000000;
}
.style3 {font-size: 12px}
-->
</style>
</head>
<body>
<!--#include file="../include/top.asp"-->
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" width="180"> <table cellpadding="3">
<tr>
<td>
<table width="170" border="0" cellspacing="0" cellpadding="0">
<tr><td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" background="../images/nt04.gif"> </td>
</tr>
<tr>
<td><a href="http://www.shasm.com/kgNews/120.htm" target="_blank"><img src="../images/waid.gif" width="170" height="74" border="0"></a></td>
</tr>
</table>
<tr><td height="3"><img src="../images/5.gif" width="1" height="3"></td></tr>
<tr>
<td class="orgborder9"><table width="168" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" bgcolor="#DBDBDB"> <strong>上海热门国际机票搜索</strong></td>
</tr>
<tr>
<td><%=strInterTicket%></td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="images/5.gif" width="1" height="5"></td>
</tr>
</table></td>
</tr>
</table></td>
<td valign="top" width="600">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="../images/5.gif" width="1" height="5"></td>
</tr>
<tr>
<td class="orgborder"><table width="100%" border="0" cellspacing="0" cellpadding="4">
<tr>
<td><%=strPagedList%></td>
</tr>
<%=strPageInfo%>
<tr>
<td><img src="../images/5.gif" width="1" height="5"></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top" colspan="2"> </td>
</tr>
</table>
<div align=center>
<!--#include file="../include/bottom.asp"-->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -