lm_no.asp
来自「买来的六合彩在线投注系统可能没有精力管理这些程序了PHP+mysql」· ASP 代码 · 共 429 行 · 第 1/2 页
ASP
429 行
<!--#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=Conn.Execute("Select Top 8 item_value,rate,current_rate,wager_gold,ID from m_rate where item_sort='连码' Order By ID")
Dim ShowTable
ShowTable=Rs6.GetRows(55)
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 Rs7=Server.CreateObject("Adodb.RecordSet")
Set Rs7=Conn.Execute("select * from open_on where code='lm' and del_flag<>'1' ")
If Not Rs7.Eof Then
Response.Write "非下单时间段"
Response.End
End If
%>
<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 type_nums = 10; //预设为 3中2
var type_min = 3;
var cb_num = 1;
var mess1 = '最少选择';
var mess11 = '个数字';
var mess2 = '最多选择10个数字';
var mess = mess2;
function select_types(type) {
if (type == 1 || type == 2) {
type_nums = 10;
type_min = 3;
} else {
type_nums = 10;
type_min = 2;
}
}
function SubChk(obj) {
var checkCount = 0;
var checknum = obj.elements.length;
var rtypechk = 0;
for(i=0; i<obj.rtype.length; i++) {
if (obj.rtype[i].checked) {
rtypechk ++;
}
}
if (rtypechk == 0) {
alert('请选择类别');
return false;
}
for(i=0; i<checknum; i++) {
if (obj.elements[i].checked) {
checkCount ++;
}
}
if (checkCount > (type_nums + 1)) {
alert(mess2);
return false;
}if(checkCount < (type_min+1)){
alert(mess1+type_min+mess11);
return false;
}else{
return true;
}
}
function SubChkBox(obj) {
if(obj.checked == false)
{
cb_num--;
//obj.checked = false;
}
//alert (cb_num);
if(obj.checked == true)
{
if ( cb_num > type_nums )
{
alert(mess);
cb_num--;
obj.checked = false;
}
cb_num++;
}
}
</SCRIPT>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR><style type="text/css">
<!--
body,td,th {
color: #FF0000;
}
-->
</style></HEAD>
<BODY oncontextmenu=window.event.returnValue=false leftMargin=0 topMargin=0>
<TABLE class=table_banner height="100%" cellSpacing=0 cellPadding=0 width=100% 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=100% border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height=5></TD></TR>
<TR>
<TD>
<TABLE width="100%" border=0
align=left cellPadding=2 cellSpacing=1 bgcolor="cccccc">
<TBODY>
<TR>
<TD class=td_02 width="99%" bgColor=#FFFFCC><FONT
size=2>
<MARQUEE class=td_02 scrollDelay=120>
<%=affice%>
</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=100% border=0>
<TBODY>
<TR>
<TD>
<TABLE class=banner_set cellSpacing=0 cellPadding=0
width=100% border=0>
<TBODY>
<TR>
<TD width=100 height=23>连码<INPUT class=select_cen onClick="location.href='lm_no.asp'" type=button value=更新 name=button></TD>
<TD width=30> </TD>
<TD align=right><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%if month(Now())<10 then
now11=year(now())&"/0"
else
now11=year(now())&"/"
end if
now11=now11&month(now())&"/"
if day(now())<10 then
now11=now11&"0"
end if
now11=now11&day(now())&" "&time()%>
<%
year1=year(Kithe_OpenTime)
month1=month(Kithe_OpenTime)
day1=day(Kithe_OpenTime)
hour1=Hour(Kithe_OpenTime)
Minute1=Minute(Kithe_OpenTime)
Second1=Second(Kithe_OpenTime)
now12=year1&","&month1&","&day1&","&hour1&","&Minute1&","&Second1
%>
<script language=javascript>
function time(liveclock){
var s='';
var d=liveclock!=null?new Date(liveclock):new Date();
with(d){
s=show5(getHours())+':'+show5(getMinutes())+':'+show5(getSeconds())
}
return(s);
}
function show5(num){
return num<10?'0'+num:num;
}
var dd=new Date("<%=now11%>");
var ss=setInterval("dd.setSeconds(dd.getSeconds()+1);liveclock.innerHTML='香港时间:<%=date()%> '+time(dd)+' '",1000)
</script>
<td width="58%" align="center"><div id="liveclock"> </div></td>
<td width="42%" align="center"><!--#include file="timer.asp"--></td>
</tr>
</table></TD>
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<form method="post" onSubmit="return SubChk(this);" action="l_order.asp" name="lt_form" target="leftFrame" >
<TR>
<TD colSpan=3 height="100%">
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?