ASP中用于获取当前页面URL的函数

关注

原创最新推荐文章于 2026-07-17 16:29:08 发布 1.4k 阅读 AI 写同款· GEO 优化 ›

librealsense2 camera.so: undefined symbol:ZN2cV3MatC1EV解决笔记记录先参考的这个兄弟的办法虽然没解决但是提供了大方向感谢； realsenseD400系列相机报错：undefined symbol: _ZN2cv3MatC1EiiiRKNS_7Scalar_IdEE解决方案后解决办法参考 No GPU usage on jetson xavier NX · Issue #2326 · IntelRealSense/realsense-ros · GitHubOpenCV_DIR" to a directory containing one of the above f 阅读详情

<%
Function Cur_Url() '获取当前页面URL的函数
Dim Domain_Name,Page_Name,Quary_Name
Domain_Name = LCase(Request.ServerVariables("Server_Name"))
Page_Name = LCase(Request.ServerVariables("Script_Name"))
Quary_Name = LCase(Request.ServerVariables("Quary_String"))
If Quary_Name = "" Then
Quary_Name = LCase(Request.QueryString)
End If
If Quary_Name ="" Then
Cur_Url = " http://"&Domain_Name&Page_Name
Else
Cur_Url=" http://"&Domain_Name&Page_Name&"?"&Quary_Name
End If
End Function
%>

完整代码：
<%
Dim Domain_Name,Page_Name,Quary_Name
Domain_Name = LCase(Request.ServerVariables("Server_Name"))
Page_Name = LCase(Request.ServerVariables("Script_Name"))
Quary_Name = LCase(Request.ServerVariables("Quary_String"))
If Quary_Name = "" Then
Quary_Name = LCase(Request.QueryString)
End If
If Quary_Name ="" Then
Cur_Url = "http://"&Domain_Name&Page_Name
Else
Cur_Url="http://"&Domain_Name&Page_Name&"?"&Quary_Name
End If
Response.Write(Cur_Url)
Response.End()
%>

收录于