buying.asp

AspEase Auction System Ver2.0/动易拍卖系统 Ver2.0

<!--#include file="conn.asp" -->
<!--#include file="inc/check.asp"-->
<!--#include file="inc/info.asp" -->
<!--#include file="inc/const.asp" -->
<!--#include file="inc/myinc.asp" -->
<%
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: [e-mail],[e-mail]
'=========================================================
'
'FileName: buying.asp
'Version:2.0
'UpdateTime: 2004-10-3 19:45:45
'Script Written by www.aspease.com
'=========================================================
stats=easebuyingstats
header
call activeonline()
sql="select auc_itemtitle,biditemid,bidAmount,bidsellerid,bidBidderID,bidid from auctions left join bids on auctions.auc_id=bids.biditemid where bidBidderID="&userid&" order by bidid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
totalcs=rs.recordcount
mytabletop
mynavtop easebuyingstats
mycontenttop "34%,13%,14%,12%,14%,*|"&easebuyingtoplist
if rs.eof and rs.bof then 
response.write tr2&"<td colspan=""6"">"&easebuyingnull&ctdr
else
auction_page=10%><!--#include file="inc/libt.inc"--><%
response.Write("<tr align=""center"" valign=""middle"" height=25 ")
if i mod 2 =0 then
response.Write("class=tdbg2")
else
response.Write("class=tdbg1")
end if
response.Write(">")
response.Write("<td><a href=viewitem.asp?aucid=" & rs(1) & " target=_blank>" & rs(0) & "</a></td>")
response.Write("<td>" & auccurrentbid(sqlval(rs("biditemid"))) & "</td>")
response.Write("<td>" & FVal(rs("bidAmount")) & "</td>")
response.Write("<td>" & seecredit(rs("bidsellerid")) & "</td>")
response.Write("<td>" & auclefttime(sqlval(rs("biditemid")),"short") & " </td>")
response.Write("<td>" & easechengjiao(rs("biditemid"),rs("bidBidderID"),rs("bidid")) & ctdr)
%><!--#include file="inc/libf.inc"--><%
end if
Mycontentfoot
MyFPage "buying.asp",""
mynavfoot
mytablefoot
footer
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: [e-mail],[e-mail]
'=========================================================
'
'FileName: buying.asp
'Version:2.0
'UpdateTime: 2004-10-3 19:45:45
'Script Written by www.aspease.com
'=========================================================
%>