📄 say.asp
字号:
<%@ language="vbscript" %>
<%
idname=trim(request("id"))
if idname="" then
response.write "操作错误"
response.end
else
id=Cint(idname)
end if
set conn=server.createobject("ADODB.connection")
conn.open "DBQ=" & server.MapPath("datebase.mdb") & ";DRIVER={Microsoft Access Driver (*.mdb)}"
set rs=conn.execute("select * from goodslist where id=" & id)
set ur=conn.execute("select * from onsell where 商品id='" & idname & "' order by 叫价 desc")
%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="80%" style="font-size: 9pt"
height="85">
<tr>
<td width="25%" height="19">拍卖商品名称</td>
<td width="25%" height="19"><%=rs("商品名称")%></td>
<td width="25%" height="19">代号</td>
<td width="25%" height="19"><%=rs("商品代号")%></td>
</tr>
<tr>
<td width="25%" height="19">底价</td>
<td width="25%" height="19"><%=rs("底价")%></td>
<td width="25%" height="19">目前最高叫价</td>
<td width="25%" height="19"><%
if ur.eof then
%>目前没有任何叫价<%
else
%><%=ur("叫价")%><%
end if%>
</td>
</tr>
<tr>
<td width="25%" height="19">叫价单位</td>
<td width="25%" height="19"><%=rs("叫价单位")%></td>
<td width="25%" height="19">开始日期</td>
<td width="25%" height="19"><%=rs("开始日期")%></td>
</tr>
<tr>
<td width="25%" height="20">最后成交日期</td>
<td width="25%" height="20"><%=rs("成交日期")%></td>
<td width="25%" height="20">图片</td>
<td width="25%" height="20"></td>
</tr>
</table>
</center></div>
<hr>
<%=rs("介绍")%>
<hr><%
if ur.eof then%>
目前没有任何叫价
<%else%>
<div align="center"><center>
<table border="1" cellpadding="0" cellspacing="0" width="80%" style="font-size: 9pt">
<tr>
<td width="17%" align="center">叫价用户</td>
<td width="13%" align="center">目前叫价</td>
<td width="18%" align="center">状态</td>
<td width="52%" align="center">留言</td>
</tr>
<%
mc=1
do until ur.eof
%>
<tr>
<td width="17%" align="center"><%=ur("叫价用户")%></td>
<td width="13%" align="center"><%=ur("叫价")%></td>
<td width="18%" align="center"><%
if mc=1 then%>
领先<%
else%>
出局<%
end if%></td>
<td width="52%" align="center"><%=ur("留言")%></td>
</tr>
<%
mc=mc+1
ur.movenext
loop
%>
</table>
</center></div>
<%end if%>
<a href="jj.asp?id=<%=idname%>">我要叫价</a>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -