⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pjseller.asp

📁 AspEase Auction System Ver2.0/动易拍卖系统 Ver2.0
💻 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 + -