📄 zm_gg.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
Get_Kithe_Para
Set Rs6=Server.CreateObject("Adodb.RecordSet")
Dim NN
NN=1
Set Rs6=Conn.Execute("select top 1 NN from m_Kithe order by ID desc")
If Not Rs6.Eof Then
NN=Rs6("NN")+1
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
Set Rs6=Conn.Execute("Select Top 43 item_value,rate,current_rate,wager_gold,ID from m_rate where item_sort='正码过关' Order By ID")
Dim ShowTable
ShowTable=Rs6.GetRows(43)
Set Rs6=Nothing
%>
<!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 = '/';
var mess1 = '请先下注!';
var mess2 = '请选择二组以上玩法，若只要单一下注请前往正码1-6投注!' ;
var mess3 = '超出下注范围!';
function SubChk(obj) {
var checkCount = 0;
var checknum = obj.elements.length;
for( i=0; i < checknum; i++ ) {
if (obj.elements[i].checked) {
checkCount ++;
}
}
if (checkCount == 0)
{
alert(mess1);
return false;
}
if (checkCount == 1)
{
alert(mess2);
return false;
}
if (checkCount > 9)
{
alert(mess3);
return false;
//alert(checkCount);
//document.lt_form.submit();
}
if (checkCount >= 2)
{
return true;
//alert(checkCount);
//document.lt_form.submit();
}
}
</SCRIPT>
<META content="MSHTML 6.00.2800.1226" 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=3 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><FONT
size=2>
<MARQUEE class=td_02 scrollDelay=120>
<FONT
size=2><%=affice%> </FONT> </MARQUEE></FONT></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>
<TD width=50 height=23>正码过关</TD>
<TD width=30><!--<INPUT class=select_cen onclick=javascript:location.reload() type=button value=更新 name=button>-->
</TD>
<TD> <B><FONT
id=countdown_num> </FONT></B></TD>
<TD align=right>(<B>香港时间:</B> <span class="MsoNormal"><span
lang=EN-US style='font-size:9.0pt;font-family:Arial'><%if month(Now())<10 then
response.Write year(now())&"-0"
end if
response.Write month(now())&"-"
if day(now())<10 then
response.Write "0"
end if
response.Write day(now())&" "&time()%></span></span>)</TD>
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<FORM name=lt_form_138 onsubmit="return SubChk(this);"
action="z_order.asp" method="post" target=leftFrame>
<TR>
<TD colSpan=3 height="100%">
<%If tray_switch=1 Then %>
<TABLE class=table_title_line cellSpacing=0 cellPadding=0 width=500
border=0>
<TBODY>
<TR>
<TD height=5></TD></TR>
<TR>
<TD colSpan=2 height=30>期数:<b><%=Current_Kithe_Num%></b> <B>开奖日期:
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -