asp中获取当前页面的地址与参数的函数代码
更新时间:2011年01月06日 00:15:45 作者:
asp中获取当前页面的地址与参数的函数代码,经常需要用得到,特整理下,方便需要的朋友。
复制代码 代码如下:
Function getCurrentUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
strTemp = "http://"
Else
strTemp = "https://"
End If
strTemp = strTemp & Request.ServerVariables("SERVER_NAME")
If Request.ServerVariables("SERVER_PORT") <> 80 Then
strTemp = strTemp & ":" & Request.ServerVariables("SERVER_PORT")
end if
strTemp = strTemp & Request.ServerVariables("URL")
getCurrentUrl = strTemp
End Function
Function getUrlWithParams()
Dim ScriptAddress,Servername,qs
ScriptAddress = CStr(Request.ServerVariables("SCRIPT_NAME"))
Servername = CStr(Request.ServerVariables("Server_Name"))
qs=Request.QueryString
If Request.ServerVariables("SERVER_PORT") <> 80 Then
Servername = Servername & ":" & Request.ServerVariables("SERVER_PORT")
end if
if qs<>"" then
getUrlWithParams ="http://"& Servername & ScriptAddress &"?"&qs
else
getUrlWithParams ="http://"& Servername & ScriptAddress
end if
End Function
相关文章
ASP基础入门第八篇(ASP内建对象Application和Session)
这篇文章主要介绍了ASP内建对象Application和Session的相关资料,需要的朋友可以参考下2015-10-10通过VB6将ASP编译封装成DLL组件最简教程 附全部工程源文件
因为近期问的网友比较多,就简单整理出来一个,有问题可以通过评论2012-03-03P3P 和 跨域 (cross-domain) cookie 访问(读取和设置)
在IE 里面跨域去设置 cookie跨域的实现,尝试了n中方法都不行,查了一下资料,可以通过设置header中的p3p值来实现,真不错:)2009-06-06
最新评论