加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 编程开发 > asp.Net > 正文

asp-classic – 经典Asp页面中的Url重定向

发布时间:2020-12-16 07:33:55 所属栏目:asp.Net 来源:网络整理
导读:我有一个与重定向有关的问题 如果有人使用http://mywebsite.com/,我想应用重定向,然后URL将被重定向到http://www.mywebsite.com/.我知道它是302重定向但我不知道如何在编码中应用它……..什么VBScript可用于应用重定向? 我的网站是用经典ASP和VBScript构建
我有一个与重定向有关的问题

如果有人使用http://mywebsite.com/,我想应用重定向,然后URL将被重定向到http://www.mywebsite.com/.我知道它是302重定向但我不知道如何在编码中应用它……..什么VBScript可用于应用重定向?

我的网站是用经典ASP和VBScript构建的…任何一段代码对我来说都会更好

谢谢

解决方法

使用Request.ServerVariables(“HTTP_HOST”)获取主机部分,以便您可以检查它是否以www开头.或不.

如果没有,那么只需将Response.Redirect()发送到相应的URL,因为它将为您执行302:

例如

If Left(Request.ServerVariables("HTTP_HOST"),4) <> "www." Then
  Dim newUri
  'Build the redirect URI by prepending http://www. to the actual HTTP_HOST
  'and adding in the URL (i.e. the page the user requested)
  newUri = "http://www." & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("URL")

  'If there were any Querystring arguments pass them through as well
  If Request.ServerVariables("QUERY_STRING") <> "" Then
    newUri = newUri & "?" & Request.ServerVariables("QUERY_STRING")
  End If

  'Finally make the redirect
  Response.Redirect(newUri)
End If

上面做了一个重定向,确保保留所请求的页面和查询字符串

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读