2008/12/07
[レガシASP]自分自身のURLを知る方法
Function GetSelfURL() If Request.ServerVariables("HTTPS")="on" Then sSelfURL = "https://" ElseIf Request.ServerVariables("HTTPS")="off" Then sSelfURL = "http://" End If sSelfURL = sSelfURL & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("PATH_INFO") sQuery = Request.ServerVariables("QUERY_STRING") If sQuery <> "" Then sSelfURL = sSelfURL & "?" & sQuery End If GetSelfURL = sSelfURL End Function
環境変数PATH_INFOの意味はApacheとIISで違うのがミソですねー。このコード、DimとかすればASP.NETでも使えるけどRequest.Uriがあるからいらないですね。
IISでは"URL"と"PATH_INFO"は同じみたいですね。Apacheではhttp://hogehoge/hoge.cgi/aaa/bbb みたいにできて、PATH_INFOは/aaa/bbbの部分を返します。ASPではそもそもできないっぽいですね。ASP.NETだとできますが。その場合Request.PathInfoで取得できます。
元記事:http://blogs.wankuma.com/mutaguchi/archive/2008/12/07/162935.aspxプライバシーポリシー