⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 index_report.asp

📁 1。超强文件读写锁定
💻 ASP
字号:
<!--#include file="mConn.asp"-->
<!--#include file="mConst.asp"-->
<!--#include file="sk2.asp"-->
<% If Session("SK2admin")=""  Then
    Response.Write ("<script Language=Javascript>window.open('index.asp','_top');</script>")
	Response.End
End If
  Show_Kithe
  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
Set Rs6=Conn.Execute("Select ID,NN,ND,NA,N1,N2,N3,N4,N5,N6 From m_Kithe Order By ID Desc")
	If Not Rs6.Eof Then
     Kithe_Table=Rs6.GetRows(-1)
	 'Kithe_Sum=Ubound(Kithe_Table,2)
	End If%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>reports</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="../images/control_main.css" type=text/css rel=stylesheet>
<SCRIPT>
<!--
 function onSubmit()
 {
  kind_obj = document.getElementById("report_kind");
  form_obj = document.getElementById("myFORM");
  if(kind_obj.value == "A")
   form_obj.action = "report_all.asp";
  else
   form_obj.action = "report_class.asp";
  return true;
 }
-->
</SCRIPT>
<SCRIPT language=javascript>
if(self == top) location = '/';
</SCRIPT>
<LINK href="../images/calendar.css" rel=stylesheet>
<SCRIPT language=JavaScript src="../images/simplecalendar.js"></SCRIPT>
<META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#ffffff leftMargin=0 topMargin=0>
<FORM id=myFORM name=FrmData onsubmit="return onSubmit();" action="" method=get>
<INPUT type=hidden name=sid> 
<TABLE cellSpacing=0 cellPadding=0 width=780 border=0>
  <TBODY>
  <TR>
    <TD height=4></TD></TR>
  <TR>
    <TD class=m_tline>
      <TABLE cellSpacing=0 cellPadding=0 border=0>
        <TBODY>
        <TR>
          <TD>&nbsp;&nbsp;报表管理:</TD></TR>
        <TR>
          <TD height=4></TD></TR></TBODY></TABLE>
      <TABLE class=rp_bg_tab cellSpacing=1 cellPadding=0 width=600 border=0>
        <TBODY>
        <TR>
          <TD class=rp_title_l>种类: </TD>
          <TD class=rp_title_r><SELECT class=za_select name=game_type> 
              <OPTION value="" selected>全部</OPTION> <OPTION 
            value=LT>六合彩</OPTION></SELECT> </TD></TR>
        <TR>
          <TD class=rp_title_l>日期区间: </TD>
          <TD class=rp_title_r>
            <TABLE cellSpacing=0 cellPadding=0 border=0>
              <TBODY>
              <TR>
                <TD><INPUT class=za_text maxLength=11 value=<%=formattime(date(),"ydm")%> 
                  name=date_start> </TD>
                <TD><A 
                  onmouseover="if (timeoutId) clearTimeout(timeoutId);window.status='Show Calendar';return true;" 
                  onclick="g_Calendar.show(event,'FrmData.date_start',true,'yyyy-mm-dd'); return false;" 
                  onmouseout="if (timeoutDelay) calendarTimeout();window.status='';" 
                  href="javascript:%20void(0);">&nbsp;&nbsp;<IMG height=21 
                  src="../images/calendar.gif" width=34 border=0 
                  name=imgCalendar></A></TD>
                <TD align=middle width=20>~</TD>
                <TD><INPUT class=za_text maxLength=10 size=10 value=<%=formattime(date(),"ydm")%>
                  name=date_end> </TD>
                <TD><A 
                  onmouseover="if (timeoutId) clearTimeout(timeoutId);window.status='Show Calendar';return true;" 
                  onclick="g_Calendar.show(event,'FrmData.date_end',true,'yyyy-mm-dd'); return false;" 
                  onmouseout="if (timeoutDelay) calendarTimeout();window.status='';" 
                  href="javascript:%20void(0);">&nbsp;&nbsp;<IMG height=21 
                  src="../images/calendar.gif" width=34 border=0 
                  name=imgCalendar></A></TD>
                <TD align=right width=200><SELECT class=za_select 
                  onchange=document.myFORM.date_start.value=this.value;document.myFORM.date_end.value=this.value; 
                  name=lt_num> 
				  <OPTION value=<%=date()%>  selected>请选取期数</OPTION>
				  <%for I=0 to ubound(Kithe_Table,2)%>
					 <OPTION value=<%=formattime(Kithe_Table(2,I),"ydm")%>>
					 第 <%if Kithe_Table(1,I)<10  then 
					 response.Write "0"
					 end if
					 response.Write Kithe_Table(1,I)%> 期 
                    <%=formattime(Kithe_Table(2,I),"ydm")%></OPTION><%next%> </SELECT> 
			</TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD class=rp_title_l>报表分类: </TD>
          <TD class=rp_title_r><SELECT class=za_select name=report_kind> 
              <OPTION value=A selected>总帐</OPTION> <OPTION 
            value=C>分类帐</OPTION></SELECT> </TD></TR>
        <TR>
          <TD class=rp_title_l>投注方式: </TD>
          <TD class=rp_title_r><SELECT class=za_select name=pay_type> 
              <OPTION value="" selected>全部</OPTION> <OPTION 
              value=0>信用额度</OPTION> <OPTION value=1>现金</OPTION></SELECT> </TD></TR>
        <TR>
          <TD class=rp_title_l>下注管道: </TD>
          <TD class=rp_title_r><SELECT class=za_select name=bet_type> 
              <OPTION value="" selected>全部</OPTION> <OPTION 
              value=N>网路下注</OPTION> <OPTION value=T>电话下注</OPTION></SELECT> </TD></TR>
        <TR>
          <TD class=rp_title_l>投注种类: </TD>
          <TD class=rp_title_r><SELECT class=za_select name=wtype>
		   <OPTION  value="" selected>全部</OPTION>
		    <OPTION value=1>特别号</OPTION> 
              <OPTION value=2>特别号:单双</OPTION> 
			  <OPTION value=3>特别号:大小</OPTION> 
              <OPTION value=4>特别号:合数单双</OPTION>
			   <OPTION value=5>色波</OPTION> 
              <OPTION value=6>正码</OPTION> 
			  <OPTION value=7>总和:单双</OPTION> 
              <OPTION value=8>总和:大小</OPTION>
			   <OPTION value=9>正码1-6:单双</OPTION> 
              <OPTION value=10>正码1-6:大小</OPTION> 
			  <OPTION  value=11>正码1-6:色波</OPTION> 
			  <OPTION value=12>三全中</OPTION>
			   <OPTION value=13>三中二</OPTION> 
			   <OPTION value=14>二全中</OPTION> 
			   <OPTION  value=15>二中特</OPTION> 
			   <OPTION value=16>特串</OPTION> 
			   <OPTION value=17>正码过关</OPTION> 
			   <OPTION value=18>生肖</OPTION> 
			   <OPTION  value=19>一肖</OPTION>
			    <OPTION value=20>特码补牌</OPTION>
				</SELECT> 
        </TD></TR></TBODY></TABLE>
      <TABLE class=rp_bg_bt cellSpacing=0 cellPadding=0 width=600 border=0>
        <TBODY>
        <TR align=middle>
          <TD bgColor=#ffffff height=30><INPUT class=za_button type=submit value=查询 name=SUBMIT> 
            &nbsp;&nbsp;&nbsp; <INPUT class=za_button onclick=javascript:history.go(-1) type=button value=取消 name=CANCEL> 
          </TD></TR></TBODY></TABLE></TABLE><INPUT type=hidden name=is_pay> 
</FORM></TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -