JoinChar 向地址中加入 ? 或 & 用于實(shí)現(xiàn)傳參
更新時(shí)間:2007年09月01日 22:22:00 作者:
'**************************************************
'函數(shù)名:JoinChar
'作 用:向地址中加入 ? 或 &
'參 數(shù):strUrl ----網(wǎng)址
'返回值:加了 ? 或 & 的網(wǎng)址
'**************************************************
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
'函數(shù)名:JoinChar
'作 用:向地址中加入 ? 或 &
'參 數(shù):strUrl ----網(wǎng)址
'返回值:加了 ? 或 & 的網(wǎng)址
'**************************************************
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
相關(guān)文章
asp通過(guò)JMAIL實(shí)現(xiàn)通用發(fā)送函數(shù)
asp通過(guò)JMAIL實(shí)現(xiàn)通用發(fā)送函數(shù)...2007-08-08asp實(shí)現(xiàn)帶刷新功能的驗(yàn)證碼代碼
本文給大家分享的是一段使用asp實(shí)現(xiàn)的驗(yàn)證碼功能,而且是帶刷新的,代碼非常簡(jiǎn)潔,非常實(shí)用,有需要的小伙伴可以參考下。2015-05-05ASP出現(xiàn)問(wèn)題?修復(fù)ASP的批處理
ASP出現(xiàn)問(wèn)題?修復(fù)ASP的批處理,需要的朋友可以參考下。2011-10-10解決使用良精企業(yè)建站7.0未注冊(cè)問(wèn)題
解決使用良精企業(yè)建站7.0未注冊(cè)問(wèn)題...2007-04-04ASP語(yǔ)言實(shí)現(xiàn)對(duì)SQL SERVER數(shù)據(jù)庫(kù)的操作
目前有很多介紹用ASP開(kāi)發(fā)網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的程序例子,但絕大部分是利用ACCESS作底層數(shù)據(jù)庫(kù)。相對(duì)于ACCESS而言,SQL SERVER數(shù)據(jù)庫(kù)系統(tǒng)要復(fù)雜得多,因此在程序開(kāi)發(fā)中需要多做一些工作。筆者結(jié)合自己開(kāi)發(fā)管理信息系統(tǒng)的經(jīng)驗(yàn),在此試舉一例,與感興趣的朋友共同交流2015-09-09ASP也使用ORM,給ASP上所有的SQL注入畫(huà)上句號(hào)
PS:KJ大牛寫(xiě)的文章,昨天跟一朋友聊天的時(shí)候提到了ADO的command查詢(xún),我竟然把這個(gè)東西給忘記了,看來(lái)記性真的是太差了,找到了kj大牛的文章,拜讀一下。2008-12-12