📄 a_count_l.asp
字号:
<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Islogin.asp"-->
<%'创建时间:2004/08/17
'创建人:
'功能:用于总代理统计连码下注
%>
<%set rs_rate=server.CreateObject("adodb.recordset")
rsrate="select rate_number,rate_l from rate_1 where rate_number <8 "
rs_rate.open rsrate,conn,1,1
set rs_5=server.CreateObject("adodb.recordset")
count_5="SELECT Invest_rate1, Invest_rate2, Invest_secondtype, COUNT(*) AS re,SUM(Invest_money * Invest_zs) AS in_money,SUM(Invest_money * Invest_zs * invest_agzc) AS u_money FROM Invest_l WHERE (Invest_frist='"&session("a_name")&"' or invest_second='"&session("a_name")&"') AND (Invest_banlance = 0) AND (Invest_type = '4') AND (Invest_secondtype = 5) AND (Invest_issue = "&count_issue&") GROUP BY Invest_secondtype, Invest_rate1, Invest_rate2"
rs_5.open count_5,conn,1,1
set rs_4=server.CreateObject("adodb.recordset")
count_4="SELECT Invest_rate1, Invest_rate2, Invest_secondtype, COUNT(*) AS re,SUM(Invest_money * Invest_zs) AS in_money,SUM(Invest_money * Invest_zs * invest_agzc) AS u_money FROM Invest_l WHERE (Invest_frist='"&session("a_name")&"' or invest_second='"&session("a_name")&"') AND (Invest_banlance = 0) AND (Invest_type = '4') AND (Invest_secondtype = 4) AND (Invest_issue = "&count_issue&") GROUP BY Invest_secondtype, Invest_rate1, Invest_rate2"
rs_4.open count_4,conn,1,1
set rs_3=server.CreateObject("adodb.recordset")
count_3="SELECT Invest_rate1, Invest_rate2, Invest_secondtype, COUNT(*) AS re,SUM(Invest_money * Invest_zs) AS in_money,SUM(Invest_money * Invest_zs * invest_agzc) AS u_money FROM Invest_l WHERE (Invest_frist='"&session("a_name")&"' or invest_second='"&session("a_name")&"') AND (Invest_banlance = 0) AND (Invest_type = '4') AND (Invest_secondtype = 3) AND (Invest_issue = "&count_issue&") GROUP BY Invest_secondtype, Invest_rate1, Invest_rate2"
rs_3.open count_3,conn,1,1
set rs_2=server.CreateObject("adodb.recordset")
count_2="SELECT Invest_rate1, Invest_rate2, Invest_secondtype, COUNT(*) AS re,SUM(Invest_money * Invest_zs) AS in_money,SUM(Invest_money * Invest_zs * invest_agzc) AS u_money FROM Invest_l WHERE (Invest_frist='"&session("a_name")&"' or invest_second='"&session("a_name")&"') AND (Invest_banlance = 0) AND (Invest_type = '4') AND (Invest_secondtype = 2) AND (Invest_issue = "&count_issue&") GROUP BY Invest_secondtype, Invest_rate1, Invest_rate2"
rs_2.open count_2,conn,1,1
set rs_1=server.CreateObject("adodb.recordset")
count_1="SELECT Invest_rate1, Invest_rate2, Invest_secondtype, COUNT(*) AS re,SUM(Invest_money * Invest_zs) AS in_money,SUM(Invest_money * Invest_zs * invest_agzc) AS u_money FROM Invest_l WHERE (Invest_frist='"&session("a_name")&"' or invest_second='"&session("a_name")&"') AND (Invest_banlance = 0) AND (Invest_type = '4') AND (Invest_secondtype = 1) AND (Invest_issue = "&count_issue&") GROUP BY Invest_secondtype, Invest_rate1, Invest_rate2"
rs_1.open count_1,conn,1,1
%>
<% 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_fronttime")=now()
M_rs("Agent_online")=now()
M_rs("Agent_page")="收付-连码"
M_rs.update%>
<html>
<head>
<link href="include/css.css" rel="stylesheet" type="text/css">
<meta http-equiv='refresh' content='360'>
<title>无标题文档</title>
<style type="text/css">
<!--
body {
margin-top: 0px;
}
.unnamed1 {
color: #FF9900;
text-decoration: none;
}
.style11 {color: #000000}
.lp {
color: #FF0000;
text-decoration: none;
}
a:hover {
color: #0066ff;
text-decoration: none;
}
.style1 {font-size: 12px}
.style2 {color: #FF0000}
.style3 {color: #009900}
.style4 {color: #0033FF}
-->
</style>
</head>
<body topMargin=0 style="background-color: #F2F2F2">
<table width="740" style="border-collapse: collapse" bordercolor="#111111" cellpadding="0" cellspacing="0" height="26">
<tr>
<td align="center"> 六合彩
<select name="menu1" onChange="MM_jumpMenu('self.parent.mainFrame',this)">
<option value="A_Countz.asp?pan=a" selected>盘口</option>
<option value="A_Count.asp?pan=a" <%if pan="a" then response.write "selected" %>>A盘</option>
<option value="A_Count.asp?pan=b" <%if pan="b" then response.write "selected" %>>B盘</option>
<option value="A_Count.asp?pan=c" <%if pan="c" then response.write "selected" %>>C盘</option>
</select>
<a href="A_Count.asp?pan=a"> 特码</a>---<a href="A_Countz.asp?pan=a">正码</a>---<a href="Agent_z6.asp?pan=a">正码1-6</a>---<a href="A_Count_l.asp">连码</a>---<a href="Agent_g.asp">正码过关</a>---<a href="A_Couns.asp">生肖色波一肖</a>---<a href="A_Count_6s.asp">六肖</a>---<a href="A_count_bb.asp">半波</a>---<a href="agent_dtail.asp"><font color="#248BCD">详细列表↓</font></a> </td>
</tr>
</table>
<table border="1" width="739" cellspacing="0" cellpadding="0" bordercolor="#AEB8C1" style="border-collapse: collapse" height="10%">
<tr>
<td width="739" valign="top">
<table width="737" border="0" align="center" cellspacing="1" bgcolor="#999999" height="85">
<tr align="center" bgcolor="#CCCCCC">
<td width="82" height="26" bgcolor="#BCD5E4">时间</td>
<td width="43" height="26" bgcolor="#BCD5E4">期数</td>
<td colspan="2" bgcolor="#BCD5E4" width="143" height="26">三中二</td>
<td width="93" height="26" bgcolor="#BCD5E4">三全中</td>
<td width="101" bgcolor="#BCD5E4" height="26">二全中</td>
<td colspan="2" bgcolor="#BCD5E4" width="152" height="26">二中特</td>
<td width="101" height="26" bgcolor="#BCD5E4">特串</td>
</tr>
<tr align="center" bgcolor="#f2f2f2">
<td height="53" rowspan="3" width="82"><%=formatdatetime(now,0)%></td>
<td height="53" rowspan="3" width="43"><%=count_issue%></td>
<td width="70" height="19">中二</td>
<td width="70" height="19"><%rs_rate.move 5
response.write rs_rate("rate_l")%></td>
<td height="53" rowspan="3" width="93"><%
rs_rate.movefirst
rs_rate.move 4
response.write rs_rate("rate_l")
response.write "<br>"
if not rs_4.eof then
response.write "<a href='a_count_ldeatil.asp?secondtype=4' class='style1' >"
response.write rs_4("re")&"/"&rs_4("in_money")
response.write "</a>"
else
response.write "<font color='#FF0000'>0/0</font>"
end if%></td>
<td height="53" rowspan="3" width="101"><%
rs_rate.movefirst
rs_rate.move 3
response.write rs_rate("rate_l")
response.write "<br>"
if not rs_1.eof then
response.write "<a href='a_count_ldeatil.asp?secondtype=1' class='style1'>"
response.write rs_1("re")&"/"&rs_1("in_money")
response.write "</a>"
else
response.write "<font color='#FF0000'>0/0</font>"
end if%></td>
<td width="71" height="19">中特</td>
<td width="78" height="19"><% rs_rate.movefirst
rs_rate.move 2
response.write rs_rate("rate_l")%></td>
<td height="53" rowspan="3" width="101"><%
rs_rate.movefirst
rs_rate.move 3
response.write rs_rate("rate_l")
response.write "<br>"
if not rs_3.eof then
response.write "<a href='a_count_ldeatil.asp?secondtype=3' class='style1'>"
response.write rs_3("re")&"/"&rs_3("in_money")
response.write "</a>"
else
response.write "<font color='#FF0000'>0/0</font>"
end if%> </td>
</tr>
<tr align="center" bgcolor="#f2f2f2">
<td height="19" width="70">中三</td>
<td height="19" width="70"><% rs_rate.movefirst
rs_rate.move 6
response.write rs_rate("rate_l")%></td>
<td height="19" width="71">中二</td>
<td height="19" width="78"><% rs_rate.movefirst
rs_rate.move 1
response.write rs_rate("rate_l")%></td>
</tr>
<tr align="center" bgcolor="#f2f2f2">
<td height="20" colspan="2" width="143"><a href='a_count_ldeatil.asp?secondtype=5' class='style1'><%if not rs_5.eof then%><%=rs_5("re")%>/<%=rs_5("in_money")%><%else
response.write "<font color='#FF0000'>0/0</font>"
end if%></a></td>
<td height="20" colspan="2" class="style1" width="152"><%if not rs_2.eof then
response.write "<a href='a_count_ldeatil.asp?secondtype=2' class='style1'>"
response.write rs_2("re")&"/"&rs_2("in_money")
response.write "</a>"
else
response.write "<font color='#FF0000'>0/0</font>"
end if%></td>
</tr>
</table>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -