📄 showbigclass.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"> <iframe frameborder="0" marginheight="0" marginwidth="0" scrolling="no" src="html/Categories.html" width="100%" height=520 style="backgroud:#f0f9fb">
</iframe> </td>
</tr>
</table> </td>
</tr>
</table></td>
<td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td></td>
</tr>
<tr>
<td>
<!--#include file="include/conn.asp"-->
<!--#include file="include/function.asp"-->
<%
BigIndexNO = toValidChar(request("BigIndexNO"))
sql = "select BigName from BigClass where BigIndexNO = '"&BigIndexNO&"'"
set rs = conn.execute(sql)
if not rs.eof and not rs.bof then
BigName = rs(0)
%>
<table width="100%" border="0">
<tr>
<td class="font-12px120-999999">信息大类：<%=BigName%></td>
</tr>
</table>
<%
else
response.write "<script>alert('对不起该类不存在');history.go(-1);</script>"
response.End()
end if
'if not rs.eof and not rs.bof then
sql = "select * from SubClass where BigIndexNO = '"&BigIndexNO&"'"
set rs0 = server.CreateObject("adodb.recordset")
rs0.open sql,conn,1,1
'end if
do while not rs0.eof and not rs0.bof
%>
<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><%=rs0("SubName")%></STRONG></FONT></TD>
<TD width=20 background=images/top_right.gif
height=20></TD>
</TR>
<TR>
<TD height=20 colspan="4">
<%
sql = "select * from Info where SubIndexNO = '"&rs0("SubIndexNO")&"'"
set rs1 = server.CreateObject("adodb.recordset")
rs1.open sql,conn,1,1
'********************分页模块******************************'
apage = trim(request("page"))
rs1.pagesize = 10
pagesize = rs1.pagesize
totalnum = rs1.recordcount
pagenum = cint(totalnum/pagesize) + 1
if not IsNumeric(apage) then
apage = 1
if not rs1.eof and not rs1.bof then
rs1.absolutepage = apage
page = rs1.absolutepage
end if
else
apage = abs(cint(apage))
'*************************************
if apage <= 0 then
if not rs1.eof and not rs1.bof then
rs1.absolutepage = 1
page = rs1.absolutepage
end if
else
if apage > pagenum then
if not rs1.eof and not rs1.bof then
rs1.absolutepage = pagenum
page = rs1.absolutepage
end if
else
if not rs1.eof and not rs0.bof then
rs1.absolutepage = apage
page = rs1.absolutepage
end if
end if
end if
'*************************************
end if
'************************分页模块end*********************************'
%>
<div align="right"><a href ="?page=<%=abs(page)-1%>&BigIndexNO=<%=BigIndexNO%>">上一页</a><font color="red">|第<%=abs(page)%>页|</font><a href ="?page=<%=abs(page)+1%>&BigIndexNO=<%=BigIndexNO%>">下一页</a></div>
<table width="100%" border="0">
<%
i = 0
do while not rs1.eof and not rs1.bof
i = i + 1
if i > 10 then exit do
select case rs1("InfoStatus")
case 0
getstatus = "供"
case 1
getstatus = "求"
end select
%>
<tr>
<td width="41%">[<font color="#FF0000"><%=getStatus%></font>]</td>
<td width="30%"><a href=showInfo.asp?InfoID=<%=rs1("InfoID")%> target="_parent"><%=rs1("InfoName")%></a></td>
<td width="29%"><%=rs1("PostTime")%></td>
</tr>
<%
rs1.movenext
loop
%>
</table>
</TD>
</TR>
</table>
<%
rs0.movenext
loop
%>
</td>
</tr>
</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 + -