最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
获取url包括参数
时间：2022-07-02 22:32:59 编辑：袖梨 来源：一聚教程网
获取url包括参数
'函数名：GetUrl
'作 用：获取url包括参数
'返回值：获取url包括参数
'****************************************************
Public Function GetUrl()
Dim strTemp
strTemp=Request.ServerVariables("Script_Name")
If Trim(Request.QueryString)<> "" Then
strTemp=strTemp&"?"
For Each M_item In Request.QueryString
strTemp=strTemp&M_item&"="&Server.UrlEncode(Trim(Request.QueryString(""&M_item&"")))
next
end if
GetUrl=strTemp
End Function
'使用方法
call GetUrl()
相关文章
- 微博手机网页版快捷入口-微博手机版极速入口 01-16
- 动物塑形性格测试网站推荐-动物塑形性格测试链接大全 01-16
- ponytown如何快速登录-ponytown详细登录指南 01-16
- 163邮箱网页版直达入口-163邮箱官网登录快捷入口 01-16
- 歪歪漫画秋蝉怎么进入-秋蝉漫画土豪版免费阅读网站直达 01-16
- 夸克网盘网页版一键入口-夸克浏览器云存储极速登录直达 01-16