neworder.asp

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

<meta http-equiv='refresh' content="5">
<!--#include file="../manager/function/conn.asp"-->
<%
myOrderStr=request("myurl")
mytmp=split(myOrderStr,"|")
for i=0 to ubound(mytmp)
myOrderTmp=split(mytmp(i),"^")
if myNewBool(myOrderTmp(0),myOrderTmp(1)) then
response.write "<script language='Javascript'>parent.window.location.href='index.asp';</script>"
exit for
end if
next


function myNewBool(id,status)
set rs=server.CreateObject("adodb.recordset")
sql="select * from ticket_m where 订单编号 ='"&id&"' and 网上订单状态='"&status&"'"
rs.open sql,conn,3,1
if rs.eof or rs.bof then
myNewBool=true
else
myNewBool=false
end if
rs.close
set rs=nothing

end function

conn.close
set conn=nothing
%>