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

📄 dd_sg.asp

📁 机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../manager/function/conn.asp"-->
<!--#include file="../safe_mem.asp"-->
<%
mem_id=trim(request.Cookies("mem_name"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from tmember where mem_loginname ='"&mem_id&"'"
rs.open sql,conn,3,1
if rs.eof then
response.write mem_id
response.end
'response.Redirect "index.asp"
else
mem_name=rs("mem_name")
mem_sex=rs("mem_sex")
mem_money=rs("mem_money")
if mem_sex="F" THEN
mem_call="女士"
else
mem_call="先生"
END IF
'mem_=rs("mem_")
'mem_=rs("mem_")
'mem_=rs("mem_")
end if
%>
<% 
		  set rss=Server.CreateObject("AdoDb.recordset")
		  sql2="select * from tmember where mem_loginname = '"&mem_id&"'"
		  rss.open sql2,conn,1,1
		  %>
<%
dim pn
dim d_page
d_page=5
'设定重复的条数 
rss.pagesize=d_page
if request.querystring("pn")="" or request.querystring("pn")=0 then
pn=1
else
pn=request.querystring("pn")
rss.absolutepage=trim(request.querystring("pn"))
end if
%>
<!--#include file="../../config.asp"--><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=ZXLCompanyStr%>航空服务,订票,打折机票</title>
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>     
function DoDateTime(str, nNamedFormat, nLCID)    
 dim strRet        
 dim nOldLCID        
          
 strRet = str        
 If (nLCID > -1) Then       
  oldLCID = Session.LCID      
 End If         
          
 On Error Resume Next       
          
 If (nLCID > -1) Then       
  Session.LCID = nLCID      
 End If         
          
 If ((nLCID < 0) Or (Session.LCID = nLCID)) Then    
  strRet = FormatDateTime(str, nNamedFormat)   
 End If         
          
 If (nLCID > -1) Then       
  Session.LCID = oldLCID      
 End If         
          
 DoDateTime = strRet       
End Function         
</SCRIPT>
<script language="JavaScript" type="text/JavaScript">
<!--

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<link href="RLimages/user.css" rel="stylesheet" type="text/css">
</head>

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="MM_preloadImages('RLimages/top_file_01-over.gif','RLimages/top_file_02-top_file_01_ove.gif','RLimages/top_file_03-top_file_01_ove.gif','RLimages/top_file_04-top_file_01_ove.gif','RLimages/top_file_05-top_file_01_ove.gif','RLimages/top_file_06-top_file_01_ove.gif','RLimages/top_file_07-top_file_01_ove.gif','RLimages/top_file_08-top_file_01_ove.gif','RLimages/top_file_09-over.gif','RLimages/top_file_10-top_file_09_ove.gif')">
<!--#include file="index_top.asp" -->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td height="3" colspan="3"> </td>
  </tr>
  <tr> 
    <td width="164" valign="top" background="RLimages/my_syzx_bg.gif"> 
      <!--#include file="../include/my_rl_ZXLloft.asp" -->
    </td>
    <td width="20" align="right" valign="top">&nbsp;</td>
    <td width="576" align="right" valign="top"> <table width="584" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td bgcolor="#2E7FD1">&nbsp;</td>
        </tr>
        <tr> 
          <td height="25" bgcolor="#2F8DED" class="b-14"><strong><font color="#FFFFFF"> 订单修改及查询</font></strong> 
          </td>
        </tr>
      </table>
      <table width="584" border="0" cellpadding="0" cellspacing="1" bgcolor="#999999">
        <tr> 
          <td width="576" align="right" bgcolor="#FFFFFF"><TABLE width="570" border="0" cellpadding="0" cellspacing="0">
              <TBODY>
                <TR> 
                  <FORM name=ShowOrder>
                    <TD width="591" align=left><span class="b-14"><FONT 
            color=#999999 class=medium><B>查询选择订单列表</B></FONT>&nbsp;&nbsp;&nbsp;<br>
                      <FONT color=#666666 
            class=medium>订单类型:</FONT></span> <SELECT 
              name=OrderShowType>
                        <option selected>请选择</option>
                        <option value="F">国内机票</option>
                        <option>国际机票</option>
                        <option value="P">旅游度假</option>
                        <option value="J">航空货运</option>
                        <option value="G">兑奖</option>
                      </SELECT> &nbsp;&nbsp;<span class="b-14"><FONT class=medium 
            color=#003399><br>
                      </FONT><FONT 
            color=#666666 class=medium>订单状态:</FONT></span> <SELECT name=OrderShowCond>
                        <OPTION 
              selected value=VAL>有效订单</OPTION>
                        <OPTION 
            value=ALL>全部订单</OPTION>
                      </SELECT> &nbsp;&nbsp;<br> <span class="b-14"><FONT 
            color=#666666 class=medium>指定订单:</FONT></span> <INPUT name=searchOrderid class="book" 
size=20>
                      &nbsp;&nbsp; <input name="imageField" type="image" src="RLimages/my_syzx_cx.gif" width="49" height="18" border="0">
                    </TD>
                  </FORM>
                </TR>
                <TR> 
                  <TD class="b-14"><FONT color="#FF0000" class=small>* </FONT><FONT class=small>系统保留最近三个月的订单,如需查询三个月以前的订单,请致电<%=ZXLCompanyStr%>商旅网预订中心023-68737855 <BR>
                    <font color="#FF0000">* </font>订单状态选择“有效订单”,系统将不显示未提交、取消及被修改的订单<A 
            href="dd_sg_js.asp" 
            target=_blank>订单状态解释</A></FONT></TD>
                </TR>
                <TR> 
                  <TD height="94" colspan="2" valign="top"> <FONT color="#FF6600" class=medium><B><br>
                    没有找到符合查询条件的订单!<br>
                    <br>
                    </b></FONT> <TABLE width="563" border=0 align="center" cellPadding=0 cellSpacing=1 bgcolor="#999999">
                      <TBODY>
                        <TR bgcolor="#FFFFFF"> 
                          <TD width="88" height="20" align="center" class="b-12">预订时间 
                          </TD>
                          <TD width="284" height="20" align="center" class="b-12">预订内容</TD>
                          <TD width="93" height="20" align="center" class="b-12">预订状态</TD>
                          <TD width="89" height="20" align="center" class="b-12">预订金额</TD>
                        </TR>
                        <%if rss.eof and rss.bof then%>
                        <TR bgcolor="#FFFFFF"> 
                          <TD height="20" colspan="4" align="center" class="b-12">您暂时没有预订记录</TD>
                        </TR>
                        <%else%>
                        <%do while not rss.eof and d_page>0 %>
                        <TR bgcolor="#FFFFFF"> 
                          <TD height="20" align="center" class="b-12"><%= DoDateTime(rss("Mem_RegistDate"), 2, -1) %></TD>
                          <TD height="20" align="center" class="b-12"><a href="#" class="b-12">预订<%=rss("city_from")%>到<%=rss("city_to")%>的<%=rss("FlightSchedule")%>次航班</a></TD>
                          <TD height="20" align="center" class="b-12">预定中</TD>
                          <TD height="20" align="center" class="b-12"><%=rss("totalPrice")%>.00元/张</TD>
                        </TR>
                        <% d_page=d_page-1
rss.movenext
loop	%>
                        <TR bgcolor="#C3E7F9"> 
                          <TD height="20" colspan="4" align="center" class="b-12"><p align="right">第<font color="#ff0000"><%=pn%></font>页 
                              <%
                            for p=1 to rss.pagecount
                            response.write ("[")
                            response.write "<a href=index.asp?pn="&p&">"&p&"</a>"
                            response.write ("]&nbsp;")
                            next
                          %>
                          共<%=rss.pagecount%>页</p></TD>
                        </TR>
                        <%end if%>
                      </TBODY>
                    </TABLE>
                    <br> 
              </TBODY>
            </TABLE></td>
        </tr>
      </table>
      <br> </td>
  </tr>
</table>
<!--#include file="../include/foot_.asp" -->
</body>
</html>
<%
rss.close
set rss=nothing
rs.close
set rs=nothing
call conn_close()
%>

⌨️ 快捷键说明

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