asp 获取地址栏参数代码
============================================
函数名JoinChar
作 用向地址中加入 ? 或 &
参 数strUrl 网址
返回值加了 ? 或 & 的网址
pos=InStr("abcdefg""cd")
则pos会返回表示查找到并且位置为第三个字符开始
这就是“查找”的实现而“查找下一个”功能的
实现就是把当前位置作为起始位置继续查找
============================================
function JoinChar(strUrl)
if strUrl="" then
JoinChar=""
exit function
end if
if InStr(strUrl"?")<len(strUrl) then
if InStr(strUrl"?")> 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
