<% 
	data_path="../../" 'ACC连接数据库路径，对SQL无效
	numid="144"
	dir="no" 
  %>
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../inc/filesystem.asp"-->
 <!--#include file="../../inc/safe.asp"--> 
 <!--#include file="../rolecheck.asp"-->


 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<LINK href="../css/style.css" rel=stylesheet type=text/css>
 <title></title>
 <style type="text/css">
<!--
.STYLE1 {
	color: #0099CC;
	font-weight: bold;
}
.STYLE3 {color: #CC4A44}
.STYLE4 {color: #CE4942}
.STYLE5 {
	color: #0033FF;
	font-weight: bold;
}
-->
 </style>
  <script language="javascript">
 function gook()
 {
 var i=confirm("你确定要删除吗？");
 if(i)
 {
 return true ;
 }
 else
 {
 return false;
 }
 }
 function isdeal()
 {
  var i=confirm("注意：此操作在一个月内只能进行一次并且必须(请确保本月竞价已经结束，审核工作已经结束才执行此操作！)------竞价成功(通过审核)的记录将保存到历史记录中，请注意竞价失败的记录将被删除，当前竞价数据将全部被清空,以备下次竞价使用！");
 if(i)
 {
 return true ;
 }
 else
 {
 return false;
 }
 }
 </script> <script language="javascript">
 function isshen()
 {
 var i=confirm("请先确定该竞价者已经支付费用！该操作只在进行竞价处理操作执行前是可逆的，一旦通过审核，将在竞价处理操作执行后被删除！");
 if(i)
 {
 return true ;
 }
 else
 {
 return false;
 }
 }
 </script>
  </head>
  <%
  '--删除记录----------------------------------------
  action=Replace_Text(request("action"))
  delid=Replace_Text(request("delid"))
  ratedeal=Replace_Text(request("ratedeal"))
  if action<>"" and delid<>"" then 
  conn.execute "delete from yixiang_history_price where id="&delid
   end if
   
   %>
  <body>
<table cellpadding="1" cellspacing="1" border="0" width="100%" class="tableBorder" align="center">
    <tr align="center">
      <th height="25" align="center"><span class="tableHeaderText"><strong>历史竞价数据管理</strong></span> </th>
    </tr>
	<tr><td align="left">&nbsp;<font  color="red">◆</font>	操作提示：<font color="red">本系统针对每个关键字的竞价最多只保留前三名的成功记录！第三名以后的将全部删除！</font>
	</td></tr> 	
</table>
   <table cellpadding="0"   bordercolor="#EBF1FA" cellspacing="0" border="1" width="98%"  align="center">
     <tr ><td   >
  <table cellpadding="0"   bordercolor="#EBF1FA" cellspacing="0" border="0" width="100%"  align="center">
      <tr><td colspan="7" align="center" height="1" bgcolor="#D1D1D1"></td></tr>
         <tr height="25" bgcolor="#C6CFE7" style="color:#000000"><td width="28%"  >&nbsp; 竞价的关键词 </td>
         <td width="32%"  >竞价公司</td>
         <td width="9%"  > 竞价金额 </td>
         <td width="16%"  > 竞价时间 </td>
          <td width="5%">操作</td>
         </tr>
		 <tr><td colspan="7" height="1"  bgcolor="#006699"></td></tr>

	 <%
	set rs=server.CreateObject("adodb.recordset")
	sql="select * from yixiang_history_price order by keywords,price desc,addtime desc "
   	rs.open sql,conn,1,1
	msg_per_page=40'定义每页显示记录条数
	if rs.eof then
	response.Write("<tr><td colspan=7 align=center height=50><font color=red>暂无任何记录!</font></td></tr>")
	end if
	if not rs.eof then 
			
	%>
	<!--#include file="../../inc/headpage.asp"-->
	<%
	j=1
 
do while not rs.eof and rowcount > 0 
%>
	 <tr <%if j mod 2=0 then response.Write("bgcolor=#F7F7F7   onMouseOut=""this.style.backgroundColor='#F7F7F7'"" onMouseOver=""this.style.backgroundColor='#D7E3F3'""") else response.Write("bgcolor=#ffffff  onMouseOut=""this.style.backgroundColor='#ffffff'"" onMouseOver=""this.style.backgroundColor='#D7E3F3'""") end if%>  height="25"><td   >
&nbsp; <font color="#4983BC"><b><%=rs("keywords")%></b> </font>  </td> <td>
<%
set rsg=server.CreateObject("adodb.recordset")
sqlg="select  * from yixiang_corporation  where id="&rs("gsid")
rsg.open sqlg,conn,1,1 
if not rsg.eof then 
%>
<a href="../vipgrade/edit.asp?id=<%=rsg("id")%>"><%=rsg("qymc")%></a>
<%
else
response.Write("不详")
end if
rsg.close
 %></td>

 <td><font color="red"><%=rs("price")%></font>&nbsp;<font color="#666666">元</font></td><td><font color="#666666"><%=rs("addtime")%></font></td>    <td><a href="history.asp?action=del&delid=<%=rs("id")%>&LogName=140" onClick="return gook();">删除</a></td>  </tr>
  <%
    j=j+1
 	rowcount=rowcount-1
	rs.movenext
 	loop
 	%>
	<tr><td colspan="7" align="center" ><%=listPages("history.asp")%></td></tr>
  <%
	rs.close
	end if
  %>
  
</table>
 	 </td>     </tr>
</table>
  </body>
</html>
<%
conn.close
set conn=nothing
%>