neworder.asp

机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design

 <meta http-equiv="Refresh" content="5;URL='newOrder.asp'"> 
<!--#include file="function/conn.asp" -->
<%
	'login_safe=session("login_safe")
	'username=session("login_name")
	'adm_gread=session("login_grade")
	'Adm_Remark= session("Adm_Remark")
	'login_ip=session("login_ip")
	'adm_type=session("adm_type")

	'Adm_StartCity=session("Adm_StartCity")
	'city_IfInclude=session("city_IfInclude")
	sqlAddStr=""
   if adm_type="" or isnull(adm_type) then adm_type="1"
   If Adm_StartCity="" Or InStr(Adm_StartCity,"*")<>0 Then 
		sqlAddStr=""
   Else
		If city_IfInclude="0" Then sqlAddStr=" not "
		sqlAddStr=" and b.[序号]=1 and "&sqlAddStr&"(instr('"&Adm_StartCity&"',b.[FromCityCode])<>0)" 
   End If
   
   set rst=Server.CreateObject("ADODB.Recordset")	
   itemp=(cint(adm_type)-1)*3


   strSQL="select a.ID,a.[订单编号] from ticket_M a inner join ticket_d b on a.[订单编号]=b.[订单编号] where a.ifRemindflag='1' and a.[网上订单状态]='"&adm_type&"'" &sqlAddStr

   myid=session("NewOrderTrueId")
   '-- 新的机票订单铃声
   rst.open strSQL,conn,3,1
   if not (rst.bof or rst.eof) Then
     if myid<>rst("订单编号") Then
	 hasTicketOrder=1
	 myid=rst("订单编号")
	 session("NewOrderTrueId")=myid
     response.write "<script language='javascript'>window.open('HasOrderNotice.asp?type=Ticket&id="&myid&"','','width=260,height=180,resizable=no,scrollbars=no,top=0,left=0');</script>"

	 end if
   end if
rst.close	
set rst=nothing
call conn_close()
%>