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

📄 person_detail.asp

📁 1。超强文件读写锁定
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<%'创建时间:2006/01/08
'创建人:
'功能:用于详细显示每个会员的下注情况
%>
<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Islogin.asp"-->
<% name1=request.querystring("name")
type1=cstr(request.QueryString("type1"))

 set Count_rs=server.createobject("adodb.recordset")
 select case type1
 case ""
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money,invest_number=convert(varchar(50),invest_number),fact=invest_money*(1-invest_feico),color_money=invest_money*invest_feico,invest_feico,invest_time,invest_rate,invest_rate2,invest_type from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"'union all select  invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"'"
 case "1"
 Count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money,invest_number,fact=invest_money*(1-invest_feico),color_money=invest_money*invest_feico,invest_feico,invest_time,invest_number,invest_rate,invest_type from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_type="&type1&" and invest_name='"&name1&"'"
 case "2"
Count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money,invest_number,fact=invest_money*(1-invest_feico),color_money=invest_money*invest_feico,invest_feico,invest_time,invest_number,invest_rate,invest_type from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_type="&type1&" and invest_name='"&name1&"'"
  case "3"
Count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money,invest_number,fact=invest_money*(1-invest_feico),color_money=invest_money*invest_feico,invest_feico,invest_time,invest_number,invest_rate,invest_type from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_type="&type1&" and invest_name='"&name1&"'"
   case "4"
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"'and invest_type='"&type1&"'"
    case "5"
Count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money,invest_number,fact=invest_money*(1-invest_feico),color_money=invest_money*invest_feico,invest_feico,invest_time,invest_number,invest_rate,invest_type from invest where invest_banlance=0 and invest_issue="&count_issue&" and invest_type="&type1&" and invest_name='"&name1&"'"
	 case "6"
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"' and invest_type='"&type1&"'"
 	 case "7"
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"' and invest_type='"&type1&"'"

	  case "8"
 count_sql="select  invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"' and invest_type='"&type1&"'"
	 case "9"
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"' and invest_type='"&type1&"'"
	 case "10"
 count_sql="select invest_secondtype,Invest_agzc,invest_feizc,invest_name,invest_money=invest_money*invest_zs,invest_number,fact=invest_money*invest_zs*(1-invest_feico),color_money=invest_money*invest_zs*invest_feico,invest_feico,invest_time,invest_rate1,invest_rate2,invest_type from  invest_l where invest_banlance=0 and invest_issue="&count_issue&" and invest_name='"&name1&"' and invest_type='"&type1&"'"
	  end select
Count_rs.open Count_sql,conn,1,1

%>
<html>
<head>
<link href="include/css.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
.style2 {color: #FF9900}
-->
</style>
</head>

<body style="background-color: #F2F2F2">
<table border="1" width="739" cellspacing="0" cellpadding="0" bordercolor="#E0E0E0" style="border-collapse: collapse" height="10%">
  <tr>
    <td width="739" valign="top">
<center>
<table width="739" border="1" cellspacing="1" bordercolor="#F2F2F2" bordercolorlight="#F2F2F2" bordercolordark="#9D9CA4" height="103">
  <tr align="center" bgcolor="#E5EAEE">
    <td height="20" colspan="10" width="731">
        <form name="form1" method="post" action="">
          <span class="style2"><a  href="A_count.asp?pan=a" >
          <font color="#FF9900">返回 </font> </a> 
        <input name="radio" type="radio" onClick="javascript:self.location.href='?name=<%=name1%>'" <%if type1="" then response.write "checked"%>>
        全部 <input type="radio" name="radio" onClick="javascript:self.location.href='?type1=1&name=<%=name1%>'" <%if type1="1" then response.write "checked"%>>
        特码 
        <input type="radio" name="radio"  onclick="javascript:self.location.href='?type1=2&name=<%=name1%>'" <%if type1="2" then response.write "checked"%>>
        正码 
        <input type="radio" name="radio"  onclick="javascript:self.location.href='?type1=3&name=<%=name1%>'" <%if type1="3" then response.write "checked"%>>
        两面 <input type="radio" name="radio" onClick="javascript:self.location.href='?type1=5&name=<%=name1%>'" <%if type1="5" then response.write "checked"%> >
        波色 <input type="radio" name="radio"  onclick="javascript:self.location.href='?type1=4&name=<%=name1%>'" <%if type1="4" then response.write "checked"%>> 
        连码</span><font color="#FF9900"> 
          <input type="radio" name="radio" onClick="javascript:self.location.href='?type1=8&name=<%=name1%>'" <%if type1="8" then response.write "checked" %>>
正码过关
<input type="radio" name="radiobutton" onClick="javascript:self.location.href='?type1=6&name=<%=name1%>'" <%if type1="6" then response.write "checked" %>> 
生肖 
<input type="radio" name="radiobutton" onClick="javascript:self.location.href='?type1=7&name=<%=name1%>'" <%if type1="7" then response.write "checked" %>>
一肖
<input type="radio" name="radiobutton" onClick="javascript:self.location.href='?type1=9&name=<%=name1%>'" <%if type1="9" then response.write "checked" %>>
六肖</font>       
        <font color="#FF9900">
        <input type="radio" name="radiobutton" onClick="javascript:self.location.href='?type1=10&name=<%=name1%>'" <%if type1="10" then response.write "checked" %>> 
        半波
</font></form></td>
  </tr>
  <tr align="center" bgcolor="#CCCCCC">
    <td height="18" bgcolor="#BCD5E4" width="52">类别</td>
    <td bgcolor="#BCD5E4" width="55" height="18">投注会员</td>
	<td bgcolor="#BCD5E4" width="62" height="18">代理占成</td>
	<td bgcolor="#BCD5E4" width="56" height="18">分销占成</td>
    <td width="150" bgcolor="#BCD5E4" height="18">下注类别</td>
    <td width="68" bgcolor="#BCD5E4" height="18">投注金额</td>
    <td width="69" bgcolor="#BCD5E4" height="18">实投</td>
    <td width="54" bgcolor="#BCD5E4" height="18">佣金</td>
    <td width="60" bgcolor="#BCD5E4" height="18">赔率</td>
    <td width="70" bgcolor="#BCD5E4" height="18">结果</td>
  </tr>
  <%
  do while not Count_rs.eof
 %>
  <tr align="center" bgcolor="#f2f2f2">
    <td width="52" height="16"><%select case  Count_rs("Invest_type")
	       case "1"
	       response.write "特码"
	       case "2"
	       response.write "正码"
		   case "3"
		   response.write "两面"
		   case "4"
		   response.write "连码"
		   case "5"
		   response.write "波色"
		   case "6"
		   response.write "生肖"
		   case "7"
		   response.Write  "一肖"
		   case "8"
		   response.write "正码过关"
		   case "9" 
			response.write "六肖"
			 case "10" 
			response.write "半波"
		   end select%> </td>
    <td width="55" height="16"><%=Count_rs("Invest_name")%></td>
        <td width="62" height="16"><%=formatnumber(Count_rs("Invest_agzc"))%></td>
    <td width="56" height="16"><%=formatnumber(Count_rs("Invest_feizc"))%></td>
	<td width="150" style="color: #FF0000" height="16"><%select case Count_rs("Invest_type")
'-----显示特码-----
case "1"

select case count_rs("invest_secondtype")
						case "50"
		 '  type2="特单"
	    response.write "特单"
	       case "51"
		'   type2="特双"
	       response.write "特双"
		   case "52"
		'   type2="特大"
		   response.write  "特大"
		   case "53"
		'   type2="特小"
		   response.write "特小"
		   case "54"
			'type2="总单"
		   response.write "总单"
		    case "55"
			' type2="总双"
		   response.write "总双"
		   case "56"
		 '   type2="总大"
		   response.write "总大"
		   case "57"
		'    type2="总小"
		   response.write "总小"
		  case "61"
		response.write "合单"
		case "62"
		response.write "合双"
		   end select
		   response.write (right("0" & trim(cstr( Count_rs("invest_number"))),2))
'-----显示正码-----
case "2"
response.write (right("0" & trim(cstr( Count_rs("invest_number"))),2))

'-----显示正码1-6-----
case "3"

			select case Count_rs("Invest_secondtype")
		   case "58"
		   response.write "红波"
		   case "59"
		   response.write "绿波"
		   case "60"
		   response.write "蓝波"
		   case "61"
		response.write "合单"
		case "62"
		response.write "合双"
		   case else
		  ' type2= Count_rs("Invest_number")
    		'response.write  Count_rs("invest_number")
		   end select
		
								   
				if Count_rs("Invest_secondtype")<50 then
				   select case cstr(Count_rs("Invest_secondtype") mod 7)
						 case "1"
						 type2="&nbsp;&nbsp;&nbsp;大&nbsp;"
						response.write "&nbsp;正码"+cstr(int((Count_rs("Invest_secondtype")-1)/7)+1)+type2
		   				case "2"
		  				 type2="&nbsp;&nbsp;&nbsp;小&nbsp;"
						response.write "&nbsp;正码"+cstr(int((Count_rs("Invest_secondtype")-1)/7)+1)+type2
	      				 case "3"
		  				 type2="&nbsp;&nbsp;&nbsp;单&nbsp;"
						response.write "&nbsp;正码"+cstr(int((Count_rs("Invest_secondtype")-1)/7)+1)+type2
	      				 case "4"
		 				 type2="&nbsp;&nbsp;&nbsp;双&nbsp;"
						response.write "&nbsp;正码"+cstr(int((Count_rs("Invest_secondtype")-1)/7)+1)+type2
		end select
						else
						select case count_rs("invest_secondtype")
						case "50"
		 '  type2="特单"
	    response.write "特单"
	       case "51"
		'   type2="特双"
	       response.write "特双"
		   case "52"
		'   type2="特大"
		   response.write  "特大"
		   case "53"
		'   type2="特小"
		   response.write "特小"
		   case "54"
			'type2="总单"
		   response.write "总单"
		    case "55"
			' type2="总双"
		   response.write "总双"
		   case "56"
		 '   type2="总大"
		   response.write "总大"
		   case "57"
		'    type2="总小"
		   response.write "总小"
		
		   
		   
		   end select
						end if
'-----显示连码-----
case "4"

if type1="4" then
select case count_rs("invest_secondtype")
				case "1"
				rate=count_rs("invest_rate1")
				 response.write "&nbsp;二全中"
				 case "2"
				 rate=count_rs("invest_rate1")&"/"&count_rs("invest_rate2")
				 response.write "&nbsp;二中特"
				 case "3"

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -