📄 agent_dtail.asp
字号:
<%'创建时间:2004/07/12
'创建人:
'功能:用于代理统计未结算的投注
%>
<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Islogin.asp"-->
<!--#include file="Include/zc.asp"-->
<html>
<head>
<link href="include/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="refresh" content="5">
<title>无标题文档</title>
<style type="text/css">
<!--
body {
margin-top: 0px;
}
.style2 {color: #FF9900}
.unnamed1 {
color: #FF9900;
text-decoration: none;
}
.style4 {color: #FF9900; font-weight: bold; }
.style5 {
color: #FF6600;
font-weight: bold;
}
.style6 {color: #FF6600}
.style8 {color: #000000}
.style9 {color: #333333}
.style10 {color: #f2f2f2}
.style11 {color: #CC9900}
-->
</style>
<meta http-equiv="refresh" content="60">
</head>
<body>
<% '------------------------------------------------------------------------------------------------------------------------
'下级代理区：
if session("A_rank")=1 then
set Count_rs=server.createobject("adodb.recordset")
'Count_sql="select sm, u_money,Invest_second from ( select Invest_second,sm=sum(Invest_money),u_money=sum(invest_money*invest_agzc) from Invest where Invest_frist='"&session("A_name")&"' and Invest_banlance=0 group by Invest_second ) a "
count_sql="select invest_second,sm=sum(in_money),fact=sum(fact),u_money=sum(u_money) from (select invest_second,in_money=(invest_money),u_money=invest_money*invest_agzc,fact=(invest_money*(1-invest_feico)) from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_frist='"&session("a_name")&"'union all select invest_second,in_money=(invest_money*invest_zs),u_money=invest_money*invest_zs*invest_agzc,fact=(invest_money*invest_zs*(1-invest_feico)) from invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_frist='"&session("a_name")&"')i group by invest_second "
'response.write Count_sql
Count_rs.open Count_sql,conn,1,1
%>
<table border="1" width="739" cellspacing="0" cellpadding="0" bordercolor="#E0E0E0" style="border-collapse: collapse" height="10%">
<tr>
<td width="731" valign="top" height="214">
<table width="96%" align="center" border="1" cellspacing="1" bordercolor="#F2F2F2" bordercolorlight="#F2F2F2" bordercolordark="#9D9CA4">
<tr bgcolor="#E5EAEE">
<td colspan="16"><span class="style11"><a href="#"><strong>下级代理区：</strong></a><span class="style8"><strong>( 点击代理人名字，可直接查看此代理的详细投注清况)</strong></span></span></td>
</tr>
<tr align="center" bgcolor="#993300">
<td width="11%" height="25" bgcolor="#BCD5E4"><span class="style10">
<font color="#000000">代理人</font></span></td>
<td width="11%" height="25" bgcolor="#BCD5E4"><span class="style10">
<font color="#000000">投注金额</font></span></td>
<td width="19%" height="25" bgcolor="#BCD5E4"><span class="style10">
<font color="#000000">您的收入</font></span></td>
<td width="19%" height="25" bgcolor="#BCD5E4"><span class="style10">
<font color="#000000">下注期数</font></span></td>
<td width="21%" height="25" bgcolor="#BCD5E4"><span class="style10">
<font color="#000000">详细</font></span></td>
</tr>
<%
do while not Count_rs.eof
%>
<tr align="center" bgcolor="#f2f2f2">
<td><a href="A_count_detail.asp?second=<%=Count_rs("Invest_second")%>"><%=Count_rs("Invest_second")%></a> </td>
<td><%=Count_rs("sm")%> </td>
<td><%=count_rs("u_money")%> </td>
<td><%=count_issue%> </td>
<td><a href="A_count_detail.asp?second=<%=Count_rs("Invest_second")%>">详细资料</a></td>
</tr>
<% A_Total=A_Total+Count_rs("sm")
Fact3=Fact3+count_rs("u_money")'所得
Count_rs.movenext
loop
set Count_rs=nothing%>
<tr align="center" bgcolor="#f2f2f2">
<td> </td>
<td> </td>
<td colspan="4" align="left"><span class="style5"><span class="style8">总投注：<%=A_Total%></span><span class="style9">元 您能得到 <%=Fact3%>元 </span></span></td>
</tr>
</table>
<p align="center"><a href="#" onClick="location.reload()"><span style="font-size: 9pt">>>刷新此页面<<</span></a></p>
</td>
</tr>
</table>
<% else
' End
'-----------------------------------------------------------------------------------------------------%>
<%'----------------------------------------------------------------------------------------------
'会员区：
type1=request.querystring("type1")
set Count_rs2=server.createobject("adodb.recordset")
if type1="" then
count_sql2="select re=count(*), i.invest_name,total=sum(i.total),fact=sum(i.fact) from (select invest_name,total=(invest_money),fact=(invest_money*(1-invest_feico)) from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_second='"&session("a_name")&"'union all select invest_name,total=(invest_money*invest_zs),fact=(invest_money*invest_zs*(1-invest_feico)) from invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_second='"&session("a_name")&"') i group by invest_name "
else
if type1<>"4" then
Count_sql2="select re=count(*),invest_name,total=sum(invest_money),fact=sum(invest_money*(1-invest_feico)),invest_feico from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_second='"&session("a_name")&"' and invest_type="&type1&" group by invest_name,invest_feico"
else
count_sql2="select re=count(*),invest_name,total=sum(invest_money*invest_zs),fact=sum(invest_money*invest_zs*(1-invest_feico)),invest_feico from invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_second='"&session("a_name")&"' group by invest_name,invest_feico"
end if
end if
'response.write count_sql2
Count_rs2.open Count_sql2,conn,1,1
'------------------------------------------------------------------------------------------------%>
<table border="1" width="739" cellspacing="0" cellpadding="0" bordercolor="#E0E0E0" style="border-collapse: collapse" height="10%">
<tr>
<td width="731" valign="top">
<table width="96%" align="center" border="1" cellspacing="1" bordercolor="#F2F2F2" bordercolorlight="#F2F2F2" bordercolordark="#9D9CA4">
<tr align="left" bgcolor="#E5EAEE">
<td height="23" colspan="13"><strong>直属会员区：( 点击投注者名字，可直接查看此会员的详细投注清况)</strong></td>
</tr>
<tr align="center" bgcolor="#E5EAEE">
<td height="23" colspan="13"><span class="style2">
<a href="#" onClick="javascript:history.go(-1)"> </a></span>
<form name="form1" method="post" action="">
<span class="style2"><a href="#" onClick="javascript:history.go(-1)">
</a>
<input name="radio" type="radio" onclick="javascript:self.location.href='?second=<%=second1%>'" <%if type1="" then response.write "checked"%>>
全部 <input type="radio" name="radio" onclick="javascript:self.location.href='?type1=1&second=<%=second1%>'" <%if type1="1" then response.write "checked"%>>
特码
<input type="radio" name="radio" onclick="javascript:self.location.href='?type1=2&second=<%=second1%>'" <%if type1="2" then response.write "checked"%>>
正码
<input type="radio" name="radio" onclick="javascript:self.location.href='?type1=3&second=<%=second1%>'" <%if type1="3" then response.write "checked"%>>
两面 <input type="radio" name="radio" onclick="javascript:self.location.href='?type1=5&second=<%=second1%>'" <%if type1="5" then response.write "checked"%> >
波色 <input type="radio" name="radio" onclick="javascript:self.location.href='?type1=4&second=<%=second1%>'" <%if type1="4" then response.write "checked"%>> 连码 </span>
</form></td>
</tr>
<tr align="center" bgcolor="#CCCCCC">
<td width="8%" height="25" bgcolor="#BCD5E4">投注会员</td>
<td width="12%" height="25" bgcolor="#BCD5E4">投注笔数</td>
<td width="12%" height="25" bgcolor="#BCD5E4">投注金额</td>
<td width="8%" height="25" bgcolor="#BCD5E4">实投</td>
<%if type1<>"" then%>
<td width="8%" height="25" bgcolor="#BCD5E4">佣金</td>
<td width="16%" height="25" bgcolor="#BCD5E4">彩金</td>
<%end if%>
<td width="18%" height="25" bgcolor="#BCD5E4">下注期数</td>
</tr>
<%
do while not Count_rs2.eof
%>
<tr align="center" bgcolor="#f2f2f2">
<td><a href="Person_detail.asp?name=<%=Count_rs2("Invest_name")%>"><%=Count_rs2("Invest_name")%></a> </td>
<td><%=Count_rs2("re")%> </td>
<td><%=Count_rs2("total")%> </td>
<td><font color="#ff0000"><%=count_rs2("fact")%></font> </td>
<%if type1<>"" then%>
<td><%=formatnumber(count_rs2("invest_feico"),3,-1)%> </td>
<td><%=Count_rs2("total")*count_rs2("invest_feico")%> </td>
<%
end if%>
<td><%=count_issue%> </td>
</tr>
<%Total=Total+Count_rs2("total")
fact2=fact2+count_rs2("fact")
Record=Record+Count_rs2("re")
Count_rs2.movenext
loop%>
<tr align="center" bgcolor="#f2f2f2">
<td> </td>
<td> </td>
<td colspan="8" align="left"> 直属会员统计：共投注<%=Record%>笔 共<%=Total%>元 实投<%=Fact2%>元 </td>
</tr>
</table>
<p> </p>
<%end if%>
<% dim s
s=session("A_name")
set M_rs=server.createobject("adodb.recordset")
M_sql="select Agent_page,Agent_online,Agent_id,Agent_name,Agent_realname,Agent_total,Agent_list,Agent_rank,Agent_restart,Agent_fronttime,Agent_regtime from Agent where Agent_name='"&s&"'"
M_rs.open M_sql,conn,1,3
M_rs("Agent_online")=now()
M_rs("Agent_page")="收付统计-下属信息页"
M_rs.update%>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -