📄 old_view.asp
字号:
<TD width=150 background=../img/news4a.gif>
<IMG height=9
src="../img/arr_w2.gif" width=9> <font color="#FFFFFF"><b>
<a href="oldsc.asp"><font color=#FFFFFF>二手市场</font></a>-->产品列表</b></font></TD>
<TD width=5><IMG height=30 src="../img/news2a.gif" width=5></TD>
<TD background=../img/news5a.gif> </TD>
<TD width=5><IMG height=30 src="../img/news3a.gif"
width=5></TD></TR></TBODY></TABLE>
</div>
<TABLE height=3 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<div align="right">
<TABLE class=out4s_green cellSpacing=0 cellPadding=0 width=705 border=0>
<TBODY>
<TR>
<TD vAlign=top>
<TABLE height=5 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=700 align=center
border=0><TBODY>
<table width="705" height="129" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="129" align="center" valign="top"> <table width="100%" height="129" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top">
<table width="705" border="0" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr bgcolor="#7cb721" class="black">
<td width="66" height="22" align="center"> <div align="center" class="black"><FONT color=#ffffff>买或卖</FONT></div></td>
<td width="168" align="center" bgcolor="#7cb721">
<div align="center"><FONT color=#ffffff>物品类别</FONT></div></td>
<td width="229" align="center" bgcolor="#7cb721">
<div align="center"><FONT color=#ffffff>物品名称</FONT></div></td>
<td width="138" align="center"> <div align="center"><FONT color=#ffffff>价格（￥）</FONT></div></td>
</tr>
<%
dim curpage
if request.querystring("curpage")="" then
curpage=1
else
curpage=request.querystring("curpage")
end if
stype=changechr(request("stype"))
const numperpage=15
set rs=server.createobject("adodb.recordset")
sql="select * from oldsc "
if stype<>"" then
sql=sql & " where stype='"&stype&"'"
end if
sql=sql & " order by dateandtime desc"
rs.open sql,conn,1,1
if not rs.eof then
rs.pagesize=numperpage
dim totalpages
totalpages=rs.pagecount
rs.absolutepage=curpage
end if
dim count
count=0
do while not rs.eof and count<numperpage
If count mod 2=0 Then
bgcolor="#FEFAEE"
Else
bgcolor="#FFFFFF"
End If
%>
<tr onMouseOver="this.style.backgroundColor='#dcf3da';" onMouseOut="this.style.backgroundColor='<%=bgcolor%>'" bgcolor="<%=bgcolor%>">
<td height="25" align="center" class="black"> <div align="center">
<%
select case trim(rs("buyorsell"))
case "出售"
response.write"<font color=#FF0000>"&trim(rs("buyorsell"))&"</font>"
case "求购"
response.write"<font color=#006699>"&trim(rs("buyorsell"))&"</font>"
end select
%>
</div></td>
<td height="25" align="center" class="black"> <div align="center"><A href="javascript:;" class="linkone"> <a href=old_detail.asp?id=<%=trim(rs("id"))%>><%=trim(rs("stype"))%></a></A></div></td>
<td height="25" align="center" class="black"> <div align="center"><A href="javascript:;" class="linkone" ><a href=old_detail.asp?id=<%=trim(rs("id"))%>><%=trim(rs("prname"))%></a></A></div></td>
<td height="25" align="center" class="black"> <div align="center"><A href="javascript:;" class="linkone" ><a href=old_detail.asp?id=<%=trim(rs("id"))%>><%=trim(rs("price"))%></a></A></div></td>
</tr>
<%
rs.movenext
count=count+1
loop
rs.close
set rs=nothing
%>
</table>
<table width="95%" height="75" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="75"> <form name="form2">
<div align="center"><span class="black">
<% if cint(curpage)<>1 then %>
<a href="old_view.asp?curpage=1&stype=<%=trim(request("stype"))%>" class="linkone">首页 </a>
<% else %>
首页
<% end if %>
<% if cint(curpage)>1 then %>
<a href="old_view.asp?curpage=<%=curpage-1%>&stype=<%=trim(request("stype"))%>" class="linkone">上一页 </a>
<% else %>
上一页
<% end if %>
<% if cint(curpage)<>cint(totalpages) then %>
<a href="old_view.asp?curpage=<%=curpage+1%>&stype=<%=trim(request("stype"))%>" class="linkone"> 下一页
<% else %>
下一页
<% end if %>
<% if cint(curpage)<>cint(totalpages) then %>
</a><a href="old_view.asp?curpage=<%=totalpages%>&stype=<%=trim(request("stype"))%>" class="linkone"> 末页
<% else %>
末页
<% end if %>
</a> 第<font color="#FF0000"><%=curpage%></font>页/共<%=totalpages%>页 </span>
<select name="menu1" onChange="MM_jumpMenu('parent',this,0)">
<option value="#" selected>请选择</option>
<option>
<%
kkpage=1
do while kkpage<=totalpages
%>
</option>
<option>
<%
kkpage=1
do while kkpage<=totalpages
%>
</option>
<option>
<%
kkpage=1
do while kkpage<=totalpages
%>
</option>
<option value="old_view.asp?curpage=<%=cint(kkpage)%>&stype=<%=trim(request("stype"))%>">第<%=cint(kkpage)%>页</option>
<option>
<%
kkpage=kkpage+1
loop
%>
</option>
<option>
<%
kkpage=kkpage+1
loop
%>
</option>
<option>
<%
kkpage=kkpage+1
loop
%>
</option>
</select>
</div>
</form></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></TR></TBODY></TABLE>
</div>
<TABLE height=5 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<div align="right">
<TABLE cellSpacing=0 cellPadding=0 width=708
background=../img/bomgreen2.gif border=0>
<TBODY>
<TR>
<TD width=20>
<IMG height=27 src="../img/bomgreen1.gif"
width=13></TD>
<TD align=right>
</TD></TR></TBODY></TABLE></div>
</TD></TR></TBODY></TABLE>
<!--#include file="../end.asp"-->
</BODY></HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -