📄 q_main.asp
字号:
<!--#include file="manage/mConn.asp"-->
<!--#include file="manage/mConst.asp"-->
<!--#include file="manage/Number_Info.Asp"-->
<!--#include file="manage/sk2.asp"-->
<%
If Session("SK2User")="" Then
Response.Write ("<script Language=Javascript>alert('Please input username/password and try again!!!');window.open('index.asp','_top');</script>")
Response.End
End If
Set Rs6=Conn.Execute("select top 1 tray_time,affice,tray_switch from m_config")
Dim affice,tray_time,tray_switch
If Not Rs6.Eof Then
affice=Rs6("affice")
tray_time=Rs6("tray_time")
tray_switch=Rs6("tray_switch")
End If
Dim rate_id
rate_id=cLng(Request("rate_id"))
Get_Kithe_Para:Get_UserInfo
Set Rs6=Conn.Execute("Select Top 55 item_value,rate,current_rate,wager_gold from m_rate where item_name='特别号' Order By ID")
Dim ShowTable
ShowTable=Rs6.GetRows(55)
Set Rs6=Conn.Execute("Select top 50 item_value,rate,current_rate,wager_gold from m_rate where item_name='正码' Order By ID desc")
Dim ShowTable1
ShowTable1=Rs6.GetRows(50)
Set Rs6=Conn.Execute("Select Top 4 item_value,rate,current_rate,wager_gold from m_rate where item_sort='色波' Order By ID")
Dim ShowTable2
ShowTable2=Rs6.GetRows(4)
SQL6="Select sum_money=isnull(sum(sum_m),0) from m_chilp where kithe='"&Current_Kithe_Num&"' and sort='特别号' and member='"&session("SK2user")&"'"
SQL6=SQL6&" and chilp_value<>'合单' and chilp_value<>'合双' and chilp_value<>'双' and chilp_value<>'单' and chilp_value<>'大' and chilp_value<>'小'"
Set Rs5=Conn.Execute(SQL6)
If not Rs5.Eof Then
sum_money=Rs5("sum_money")
end if
SQL5="select credits,current_credits,Login_name,P_agentID from m_agent where Login_name='"&UserInfo(11,0)&"'"
Set Rs4=Conn.Execute(SQL5)
If not Rs4.Eof Then
sum_money_agent=Rs4("credits")
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>body_lotto</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="images/client_LT_game.css" type=text/css rel=stylesheet>
<SCRIPT language=JAVASCRIPT>
if(self == top){location = '/';}
</SCRIPT>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD>
<BODY oncontextmenu=window.event.returnValue=false leftMargin=0 topMargin=0>
<TABLE class=table_banner height="100%" cellSpacing=0 cellPadding=0 width=546
border=0>
<TBODY>
<TR>
<TD vAlign=top>
<TABLE height=96 cellSpacing=0 cellPadding=0 width="96%" align=center
border=0>
<TBODY>
<TR>
<TD vAlign=top colSpan=4 height="100%">
<TABLE cellSpacing=1 cellPadding=0 width=502 border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height=5></TD></TR>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=2 width="100%"
align=left border=0>
<TBODY>
<TR>
<TD class=td_02 width="99%" bgColor=#cccccc>
<MARQUEE class=td_02 scrollDelay=120><SPAN
id=Msg><%=Current_affice%></SPAN></MARQUEE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD height=5></TD></TR></TBODY></TABLE></TD></TR></TBODY>
<TBODY>
<TR>
<TD>
<TABLE class=table_banner cellSpacing=0 cellPadding=0
width=500 border=0>
<TBODY>
<TR>
<TD>
<TABLE class=banner_set cellSpacing=0 cellPadding=0
width=500 border=0>
<TBODY>
<TR bgColor=#c1d7e5>
<TD width=50 height=20>快速下注</TD>
<TD width=30><INPUT class=select_cen onclick="location.href='Q_Main.asp'" type=button value=更新 name=button></TD>
<TD align=right>(<B>香港时间:</B> <%=now()%>)</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<FORM target="leftFrame" name=lt_form action="Q_main_save.asp" method="post">
<%If tray_switch=1 Then %>
<TR>
<TD colSpan=4 height="100%">
<SCRIPT language=JAVASCRIPT>
<!--
var count_win=false;
//window.setTimeout("self.location='quickinput2.php'", 180000);
function CheckKey(){
if(event.keyCode == 13) return true;
if((event.keyCode < 48 || event.keyCode > 57) && (event.keyCode > 95 || event.keyCode < 106)){alert("下注金额仅能输入数字!!"); return false;}
}
function ChkSubmit(){
//设定『确定』键为反白
document.all.btnSubmit.disabled = true;
if (eval(document.all.allgold.innerHTML)<=0 || eval(total_gold.value)<=0)
{
alert("请输入下注金额!!");
document.all.btnSubmit.disabled = false;
return false;
}
if (!confirm("是否确定下注")){
document.all.btnSubmit.disabled = false;
return false;
}
document.lt_form.gold_all.value=eval(document.all.allgold.innerHTML)
document.lt_form.submit();
}
function CountGold(gold,type,rtype){
switch(type) {
case "focus":
goldvalue = gold.value;
if (goldvalue=='') goldvalue=0;
document.all.allgold.innerHTML = eval(document.all.allgold.innerHTML+"-"+goldvalue);
total_gold.value = document.all.allgold.innerHTML;
break;
case "blur":
if (goldvalue!='')
{goldvalue = gold.value;
if (goldvalue=='') goldvalue=0;
if (rtype=='SP' && (eval(goldvalue) < 10) && (goldvalue!='')) {gold.focus(); alert("下注金额不可小於最低限度!!"); return false;}
if (rtype=='SP' && (eval(goldvalue) > <%=UserQuota(3,0)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,0)%>!!"); return false;}
if (rtype=='SP' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,0)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='SP' && (eval(goldvalue) > <%=UserQuota(3,0)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='dan' && (eval(goldvalue) > <%=UserQuota(3,1)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,1)%>!!"); return false;}
if (rtype=='dan' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,1)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='dan' && (eval(goldvalue) > <%=UserQuota(3,1)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='daxiao' && (eval(goldvalue) > <%=UserQuota(3,2)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,2)%>!!"); return false;}
if (rtype=='daxiao' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,2)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='daxiao' && (eval(goldvalue) > <%=UserQuota(3,2)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='hedan' && (eval(goldvalue) > <%=UserQuota(3,3)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,3)%>!!"); return false;}
if (rtype=='hedan' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,3)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='hedan' && (eval(goldvalue) > <%=UserQuota(3,3)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='zongdan' && (eval(goldvalue) > <%=UserQuota(3,5)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,5)%>!!"); return false;}
if (rtype=='zongdan' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,5)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='zongdan' && (eval(goldvalue) > <%=UserQuota(3,5)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='zongda' && (eval(goldvalue) > <%=UserQuota(3,6)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,6)%>!!"); return false;}
if (rtype=='zongda' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,6)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='zongda' && (eval(goldvalue) > <%=UserQuota(3,6)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
if (rtype=='TSP' && (eval(goldvalue) > <%=UserQuota(3,13)%>)) {gold.focus(); alert("对不起,本期有下注金额最高限制 : <%=UserQuota(3,13)%>!!"); return false;}
if (rtype=='TSP' && (eval(document.all.allgold.innerHTML) > <%=UserQuota(2,13)%>)) {gold.focus(); alert("下注金额不可大於单注限额!!"); return false;}
if (rtype=='TSP' && (eval(goldvalue) > <%=UserQuota(3,13)%>)) {gold.focus(); alert("下注金额已超过单号限额!!"); return false;}
}
document.all.allgold.innerHTML = eval(total_gold.value+"\+"+ goldvalue);
total_gold.value = document.all.allgold.innerHTML;
if (eval(document.all.allgold.innerHTML) > <%=UserInfo(5,0)%>) {gold.focus(); alert("下注金额不可大於信用额度!!"); return false;}
if((<%=sum_money%>+eval(document.all.allgold.innerHTML)) ><%=UserQuota(2,R)%>){
gold.focus();
alert("本期累计下注共: <%=sum_money%>\n下注金额已超过单期限额!!");
return false;
}
if((<%=sum_money%>+eval(document.all.allgold.innerHTML)) ><%=sum_money_agent%>){
gold.focus();
alert("下注金额不可大於总代理信用额度!!");
return false;
}
/*
if (eval(document.all.allgold.innerHTML) > ){gold.focus(); alert("下注金额不可大於总代理信用额度!!"); return false;}
*/
break;
case "keyup":
goldvalue = gold.value;
if (goldvalue=='') goldvalue=0;
document.all.allgold.innerHTML = eval(total_gold.value+"\+"+ goldvalue);
break;
}
//alert(goldvalue);
}
//-->
</SCRIPT>
<TABLE class=table_title_line cellSpacing=1 cellPadding=0 width=502
border=0>
<TBODY>
<TR>
<TD height=5></TD></TR>
<TR>
<TD colSpan=4 height=30>期数: <b><%=Current_Kithe_Num%>
开奖日期:</b> <%=Kithe_OpenTime%> <INPUT class=select_cen onclick="window.location.href='usermain.asp'" type=button value=切换一般模式 name=quickinput></TD></TR>
<TR>
<TD colSpan=4>
<TABLE cellSpacing=1 cellPadding=0 width="100%" border=0>
<TBODY>
<TR class=tr_title_set_cen>
<TD colSpan=2>帐户名称</TD>
<TD colSpan=2><B><%=Session("SK2User")%></B></TD>
<TD colSpan=3>信用额度</TD>
<TD colSpan=2><B><%=UserInfo(5,0)%></B>
<TD colSpan=3>下注金额</TD>
<TD colSpan=3><SPAN id=allgold><%=0%></SPAN></SPAN> </TD>
<TR class=tr_title_set_cen>
<TD colSpan=2>最低限额</TD>
<TD colSpan=2>10</TD>
<TD colSpan=3>特别号单注限额</TD>
<TD colSpan=2><%=UserQuota(2,0)%></TD>
<TD colSpan=3>特别号单号限额</TD>
<TD colSpan=3><%=UserQuota(3,0)%></TD></TR>
<TR class=tr_title_set_cen>
<TD width=30>号码</TD>
<TD width=35>赔率</TD>
<TD width=35>金额</TD>
<TD width=30>号码</TD>
<TD width=35>赔率</TD>
<TD width=35>金额</TD>
<TD width=30>号码</TD>
<TD width=35>赔率</TD>
<TD width=35>金额</TD>
<TD width=30>号码</TD>
<TD width=35>赔率</TD>
<TD width=35>金额</TD>
<TD width=30>号码</TD>
<TD width=35>赔率</TD>
<TD width=35>金额</TD></TR>
<%For I=0 To 9%>
<TR>
<TD class=ball_td align=middle
background=images/<%=NumberImage(I+1)%> height=27><FONT
style="PADDING-RIGHT: 2px; PADDING-LEFT: 2px; FILTER: glow(color=#000000,strength=1); PADDING-BOTTOM: 2px; COLOR: #000000; PADDING-TOP: 2px; HEIGHT: 10px"><%=ShowTable(0,I)%></FONT></TD>
<TD class=radio_set align=middle><FONT style="FONT-WEIGHT: bold; FONT-SIZE: 13px; COLOR: #cc0000"><%
select case UserInfo(4,0)
case "a"
response.Write ShowTable(2,I)
case "b"
response.Write ShowTable(2,I)-0.5
case "c"
response.Write ShowTable(2,I)-1
end select%></FONT></TD><!--下注送出因error所弹回的各下注金额-->
<TD align=middle><INPUT onkeypress="return CheckKey();"
onblur="return CountGold(this,'blur','SP');"
onkeyup="return CountGold(this,'keyup');"
onfocus="CountGold(this,'focus');this.value='';"
tabIndex=1 size=4 name=num<%=cint(ShowTable(0,I))%>></TD>
<TD class=ball_td align=middle
background=images/<%=NumberImage(I+11)%> height=27><FONT
style="PADDING-RIGHT: 2px; PADDING-LEFT: 2px; FILTER: glow(color=#000000,strength=1); PADDING-BOTTOM: 2px; COLOR: #000000; PADDING-TOP: 2px; HEIGHT: 10px"><%=ShowTable(0,I+10)%></FONT></TD>
<TD class=radio_set align=middle><FONT
style="FONT-WEIGHT: bold; FONT-SIZE: 13px; COLOR: #cc0000"><%
select case UserInfo(4,0)
case "a"
response.Write ShowTable(2,I+10)
case "b"
response.Write ShowTable(2,I+10)-0.5
case "c"
response.Write ShowTable(2,I+10)-1
end select%></FONT></TD><!--下注送出因error所弹回的各下注金额-->
<TD align=middle><INPUT onkeypress="return CheckKey();"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -