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

2024-05-04 10:57:47

字体：大中小

来源：转载

供稿：网友

'**************************************************
'函数名：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

上一篇：ASP下存储过程编写入门全接触第1/5页

下一篇：asp下的风讯用的SQL通用防注入模块提供了