📄 user_bought.asp
字号:
<!--#include file="conn.asp" -->
<!-- #include file="inc/adovbs.inc" -->
<!-- #include file="inc/info.asp" -->
<!-- #include file="webtop1.asp" -->
<html>
<head>
<TITLE><%=webname%>--会员管理中心</TITLE>
<META http-equiv=Content-Type content="text/html; charset="<%=charset%>">
<META name="keywords" content="<%=keywords%>">
<META name="description" content="<%=description%>">
<link href="images/yq_style.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY bgColor=#ffffff leftMargin=0 onmouseover=exitpop=false text=#000000 topMargin=0 marginheight="0" marginwidth="0">
<%
response.buffer=true
'on error resume next
dim user
user=session("user")
if user="" then
response.redirect "login.asp"
else
sql2="select regid from users where regusername='"&user&"'"
set rs2=conn.execute(sql2)
sql="select bids.bidAmount,auctions.aucid,auctions.aucCloseDate,auctions.aucItemTitle," & _
"auctions.aucItemOwner,auctions.aucCurrentBid,auctions.aucReservePrice,auctions.aucnum " & _
"from bids left join auctions on bids.bidBidderID=auctions.aucCurrentBidder " & _
"where bidBidderID="&rs2("regid")&" and aucEnded='Y'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1%>
<table width="760" border="0" cellspacing="0" cellpadding="4" align=center>
<tr>
<td align="center" valign="top">
<span id=b2>欢迎您，<%=session("User")%> </span> </td>
</tr>
</table>
<table width="760" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td width="150" align="left" valign="top">
<!--#include file="User_left.asp" -->
</td>
<td width="5"><img src="img/tran_1.gif" width="1" height="1"></td>
<td align="left" valign="top">
<table width='100%' border=0 cellPadding=4 cellSpacing=0 id='b1'><tr><td height='10' colspan='2'></td></tr><tr>
<td height='25' >您的位置：我是买家 〉买入的商品</td>
</tr></table> <table width="100%" border="0" cellspacing="0" cellpadding="0" id="b1">
<tr>
<td width="4" valign="top" id="bg11"><img src="img/corner_1.gif" width="4" height="4"></td>
<td width="100" align="center" valign="bottom" id="bg11"><font color="#FFFFFF">买入的商品</font></td>
<td width="4" valign="top" id="bg11"><img src="img/corner_2.gif" width="4" height="4"></td>
<td> </td>
</tr>
<tr>
<td height="2" colspan="4" id="bg11"></td>
</tr>
</table>
<table border=0 cellPadding=0 cellSpacing=0 width="100%">
<tr>
<td height="10">
<table width="100%" border="0">
<tr>
<td width="40%">商品名称</td>
<td width="10%">
<div align="center">现价</div>
</td>
<td width="10%">我的出价</td>
<td width="15%">
<div align="center">卖家信用</div>
</td>
<td width="15%">剩余时间</td>
</tr>
<%if rs.eof then
response.write "您没有买入商品！请选择商品目录先参加拍卖！"
' response.end
else
rs.movelast
for i =0 to rs("aucnum")-1
%>
<tr>
<td width="40%"> <a href=viewaucid.asp?aucid=<%=rs("aucid")%> target=_blank><%=rs("aucItemTitle")%></a></td>
<td width="10%"> <%=rs("aucCurrentBid")%></td>
<td width="10%">
<%sqlmybid="select bidAmount from bids left join users on bids.bidBidderID=users.regid where regusername='"&session("user")&"'"
set rsmybid=conn.execute(sqlmybid)
response.write rsmybid("bidAmount")
%>
</td>
<td width="15%">
<%
sqlsellcredit="select credit from users where regid="&rs("aucItemOwner")
set rssqlsellcredit=conn.execute(sqlsellcredit)
if rssqlsellcredit("credit")<>"" then
response.write rssqlsellcredit("credit")
else
response.write "0"
end if
%>
</td>
<td width="15%">
<%
date2 = rs("aucCloseDate")
date1 = now()
sDate = DateDiff("s", date1, date2) '总秒数
sDay = fix(sDate/60/60/24) '天数
sDate1 = sDate mod 60*60*24 '余数
sHour = fix(sDate1/60/60) '小时
sDate2 = sDate1 mod 60*60 '余数
sMinute = fix(sDate2/60) '分钟
sDate3 = sDate2 mod 60 '余数
if sDay>0 then
response.write sDay & "天"
end if
if sDay=0 and shour>=0 then
'and sHour=0 and sMinute=0 and sDate3=0
'response.write sDay & "天" & sHour & "小时" & sMinute & "分钟" & sDate3 & "秒"
response.write sHour & "小时"
end if
if sDay=0 and shour=0 and sMinute>=0 then
response.write sMinute & "分钟"
end if
if sDay=0 and shour=0 and sMinute=0 and sDate3>=0 then
response.write sDate3 & "秒"
end if
if sDate3<0 then
response.write "结束"
end if
%>
</td>
</tr>
<%
next
end if
end if%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!-- #include file="copyright.asp" -->
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -