|
|
|
|
|
| | |
|
Active Server Pages asp search engine active server page asp application components tutorial CJWSoft ASPProtect ASPBanner ASPClassifieds
(Advanced)
(Components)
(Database)
(General)
(Vbscript)

|
|
Subject: |
Re: Moving from http to https using Response.Redirect |
From: |
Damon |
Date: |
3/7/2001 6:17:54 PM |
IP: |
63.84.216.2 |
Try this out:
<%@ Language=VBScript %>
<%
dim iCnt
dim iURLLen
dim sURL
dim sNewPath
sURL = Request.ServerVariables("PATH_INFO")
iURLLen = len(sURL)
for iCnt = iURLLen to 1 step -1
if mid(sURL,iCnt,1) <> "/" then
sNewPath = left(sUrl, iCnt - 1)
else
exit for
end if
next
'response.write "https://" & Request.ServerVariables("HTTP_HOST") & sNewPath & "RELATIVE_URL.asp<br/>"
response.redirect "https://" & Request.ServerVariables("HTTP_HOST") & sNewPath & "RELATIVE_URL.asp<br/>"
%>
|
Previous Message
|
|
|
|
|
|
|
|
|
|
|
|