当前位置: 首页 > 图文教程 > 网络编程 > ASP > JoinChar 向地址中加入 ? 或 & 用于实现传参

ASP
用EasyMailObject组件处理Exchange邮件源代码(6)
用EasyMailObject组件处理Exchange邮件源代码(7)
利用ASP和Access数据库制作局域网网上答题系统
用ASP开发试题库与在线考试系统(1)
用ASP开发试题库与在线考试系统(2)
用ASP开发试题库与在线考试系统(3)
用ASP开发试题库与在线考试系统(4)
用ASP开发试题库与在线考试系统(5)
用ASP开发试题库与在线考试系统(6)
用ASP开发试题库与在线考试系统(7)
用ASP开发试题库与在线考试系统(8)
综合的判断用户输入的合法性的函数
三层动态下拉菜单的例子
将你的网站设置为客户的信任站点--VB方案
论坛中有新贴子功能的实现
ASP 编程中 15 个非常有用的例子
一个的无组件上传的ASP代码
利用ASP实现三个强大功能之一
利用ASP实现三个强大功能之二
利用ASP实现三个强大功能之三

ASP 中的 JoinChar 向地址中加入 ? 或 & 用于实现传参


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 203 ::
收藏到网摘: n/a

'**************************************************
'函数名:JoinChar
'作 用:向地址中加入 ? 或 &
'参 数:strUrl ----网址
'返回值:加了 ? 或 & 的网址
'**************************************************
function JoinChar(strUrl)
if strUrl="" then
JoinChar=""
exit function
end if
if InStr(strUrl,"?")<len(strUrl) then
if InStr(strUrl,"?")>1 then
if InStr(strUrl,"&")<len(strUrl) then
JoinChar=strUrl & "&"
Else
JoinChar=strUrl
end if
Else
JoinChar=strUrl & "?"
end if
Else
JoinChar=strUrl
end if
end function