user_book.asp

依蓝旅游网站管理系统Elan2008.SP2

<%
Dim BookID
BookID = Request("BookID")
Select Case BookID
   Case "1":  Response.Redirect "User_HotelBook.asp"
   Case "2":  Response.Redirect "User_FlightBook.asp"
   Case "3":  Response.Redirect "User_ProductBook.asp"
   Case "4":  Response.Redirect "User_SightBook.asp"
   Case "5":  Response.Redirect "User_ShopBook.asp"
   Case Else: Response.Redirect "User_HotelBook.asp"
End Select

%>