📄 vqqqykjbought.asp
字号:
<!-- #include file="inc/char.asp" -->
<!-- #include file="conn.asp" -->
<!-- #include file="inc/adovbs.inc" -->
<!-- #include file="head2.asp" -->
<!-- #include file="chksession.asp" -->
<!--#include file="perpage.asp"-->
<html>
<head>
<TITLE><%=webname%>--会员管理中心---联系QQ:6439358，联系邮箱vqqq59r@163.com，网站www.vqqq.com，谢谢大家对我们系统的支持</title>
<META http-equiv=Content-Type content="text/html; charset="<%=charset%>">
<META name="keywords" content="<%=keywords%>">
<META name="description" content="<%=description%>">
<link href="images/main_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")
sql2="select regid from users where regusername='"&user&"'"
set rs2=conn.execute(sql2)
%>
<table width="760" border="0" cellspacing="0" cellpadding="0" align=center>
<tr>
<td width="150" align="left" valign="top">
<!--#include file="vqqqleft.asp" -->
</td>
<td width="5"> </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 id="bg11"> </td>
</tr>
</table>
<table border=0 cellPadding=0 cellSpacing=0 width="100%">
<tr>
<td height="10">
<table width="100%" border="0" cellspacing=1 cellpadding=0 class=tablebg>
<%
Set mypage=new xdownpage '创建对象
mypage.getconn=conn '得到数据库连接
mypage.getsql="select *,auctions.aucid,auctions.aucItemTitle,auctions.aucItemOwner,auctions.aucnum " & _
"from ykjbids,auctions where ykjbiditemid=aucid and ykjbidbidderID="&rs2("regid")
mypage.pagesize=jsperpage '设置每一页的记录
set rs=mypage.getrs() '返回Recordset
if rs.eof then
response.write "<tr><td align=center class=td>您没有竞标商品！请选择商品目录先参加拍卖！</td></tr>"
else
%>
<tr class=titletd>
<td width="40%" align="center" class=td1>商品名称</td>
<td width="10%" align="center" class=td1>我的出价</td>
<td width="10%">
<div align="center" class=td1>购买数量</div>
</td>
<td width="15%">
<div align="center" class=td1>卖家联系方式</div>
</td>
<td width="15%" align="center" class=td1>剩余时间</td>
</tr>
<%
for i=1 to mypage.pagesize '接下来的操作就和操作一个普通Recordset对象一样操作
if not rs.eof then '这个标记是为了防止最后一页的溢出
%>
<tr class=td>
<td width="40%" class=td1> <a href=aucinfo.asp?aucid=<%=rs("aucid")%> target=_blank>
<%
auctitle=rs("aucItemTitle")
if len(auctitle)>28 then
auctitle=left(auctitle,25)&"..."
response.write auctitle
else
response.write auctitle
end if
%>
</a></td>
<td width="10%" align="center" class=td1>
<%sqlmybid="select ykjbidAmount,ykjbidbidderid,ykjbidsellerid from ykjbids left join users on ykjbids.ykjbidbidderID=users.regid where regusername='"&session("user")&"'"
set rsmybid=conn.execute(sqlmybid)
response.write rsmybid("ykjbidAmount")
%>
<td width="10%" align="center" class=td1><%=rs("ykjbidnum")%></td>
</td>
<%
ukey=rsmybid("ykjbidsellerid")
keytype="uid"
%>
<!--#include file="inc/calluser.asp"-->
<td width="15%" class=td1 align="center"><a href="dispykjseller.asp?ykjbid=<%=rs("ykjbidid")%>"><%=rs_user("regusername")%></a>
</td>
<td width="15%" align="center" class=td1>
</td>
</tr>
<%
rs.movenext
else
exit for
end if
next
%>
<tr><td colspan=5 class=td><center><font class=td><% mypage.showpage() %></font></center></td></tr>
<%
end if
%>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body></html>
<!-- #include file="bottom.asp" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -