vbscript - 重定向经典 asp global.asa 文件上的所有请求？

Question

我尝试Global.asa通过添加以下代码在我的 Classic ASP 应用程序中的文件中进行永久重定向：

Sub Session_OnStart
  queryString= Request.ServerVariables("QUERY_STRING")
  url = "http://www.newdomain.com" & Request.ServerVariables("PATH_INFO")
  If Len(queryString)<>0 Then
    url = url & "?" & queryString
  End If

  Response.Status = "301 Moved Permanently"
  Response.AddHeader "Location", url
  Response.End()
End Sub

这对一个用户第一次很有效，因为它在每个会话中执行一次重定向，但是我如何在每个请求上执行它？

Answer 1

Session.Abandon在重定向之前添加到您的子目录。这将结束会话，任何新请求都将启动新会话。