% If (Request.ServerVariables("HTTPS") = "on") Then Dim xredir__, xqstr__ xredir__ = "http://" & Request.ServerVariables("SERVER_NAME") & _ Request.ServerVariables("SCRIPT_NAME") xqstr__ = Request.ServerVariables("QUERY_STRING") If xqstr__ <> "" Then xredir__ = xredir__ & "?" & xqstr__ Response.Redirect xredir__ End if %>
![]() |
|||||
|