xt-checkout.asp

来自「用ASP写的电子购物系统」· ASP 代码 · 共 22 行

<%@ Language=VBScript %>
<!--#INCLUDE FILE = "include/shop.asp" -->
<!--#INCLUDE FILE = "include/util.asp" -->
<% REM ##########################################################################%>
<% REM                                                                          #%>
<% REM   XT_CHECKOUT.ASP                                                        #%>
<% REM   checkout前检查用户                                                     #%>
<% REM                                                                          #%>
<% REM   Copyright (c) 1999-2000 Epro Corporation.  All rights reserved.        #%>
<% REM                                                                          #%>
<% REM ##########################################################################%>

<%

   if IsNull(ShopperID) or IsEmpty(ShopperID) then 
      Response.Redirect "login.asp?goto=checkout.asp"
   else
       Response.Redirect	"checkout.asp"
   end if
%>