Используйте 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
Вышеуказанное выполняет перенаправление, гарантируя, что запрошенная страница и строка запроса сохраняются