<%
if IsNumeric(request.querystring("dch_page"))=false then
response.write "出错啦,对不起没有你要找的那一页！"
response.end
end if
%>
<!--#Include File="cw_top.asp"-->
<!--#Include file="linkdatamdb.asp"-->
<%
set cwrs=server.createobject("ADODB.Recordset")
cwsql="select * from cw_data Order By id DESC"
cwrs.open cwsql,cwconn,1,1
if not cwrs.bof and not cwrs.eof then
if request.querystring("dch_page")="" then
dch_page=1
else
dch_page=clng(request.querystring("dch_page"))
end if
cwrs.pagesize=2
cwrs.AbsolutePage=dch_page
if dch_page>cwrs.pagecount then
response.write "出错啦,对不起没有你要找的那一页！"
response.end
else
%>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
</head>
<div align="center">
<table border="0" width="768" cellpadding="0" style="border-collapse: collapse" id="table1">
<tr>
<td>
<table border="0" width="100%" cellpadding="3" id="table2">
<tr>
<td>
<table border="0" width="100%" style="border-collapse: collapse" id="table3">
<tr>
<form method="get" name="searh1" action="searh.asp">
<script language="vbscript">
function searh1_onsubmit()
if len(trim(window.document.searh1.t1.value))<2 then
msgbox("请输入要查的值！"),4+24,"提示"
window.document.searh1.t1.focus():
searh1_onsubmit=false
exit function
end if
if len(trim(window.document.searh1.t2.value))<1 then
msgbox("请输入要查的值！"),2+24,"提示"
window.document.searh1.t2.focus():
searh1_onsubmit=false
exit function
end if
end function
</script>
<td width="247">从<input type="text" name="t1" size="11">到<input type="text" name="t2" size="13"></td>
<td width="52"><select size="1" name="select1">
<option value="jj">进价</option>
<option value="ly">利润</option>
<option value="csj">出售价</option>
<option value="year">时间</option>
</select></td>
<td width="69">
<input type="submit" value="给我查" name="B2"></td>
</form>
<td width="59">关键字:</td>
<form method="get" action="searh.asp" name="searh2">
<script language="vbscript">
function searh2_onsubmit()
if len(trim(window.document.searh2.t3.value))<1 then
msgbox("请输入要查的值！"),4+24,"提示"
window.document.searh2.t3.focus():
searh2_onsubmit=false
exit function
end if
end function
</script>
<td><input type="text" name="t3" size="20"></td>
<td width="52"><select size="1" name="select2">
<option value="jj">进价</option>
<option value="csj">出售</option>
<option value="ly">利润</option>
<option value="ymd">时间</option>
<option value="address">地址</option>
<option value="zb">注备</option>
</select></td>
<td width="57">
<input type="submit" value="给我查" name="B1"></td>
</form>
<td width="58"> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table border="0" width="100%" id="table4" style="border-collapse: collapse" bgcolor="#0066FF" cellpadding="0">
<tr>
<td>
<table border="1" width="100%" style="border-collapse: collapse" id="table5" height="26" bordercolor="#FFFFFF">
<tr>
<td width="82" align="center">进价</td>
<td width="93" align="center">出售价</td>
<td width="93" align="center">利润</td>
<td align="center">时间</td>
<td width="144" align="center">拿货地址</td>
<td width="192" align="center">注备</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table border="1" width="100%" style="border-collapse: collapse" id="table6" bordercolor="#FFFFFF">
<%for cw=1 to cwrs.pagesize
if cwrs.bof or cwrs.eof then exit for
%>
<tr>
<td width="82">
<p align="right"><b><font size="2"><%=cwrs("jj")%>￥</font></b></td>
<td width="93">
<p align="right"><b><font size="2"><%=cwrs("csj")%>￥</font></b></td>
<td width="93">
<p align="right"><b><font size="2"><%=cwrs("ly")%>￥</font></b></td>
<td width="135"><%=cwrs("year")%><%=cwrs("month")%><%=cwrs("day")%></td>
<form method="POST" action="">
<td>
<p align="center">
<textarea rows="1" name="S1" cols="13" style="border: 1px solid #0066FF; padding: 0; background-color:#0066FF"><%=cwrs("hour")%><%=cwrs("address")%></textarea></td>
<td width="192">
<p align="center">
<textarea rows="1" name="S2" cols="18" style="border: 1px solid #0066FF; background-color:#0066FF; padding-left:1px; padding-right:0; padding-top:0; padding-bottom:0"><%=cwrs("bz")%></textarea></td>
</form>
</tr>
<%
cwrs.movenext
next
end if
%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<div align="center">
<table border="0" width="768" cellpadding="0" style="border-collapse: collapse" id="table7">
<tr>
<td>
<p align="center">
<%="共"%><%=cwrs.recordcount%><%="条" &" "%>
<%
for b=1 to cwrs.pagecount
if b=dch_page then
response.write b &" "
else
response.write "<a href='show_data.asp?dch_page="&b&"'>"&b&" </a> "
end if
if b mod 16=0 then response.write "<br>"
next
%>
<%=" "%><%="共"%><%=cwrs.pagecount%><%="页"%><%="当前"%><%response.write "/"%><%=dch_page%><%="页"%>
<select size="1" name="select" onchange="javascript:location=this.options[this.selectedIndex].value;">
<option value="第<%=dch_page%>页">第<%=dch_page%>页</option>
<%
for dch=1 to cwrs.pagecount
if dch<>dch_page then
%>
<option value="show_data.asp?dch_page=<%=dch%>">第<%=dch%>页</option>
<%
end if
next
end if
%>
</select></td>
</tr>
</table>
</div>
</div>
