📄 showsubclass.asp
字号:
<!--
版本：草原二手市场V1.1
本程序作者：mysql QQ:54016224 TEL:13036133798
-->
<!--#include file = "head.asp" -->
<!--主体1-->
<table width="1000" border="0" cellpadding="0" cellspacing="2" bgcolor="#F0F9FB">
<tr>
<td width="785" height="883" valign="top" class="pgray12">
<!-- body1 left -->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="225" align="center" valign="top"> <table width="218" border="0" cellpadding="0" cellspacing="1" bgcolor="#C5DCE2">
<tr>
<td bgcolor="#F0F9FB" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/e_title_userlogin1.gif" width="218" height="21"></td>
</tr>
<tr>
<td><iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="login.asp" width="100%" height=85></iframe> </td>
</tr>
<tr>
<td height="1" bgcolor="#C5DCE2"></td>
</tr>
<tr>
<td align="center" height="50"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" width="50%"><a href="sign_in.asp"><img src="images/button_user_reg.gif" width="87" height="24" border="0"></a></td>
<td align="center"><img src="images/button_user_getps.gif" width="87" height="24"></td>
</tr>
</table></td>
</tr>
<tr>
<td height="1" bgcolor="#C5DCE2"></td>
</tr>
<tr>
<td height="150" valign="top" align="center">
<!-- notice -->
<marquee scrollAmount="2" width="200" height="140" direction="up" onmouseover='this.stop()' onmouseout='this.start()'>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
<table width="200" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="font-12px120-000000"><img src='images/arrow_orange7.gif' width='13' height='11'>
<font color="#0066CC">二手市场二手市场二手市场二手市场二手市场二手市场！</font></td>
</tr>
<tr>
<td height="5" ></td>
</tr>
</table>
</marquee>
<!-- notice end -->
</td>
</tr>
</table> </td>
</tr>
</table>
<table width="218" border="0" cellpadding="1" cellspacing="1" bgcolor="#C5DCE2">
<tr>
<td bgcolor="#f0f9fb"><img src="images/infolist.gif" width="218" height="21"></td>
</tr>
<tr>
<td bgcolor="#f0f9fb"><table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td bgcolor="#f0f9fb" height=540> <iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="html/Categories.html" width="100%" height=540 style="backgroud:#f0f9fb">
</iframe> </td>
</tr>
</table> </td>
</tr>
</table></td>
<td valign="top"><!--#include file="include/conn.asp"-->
<!--#include file="include/function.asp"-->
<%
SubIndexNO = toValidChar(request("SubIndexNO"))
sql = "select * from Info where SubIndexNO = '"&SubIndexNO&"'"
set rs = server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
'********************分页模块******************************'
apage = trim(request("page"))
rs.pagesize = 10
pagesize = rs.pagesize
totalnum = rs.recordcount
pagenum = cint(totalnum/pagesize) + 1
if not IsNumeric(apage) then
apage = 1
if not rs.eof and not rs.bof then
rs.absolutepage = apage
page = rs.absolutepage
end if
else
apage = abs(cint(apage))
'*************************************
if apage <= 0 then
if not rs.eof and not rs.bof then
rs.absolutepage = 1
page = rs.absolutepage
end if
else
if apage > pagenum then
if not rs.eof and not rs.bof then
rs.absolutepage = pagenum
page = rs.absolutepage
end if
else
if not rs.eof and not rs.bof then
rs.absolutepage = apage
page = rs.absolutepage
end if
end if
end if
'*************************************
end if
'response.write page
'response.write page
'************************分页模块end*********************************'
sql ="select SubName from SubClass where SubIndexNO = '"&SubIndexNO&"'"
set rs1 = conn.execute(sql)
i = 0
%>
<div align="right"><a href ="?page=<%=abs(page)-1%>&SubIndexNO=<%=SubIndexNO%>">上一页</a><font color="red">|第<%=abs(page)%>页|</font><a href ="?page=<%=abs(page)+1%>&SubIndexNO=<%=SubIndexNO%>">下一页</a></div>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<TR>
<TD width=20 background=images/top_left.gif
height=20></TD>
<TD width=530 background=images/top_mid.gif
colSpan=2><FONT color=#ffffff><STRONG>
<%if not rs1.eof and not rs1.bof then response.write rs1(0)%>
</STRONG></FONT></TD>
<TD width=20 background=images/top_right.gif
height=20></TD>
</TR>
<%if rs.eof and rs.bof then%>
<TR>
<TD height=20 colspan="4">
<table width="100%" border="0">
<tr>
<td colspan="3">还没有信息</td>
</tr>
</table></TD>
</TR>
<%end if%>
<% do while not rs.eof and not rs.bof
i = i + 1
if i > 10 then exit do
select case rs("InfoStatus")
case 0
getStatus = "供"
case 1
getStatus = "求"
end select
%>
<TR>
<TD height=20 colspan="4">
<table width="100%" border="0">
<tr>
<td width="45%">[<font color="#ff0000"><%=getStatus%></font>]</td>
<td width="35%"><a href=showInfo.asp?InfoID=<%=rs("InfoID")%>><%=rs("InfoName")%></a></td>
<td width="20%"><%=rs("PostTime")%></td>
</tr>
</table></TD>
</TR>
<%
rs.movenext
loop
%>
</table> </td>
</tr>
</table>
<!-- body1 left end-->
</td>
<td bgcolor="#F2F2F2" valign="top">
<!-- body1 right-->
<iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="updatelist.asp" width="100%" height="100%"></iframe>
<!-- body1 right end-->
</td>
</tr>
</table>
<!-- copyright -->
<table width="1002" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="3" bgcolor="#FFFFFF"></td>
<td bgcolor="#FFFFFF">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr align="center" valign="top">
<td width="20" height="104"> </td>
<td width="950">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="right"><a href="#"><img src="images/i_but_top.gif" width="43" height="37" border="0"></a></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="74%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td width="121" rowspan="2"> </td>
<td width="10" rowspan="2"> </td>
<td width="492"><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_about.gif" height="14" border="0" width="57"></a><a href="http://www.vvcat.com"><img src="images/i_menu_c.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_wor.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_ser.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_declare.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_s.gif" width="63" height="14" border="0"></a><a href="http://www.vvcat.com" target="_blank"><img src="images/i_menu_h.gif" width="31" height="14" border="0"></a>
</td>
</tr>
<tr>
<td height="5" width="492"></td>
</tr>
</table>
</td>
<td width="26%" valign="bottom"> </td>
</tr>
</table>
</td>
<td width="20"> </td>
</tr>
</table>
</td>
<td width="3" bgcolor="#FFFFFF"></td>
<td width="1"></td>
<td width="7"></td>
</tr>
</table>
<!-- copyright end -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -