📄 usermain.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:Get_UserInfo
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 55 item_value,rate,current_rate,wager_gold,ID from m_rate where item_sort='特别号' Order By ID")
Dim ShowTable
ShowTable=Rs6.GetRows(55)
%>
<SCRIPT language=JAVASCRIPT>
if (self == top)
{
window.open('/','_top');
}
</SCRIPT>
<script language=javascript>
function new_win(html_name,winname,w,h){
if(winname=='') winname='WINDOWS';
if(w=='') w=640;
if(h=='') h=480;
//undefined
winformat="toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=no,width="+w+",height="+h;
winid = window.open(html_name,winname,winformat)
}
</script>
<SCRIPT language=javascript>
window.setTimeout("self.location='usermain.asp'", 30000);
</SCRIPT>
<!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>
<META content="MSHTML 6.00.2800.1106" name=GENERATOR>
<style type="text/css">
<!--
.style1 {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=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>
<%=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=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=135><numAN id=quickinput><INPUT class=select_cen onclick="parent.parent.leftFrame.location='lt_index2.htm?btype=num'" type=button value=快速输入 name=quickinput></numAN></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>
<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 colspan=2><table class=table_title_line cellspacing=1 cellpadding=0
width=502
border=0>
<tbody>
<tr>
<td colspan=4 height=30>期数: <b><%=Current_Kithe_Num%> 开奖日期:</b> <%=Kithe_OpenTime%>
<input class=select_cen type='button' value='切换快速模式' onClick="window.location.href='Q_Main.asp'">
<!--#include file="timer.asp"--></td>
</tr>
<tr>
<td colspan=4><table
width="100%" border=0 cellpadding=0 cellspacing=1>
<tbody>
<tr class=tr_title_set_cen>
<td width=48>号码</td>
<td width=48>赔率</td>
<td width=48>号码</td>
<td width=48>赔率</td>
<td width=48>号码</td>
<td width=48>赔率</td>
<td width=48>号码</td>
<td width=48>赔率</td>
<td width=48>号码</td>
<td width=48>赔率</td>
</tr>
<%For I=0 To 9%>
<tr>
<%if showtable(1,I)<>showtable(2,I) then %><td height=27 align=middle background=images/<%=NumberImage(I+1)%> bgcolor="#FFFFAA" class=ball_td1 id=num0><%else%><td id=num<%=i%> class=ball_td align=middle background=images/<%=NumberImage(I+1)%> height=27><%end if%><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>
<%if showtable(1,I)<>showtable(2,I) then
set Rs6=conn.execute("update m_rate set rate=current_rate where item_sort='特别号' and item_value='"&ShowTable(0,I)&"'")
response.Write "<EMBED src='images/ding.wav' hidden='true' LOOP='false' AUTOSTART='true'></EMBED>"%><td id=num<%=i%> align=middle bgcolor="#FFFFAA" ><%else%><td id=num<%=i%> align=middle bgcolor="#E4E4E4" ><%end if%><font style="FONT-WEIGHT: bold; FONT-SIZE: 13px; COLOR: #cc0000"> <font style="FONT-WEIGHT: bold; FONT-SIZE: 13px; COLOR: #cc0000"> <a href="s_order.asp?rate_id=<%=ShowTable(4,I)%>" target="leftFrame">
<%
select case UserInfo(4,0)
case "a"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -