?? userleft.asp
字號:
<!--#include file="manage/mConn.asp"-->
<!--#include file="manage/mConst.asp"-->
<!--#include file="manage/sk2.asp"-->
<% Set Rs6=Conn.Execute("Select ID,color From m_color Order By ID")
If Not Rs6.Eof Then
Get_Para_Color=Rs6.GetRows(-1)
End If
Get_Kithe_Para:Get_UserInfo
Set Rs6=Conn.Execute("select top 1 tray_time,affice,tray_switch,tray_show,tray_show2,tray_show3,affice2 from m_config")
Dim affice,tray_time,tray_switch,tray_show,affice2
If Not Rs6.Eof Then
affice=Rs6("affice")
affice2=trim(Rs6("affice2"))
tray_time=Rs6("tray_time")
tray_switch=Rs6("tray_switch")
tray_show=Rs6("tray_show")
tray_show2=Rs6("tray_show2")
tray_show3=Rs6("tray_show3")
End If
'Set Rs6=Conn.Execute("Select Top 1 ID,NN,ND,NA,N1,N2,N3,N4,N5,N6 From m_Kithe where NN='"&Current_Kithe_Num&"'")
'Current_KitheTable=Rs6.GetRows(1)
'if Current_KitheTable(3,0)<>0 or Current_KitheTable(4,0)<>0 then
'Kithe_Num=Current_Kithe_Num
'else
'Kithe_Num=Current_Kithe_Num-1
'end if
'Set Rs6=Nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>Untitled Document</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="images/css-g.css" type=text/css rel=stylesheet>
<SCRIPT language=JAVASCRIPT>
if(self == top){location = '/';}
</SCRIPT>
<SCRIPT language=javascript>
window.setTimeout("self.location='userleft.asp'", 10000);
</SCRIPT>
<META content="Microsoft FrontPage 4.0" name=GENERATOR></HEAD>
<BODY oncontextmenu=window.event.returnValue=false bgColor=#e5eaee leftMargin=0
topMargin=0>
<TABLE height=235 cellSpacing=0 cellPadding=0 width=230 border=0>
<TBODY>
<TR>
<TD background=images/qq2.gif height=30> </TD></TR>
<TR>
<TD vAlign=top height=76>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width=227 border=0>
<TBODY>
<TR>
<TD width=16 background=images/qq1.gif rowSpan=2></TD>
<TD width=215 height=26>
<TABLE height=25 cellSpacing=0 cellPadding=0 width=200
background=images/pp.gif border=0>
<TBODY>
<TR>
<TD>
<DIV align=center><FONT
color=#ffffff>請確認您的帳戶</FONT></DIV></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD height=123>
<TABLE class=table_02 height=135 cellSpacing=6 cellPadding=0
width="95%" align=left border=0>
<TBODY>
<TR>
<TD vAlign=center width="11%" height=25><FONT size=2><IMG
height=30 src="images/ico.gif" width=30> </FONT></TD>
<TD class=title_01 vAlign=center width="89%" height=20>帳戶名稱:
<%=session("sk2user")%></TD></TR>
<TR>
<TD vAlign=center height=20><FONT size=2><IMG height=30
src="images/ico.gif" width=30> </FONT></TD>
<TD class=title_01 vAlign=center height=20>信用額度: <%=userinfo(5,0)%></TD></TR>
<TR align=left>
<TD class=td_fail colSpan=2><FONT
color=#0000ff>請選擇下注彩球</FONT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top align=middle background=images/iny.gif>
<table width="120" border="0">
<tr>
<td>
<%if affice2<>"" then
response.write "<div align='center'><font color='#FFFF00'>"
response.write affice2
response.write "</font></div>"
end if%>
</td>
</tr>
</table>
</TR>
<TR>
<TD vAlign=top height=10><IMG height=10 src="images/inz.gif"
width=230></TD></TR>
<TR>
<TD vAlign=top height=10> </TD>
</TR>
<TR>
<TD align=middle>
<%if tray_show=1 then%>
<TABLE cellSpacing=2 cellPadding=0 width=210 border=0>
<TBODY>
<TR>
<TD colSpan=5>期數:
<%
if tray_show2=1 then
response.Write Current_Kithe_Num
end if
if tray_show2=0 then
response.Write Current_Kithe_Num-1
end if%>
<%'=Current_Kithe_Num-1%>
開獎結果</TD>
<TD align=right colSpan=2><A href="javascript:location.reload();">更新</A></TD></TR>
<TR>
<%if tray_show3=0 then%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%else%>
<%Set Rs5=Conn.Execute("Select Top 1 N1 From m_Kithe where NN='"&Current_Kithe_Num&"'")%>
<%if Current_KitheTable(4,0)>0 then
'response.Write Rs5("N1")%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(4,0))-1))%>.gif bgColor=#c1d7e5 height=27>
<%if Current_KitheTable(4,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(4,0)%></TD>
<%else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(5,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(5,0))-1))%>.gif bgColor=#c1d7e5 height=27><%if Current_KitheTable(5,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(5,0)%></TD>
<%else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(6,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(6,0))-1))%>.gif bgColor=#c1d7e5 height=27><%if Current_KitheTable(6,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(6,0)%></TD>
<% else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(7,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(7,0))-1))%>.gif bgColor=#c1d7e5 height=27><%if Current_KitheTable(7,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(7,0)%></TD>
<%else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(8,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(8,0))-1))%>.gif bgColor=#c1d7e5 height=27><%if Current_KitheTable(8,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(8,0)%></TD>
<%else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(9,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(9,0))-1))%>.gif bgColor=#c1d7e5 height=27><%if Current_KitheTable(9,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(9,0)%></TD>
<%
else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if%>
<%if Current_KitheTable(3,0)>0 then%>
<TD class=ball_td align=middle width=30
background=images/<%=trim(Get_Para_Color(1,cint(Current_KitheTable(3,0))-1))%>.gif bgColor=#c1d7e5
height=27><%if Current_KitheTable(3,0)<10 then
response.Write "0"
end if
response.Write Current_KitheTable(3,0)%></TD>
<%
else%>
<TD class=ball_td align=middle width=30
background=images/white_ball.gif bgColor=#c1d7e5 height=27>00</TD>
<%end if
end if%></TR></TBODY></TABLE>
<%end if%>
</TD></TR></TBODY></TABLE>
</BODY></HTML>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -