📄 pjseller.asp
字号:
<!--#include file="conn.asp" -->
<!--#include file="inc/check.asp"-->
<!--#include file="inc/info.asp" -->
<!--#include file="inc/const.asp" -->
<!--#include file="inc/myinc.asp" -->
<%response.buffer=true
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: byhucn@126.com,lzz9812@163.com
'=========================================================
'
'FileName: pjseller.asp
'Version:2.0
'UpdateTime: 2004-10-4 12:40:35
'Script Written by www.aspease.com
'=========================================================
stats=easepjsellerstats
header
activeonline
sql="select * from gets,auctions where auc_id=get_itemid and get_buyerid="&sqlval(userid)&" order by get_date desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
totalcs=rs.recordcount
mytabletop
mynavtop easepjsellerstats
mycontenttop "26%,12%,10%,22%,15%,*|"&easepjsellertoplist
if rs.eof then
response.write("<tr class=tdbg2><td colspan=6>" & easepingjianull & "</td></tr>")
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=" & FVal(rs("auc_id")) &""" target=""_blank"">"& rs("auc_ItemTitle") & "</a></td>")
response.write("<td>" & FVal(rs("get_Amount")) & "</td>")
response.write("<td>" & FVal(rs("get_num")) & "</td>")
response.write("<td>" & sqldate(rs("get_date")) & "</td>")
response.write("<td>" & aspeaseusername(rs("get_sellerid")) & "</td>")
response.write("<td>")
sql5="select * from pingjia where pj_asbuyer='Y' and pj_aucid="&sqlval(rs("auc_id"))
set rs5=conn.execute(sql5)
if rs5.eof then
if datediff("d",sqldate(rs("get_date")),sqldate(now()))>=fval(pingjiatime(0)) and datediff("d",sqldate(rs("get_date")),sqldate(now()))<=fval(pingjiatime(1)) then
response.write("<a href=javascript:popw(" & FVal(rs("auc_id")) & ")>" & easepingjiavalue(0) & "</a>")
elseif datediff("d",sqldate(rs("get_date")),sqldate(now()))<fval(pingjiatime(0)) then
response.write(easepingjiavalue(3))
elseif datediff("d",sqldate(rs("get_date")),sqldate(now()))>fval(pingjiatime(1)) then
response.write(easepingjiavalue(1))
End If
Else
response.write(easepingjiavalue(2))
End If
rs5.close
response.write("</td></tr>")%>
<!--#include file="inc/libf.inc"-->
<%end if
mycontentfoot
myFPage "pjseller.asp",rst("action")
mynavfoot
mytablefoot
footer
response.Write("<script language=""javascript"">")
response.Write(chr(10))
response.Write("<!--")
response.Write(chr(10))
response.Write("function popw(id){ ")
response.Write(chr(10))
response.Write("window.open(""pingjia_toseller.asp?aucid=""+id,"""",""height=400,width=500,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no"");")
response.Write(chr(10))
response.Write("}//-->")
response.Write(chr(10))
response.Write("</script>")
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: byhucn@126.com,lzz9812@163.com
'=========================================================
'
'FileName: pjseller.asp
'Version:2.0
'UpdateTime: 2004-10-4 12:40:35
'Script Written by www.aspease.com
'=========================================================%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -