查看: 409|回复: 0

[ASP函数] 查看当前URL的函数

[复制链接]
xuanxiao 发表于 2022-7-7 00:52:51 | 显示全部楼层 |阅读模式
  1. Function GetSelfURL()
  2.     If Request.ServerVariables("HTTPS")="on" Then
  3.         sSelfURL = "https://"
  4.     ElseIf Request.ServerVariables("HTTPS")="off" Then
  5.         sSelfURL = "http://"
  6.     End If
  7.     sSelfURL = sSelfURL & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("PATH_INFO")
  8.     sQuery = Request.ServerVariables("QUERY_STRING")
  9.     If sQuery <> "" Then
  10.         sSelfURL = sSelfURL & "?" & sQuery
  11.     End If
  12.     GetSelfURL = sSelfURL
  13. End Function
复制代码
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表

在线客服

售前咨询
售后咨询
服务热线
023-58418553
微信公众号