📄 index_rate.asp
字号:
<!--#include file="mConn.asp"-->
<!--#include file="mConst.asp"-->
<!--#include file="Number_Info.asp"-->
<!--#include file="sk2.asp"-->
<%
If Session("SK2Admin")="" Then
Response.Redirect "Admin_Login.Asp"
Response.End
End If
Get_Kithe_Para
Dim ShowTable_mon(56)
Set Rs6=Server.CreateObject("Adodb.RecordSet")
Set Rs6=Conn.Execute("Select Top 55 item_value,rate,current_rate,wager_gold from m_rate where item_sort='特别号' Order By ID")
Dim ShowTable
ShowTable=Rs6.GetRows(55)
Set Rs6=Nothing
for J=0 to 54
Set Rs5=Conn.Execute("Select sum_money=isnull(sum(sum_m),0) from m_chilp where kithe='"&Current_Kithe_Num&"' and sort='特别号' and chilp_value='"&ShowTable(0,J)&"'")
If Rs5.Eof Then
Set Rs5=Nothing
'Response.redirect "user_left.asp"
Response.End
else
ShowTable_mon(J+1)=Rs5("sum_money")
end if
'response.Write ShowTable(0,J)&"<br>"
next
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>main</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="../images/control_main.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR>
<style type="text/css">
<!--
.style2 {color: #FFFFFF}
-->
</style>
</HEAD>
<SCRIPT language=javascript>
window.setTimeout("self.location='index_Rate.asp'", 30000);
</SCRIPT>
<BODY text=#000000 vLink=#0000ff aLink=#0000ff bgColor=#ffffff leftMargin=0
topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD class=ra_listbet_ctrl_line height=1></TD></TR>
<TR>
<TD class=ra_listbet_ctrl_bg>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR height=25>
<TD width="597"> ∷<a href=index_rate.asp style="BACKGROUND-COLOR: #3399ff"><b>特别号</b></a>∷
<a href=rate_just.asp><b>正码</b></a>
<a href=rate_just1-6.asp><b>正码1-6</b></a>
<a href=rate_join.asp><b>连码</b></a>
<a href=rate_justpass.asp><b>正码过关</b></a>
<a href=rate_12.asp><b>生肖色波</b></a>
<a href=rate_ys.asp ><b>一肖</b></a>
<a href=system_rate.asp ><b>统一修改赔率</b></a></TD>
</TR></TBODY>
</TABLE></TD></TR>
<TR>
<TD class=ra_listbet_ctrl_line height=1></TD></TR>
<TR>
<TD height=4></TD></TR>
<TR>
<TD><FONT color=#000099> 特别号</FONT></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=1 cellPadding=1 width="98%" align=center border=0>
<TBODY>
<TR align=middle bgColor=#efeff0>
<TD height=19 bgcolor="#003366"><span class="style2">号码</span></TD>
<TD bgcolor="#003366"><span class="style2">赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">下注总额</span></TD>
<TD bgcolor="#003366"><span class="style2">当前赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">预计赢利</span></TD>
<TD height=19 bgcolor="#003366"><span class="style2">号码</span></TD>
<TD bgcolor="#003366"><span class="style2">赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">下注总额</span></TD>
<TD bgcolor="#003366"><span class="style2">当前赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">预计赢利</span></TD>
<TD height=19 bgcolor="#003366"><span class="style2">号码</span></TD>
<TD bgcolor="#003366"><span class="style2">赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">下注总额</span></TD>
<TD bgcolor="#003366"><span class="style2">当前赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">预计赢利</span></TD>
<TD height=19 bgcolor="#003366"><span class="style2">号码</span></TD>
<TD bgcolor="#003366"><span class="style2">赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">下注总额</span></TD>
<TD bgcolor="#003366"><span class="style2">当前赔率</span></TD>
<TD bgcolor="#003366"><span class="style2">预计赢利</span></TD>
</TR>
<FORM name=form1 action=rate_save.asp?K6=K1 method=post>
<TR bgColor=#cccccc hight="19">
<%For I=1 To 13%>
<TR>
<TD height=12 bgcolor="#efeff0"><FONT size=+0><SPAN
style="COLOR: <%=NumberWriteColor(I)%>">
<%If I<10 Then
Response.Write "0"&I
Else
Response.Write I
End If
%>
</SPAN></FONT></TD>
<TD bgcolor="#efeff0"><INPUT class=squ
style="HEIGHT: 18px" maxLength=6 size=4 value=<%=ShowTable(2,I-1)%> name=Num_<%=I%>> </TD>
<TD align=center bgcolor="#efeff0"><font color=blue><LABEL
id=num1><%=ShowTable_mon(I)%></LABEL></font></A></TD>
<TD align=center bgcolor="#efeff0" id=num_11><%=ShowTable(2,I-1)%></TD>
<TD bgcolor="#efeff0" id=yj1> </TD>
<TD height=12 bgcolor="#efeff0"><FONT size=+0><SPAN
style="COLOR: <%=NumberWriteColor(I+13)%>"><%=I+13%></SPAN></FONT></TD>
<TD bgcolor="#efeff0"><INPUT class=squ
style="HEIGHT: 18px" maxLength=6 size=4 value=<%=ShowTable(2,I+12)%> name=Num_<%=I+13%>> </TD>
<TD align=center bgcolor="#efeff0"><font color=blue><LABEL
id=num14><%=ShowTable_mon(I+13)%></LABEL></font></TD>
<TD align=center bgcolor="#efeff0" id=num_114><%=ShowTable(2,I+12)%></TD>
<TD bgcolor="#efeff0" id=yj14> </TD>
<TD height=12 bgcolor="#efeff0"><FONT size=+0><SPAN
style="COLOR: <%=NumberWriteColor(I+26)%>"><%=I+26%></SPAN></FONT></TD>
<TD bgcolor="#efeff0"><INPUT class=squ
style="HEIGHT: 18px" maxLength=6 size=4 value=<%=ShowTable(2,I+25)%> name=Num_<%=I+26%>> </TD>
<TD align=center bgcolor="#efeff0"><font color=blue><LABEL
id=num29><%=ShowTable_mon(I+26)%></LABEL></font></TD>
<TD align=center bgcolor="#efeff0" id=num_129><%=ShowTable(2,I+25)%></TD>
<TD bgcolor="#efeff0" id=yj29> </TD>
<%If I+39<50 Then%>
<TD height=12 bgcolor="#efeff0"><FONT size=+0><SPAN
style="COLOR: <%=NumberWriteColor(I+39)%>"><%=I+39%></SPAN></FONT></TD>
<TD bgcolor="#efeff0"><INPUT class=squ
style="HEIGHT: 18px" maxLength=6 size=4 value=<%=ShowTable(2,I+38)%> name=Num_<%=I+39%>> </TD>
<TD align=center bgcolor="#efeff0"><font color=blue><LABEL
id=num43><%=ShowTable_mon(I+39)%></LABEL></font></TD>
<TD align=center bgcolor="#efeff0" id=num_143><%=ShowTable(2,I+38)%></TD>
<TD bgcolor="#efeff0" id=yj43> </TD>
<%
Else
If I+39=50 Then%>
<TD height=12 colspan=5 align=center><INPUT onclick=javascript:location.reload(); type=button value=刷新本页></TD>
<%
End If
If I+39=51 Then%>
<TD height=12 colspan=5 align=center><INPUT type=submit value=修改赔率 name=submit> </TD>
<%
End If
End If%></TR>
<%Next%>
</FORM></TBODY></TABLE>
<TABLE borderColor=#cccccc cellSpacing=1 cellPadding=2 width="98%" align=center
border=0>
<FORM name=form2 action=rate_save.asp?K6=K2 method=post>
<TBODY>
<TR bgColor=#cccccc>
<TD height=22>号码</TD>
<TD>赔率</TD>
<TD>下注总额</TD>
<TD>当前赔率</TD>
<TD>号码</TD>
<TD>赔率</TD>
<TD>下注总额</TD>
<TD> </TD>
<TD>当前赔率</TD>
<TD>号码</TD>
<TD>赔率</TD>
<TD>下注总额</TD>
<TD>当前赔率</TD>
<TD>号码</TD>
<TD>赔率</TD>
<TD>下注总额</TD>
<TD> </TD>
<TD>当前赔率</TD></TR>
<TR bgColor=#cccccc>
<TD height=22>特单</TD>
<TD><INPUT id=t_signle2 size=4
value=<%=ShowTable(2,49)%> name=t_signle></TD>
<TD align=center><font color=blue><LABEL
id=num50><%=ShowTable_mon(50)%></LABEL></font></A></TD>
<TD id=num_150 align=center><%=ShowTable(2,49)%></TD>
<TD>特双</TD>
<TD><INPUT id=t_double2 size=4
value=<%=ShowTable(2,50)%> name=t_double></TD>
<TD align=center><font color=blue><LABEL
id=num51 align=center><%=ShowTable_mon(51)%></LABEL></font></A></TD>
<TD> </TD>
<TD id=num_151 align=center><%=ShowTable(2,50)%></TD>
<TD>特大</TD>
<TD><INPUT id=t_big2 size=4
value=<%=ShowTable(2,51)%> name=t_big></TD>
<TD align=center><font color=blue><LABEL
id=num52><%=ShowTable_mon(52)%></LABEL></font></A></TD>
<TD id=num_151 align=center><%=ShowTable(2,51)%></TD>
<TD>特小</TD>
<TD><INPUT id=t_small2 size=4
value=<%=ShowTable(2,52)%> name=t_small></TD>
<TD align=center><font color=blue><LABEL
id=num53><%=ShowTable_mon(53)%></LABEL></font></A></TD>
<TD> </TD>
<TD id=num_153 align=center><%=ShowTable(2,52)%></TD></TR>
<TR bgColor=#cccccc>
<TD height=26>合单</TD>
<TD><INPUT id=z_signle2 size=4
value=<%=ShowTable(2,53)%> name=h_signle></TD>
<TD align=center><font color=blue><LABEL
id=num54><%=ShowTable_mon(54)%></LABEL></font></A></TD>
<TD id=num_154 align=center><%=ShowTable(2,53)%></TD>
<TD>合双</TD>
<TD><INPUT id=z_double2 size=4
value=<%=ShowTable(2,54)%> name=h_double></TD>
<TD align=center><font color=blue><LABEL
id=num52><%=ShowTable_mon(55)%></LABEL></font></A></TD>
<TD> </TD>
<TD id=num_155 align=center><%=ShowTable(2,54)%></TD>
<TD colSpan=12>
<DIV align=center><INPUT type=submit value=修改赔率 name=submit>
</DIV></TD>
</TR>
</FORM></TBODY></TABLE>
<FORM name=form3 action=fly.asp method=post><INPUT type=hidden name=fly> <INPUT
type=hidden name=money> </FORM>
<SCRIPT language=vbscript>
dim flag1,flag2,flag3,flag4,t_all1,t_all2,t_all3,t_all4
flag1=false
flag2=false
flag3=false
flag4=false
sub checkhm(y)
if (not isnumeric(this.value)) or this.value="" then
alert("修改的号码不能为空或不为数字,请重新输入")
form1.q_40(y).select
else if cdbl(form1.q_40(y).value)>50 then
alert("修改的号码大于45,请重新输入")
form1.q_40(y).select
end if
end if
end sub
sub check(x,t_all)
select case x
case 1
if (not isnumeric(form2.t_signle.value)) or form2.t_signle.value="" then
alert("修改的号码不能为空或不为数字,请重新输入")
form2.t_signle.select
else if form2.chk1.checked = true then
if flag1=true then t_all=t_all1
form2.t_double.value=cdbl(t_all)-cdbl(form2.t_signle.value)
else
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -