您现在的位置是：网站首页> 编程资料编程资料
JoinChar 向地址中加入 ? 或 & 用于实现传参_应用技巧_
2023-05-25
253人已围观
简介 JoinChar 向地址中加入 ? 或 & 用于实现传参_应用技巧_
'**************************************************
'函数名：JoinChar
'作 用：向地址中加入 ? 或 &
'参 数：strUrl ----网址
'返回值：加了 ? 或 & 的网址
'**************************************************
function JoinChar(strUrl)
if strUrl="" then
JoinChar=""
exit function
end if
if InStr(strUrl,"?") if InStr(strUrl,"?")>1 then
if InStr(strUrl,"&") JoinChar=strUrl & "&"
Else
JoinChar=strUrl
end if
Else
JoinChar=strUrl & "?"
end if
Else
JoinChar=strUrl
end if
end function
'函数名：JoinChar
'作 用：向地址中加入 ? 或 &
'参 数：strUrl ----网址
'返回值：加了 ? 或 & 的网址
'**************************************************
function JoinChar(strUrl)
if strUrl="" then
JoinChar=""
exit function
end if
if InStr(strUrl,"?")
if InStr(strUrl,"&")
Else
JoinChar=strUrl
end if
Else
JoinChar=strUrl & "?"
end if
Else
JoinChar=strUrl
end if
end function
相关内容
- ShowPage 显示“上一页 下一页”等信息的封装代码_应用技巧_
- asp实现检查目录是否存在与建立目录的函数_应用技巧_
- ScriptHtml 函数之过滤html标记的asp代码_应用技巧_
- GetPaing 函数之asp采集函数中用到的获取分页的代码_应用技巧_
- FpHtmlEnCode 函数之标题过滤特殊符号的代码_应用技巧_
- SaveRemoteFile函数之asp实现保存远程的文件到本地的代码_应用技巧_
- ASP检查文件与目录是否存在的函数代码_应用技巧_
- ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码_应用技巧_
- FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码_应用技巧_
- ASP+XML实例演练编程代码第1/3页_应用技巧_
