自动获取当前页面URL的ASP函数- ASP - 软晨网（RuanChen.com）

当前位置: 首页 > 图文教程 > 网络编程 > ASP > 自动获取当前页面URL的ASP函数

技术文章搜索

关键字

自动获取当前页面URL的ASP函数

出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-08-14 浏览: 122 ::

收藏到网摘: n/a

asp检测conn.execute是否执行成功的函数 ASP采集中获取网页内所需的html代码

自动获取当前页面URL的ASP函数：

<%
Function GetLocationURL()
Dim Url
Dim ServerPort,ServerName,ScriptName,QueryString
ServerName = Request.ServerVariables("SERVER_NAME")
ServerPort = Request.ServerVariables("SERVER_PORT")
ScriptName = Request.ServerVariables("SCRIPT_NAME")
QueryString = Request.ServerVariables("QUERY_STRING")
Url="http://"&ServerName
If ServerPort <> "80" Then Url = Url & ":" & ServerPort
Url=Url&ScriptName
If QueryString <>"" Then Url=Url&"?"& QueryString
GetLocationURL=Url
End Function
Response.Write GetLocationURL()
%>

asp检测conn.execute是否执行成功的函数 ASP采集中获取网页内所需的html代码

自动获取当前页面URL的ASP函数

评论 (0) All