asp下實現(xiàn)字符串的補充fill()
更新時間：2008年02月15日 16:10:58 作者：
在一個字符串前后補全另一字符串,在一個字符串前面補全另一字符串,在一個字符串后面補全另一字符串
復制代碼 代碼如下:
<%
'功能:在一個字符串前后補全另一字符串
'來源:http://jorkin.reallydo.com/article.asp?id=452
Public Function Fill(ByVal sString, ByVal sStr)
Fill = RFill(LFill(sString, sStr), sStr )
End Function
%>
復制代碼 代碼如下:
<%
'功能:在一個字符串前面補全另一字符串
'來源:http://jorkin.reallydo.com/article.asp?id=452
Public Function LFill(ByVal sString, ByVal sStr)
Dim iStrLen : iStrLen = Len(sStr&"")
For i = iStrLen To 1 Step -1
If Right(sStr, i ) = Left(sString, i ) Then Exit For
Next
LFill = Left(sStr, iStrLen - i) & sString
End Function
%>
復制代碼 代碼如下:
<%
'功能:在一個字符串后面補全另一字符串
Public Function RFill(ByVal sString, ByVal sStr)
Dim iStrLen : iStrLen = Len(sStr&"")
For i = iStrLen To 1 Step -1
If Left(sStr, i) = Right(sString, i) Then Exit For
Next
RFill = sString & Mid(sStr, i + 1)
End Function
%>
例如:
<%=RFill(LFill("m.fzitv.net/article.asp","http://"),"article.asp?id=452")%>
相關文章
JavaScript在ASP頁面中實現(xiàn)掩碼文本框效果代碼
在網(wǎng)頁中輸日期、時間、IP地址等需要一定的格式限制，否則將會程序將會很難和程序溝通2012-08-08
asp下tag的實現(xiàn),簡單介紹與部分代碼...2007-03-03
asp中記錄集對象的getrows和getstring用法分析
asp中記錄集對象的getrows和getstring用法分析，需要的朋友可以參考下2012-03-03
GUID在許多時候做為唯一標識符都很方便，但是在ASP里并沒有現(xiàn)成的函數(shù)來創(chuàng)建GUID，其實可以使用Scriptlet的類型庫來創(chuàng)建一個GUID，2008-05-05
asp之自動閉合HTML/ubb標簽函數(shù) 附簡單注釋
在用到編輯器時，就會碰到一點，那就是標簽的閉合問題，這個問題非常嚴峻，因為這可能會導致網(wǎng)頁顯示的整體樣式受到破壞。2010-04-04
完美解決PJ的Cookies保存時限問題!可選擇記錄登陸時長!
完美解決PJ的Cookies保存時限問題!可選擇記錄登陸時長!...2007-02-02
ASP:ActiveX不能創(chuàng)建Scripting.FileSystemObject對象解決辦法
關于ActiveX不能創(chuàng)建Scripting.FileSystemObject對象的類似問題，大體上解決辦法都是類似的，主要是思想要清晰：首先考慮組件注冊問題，其次是組件權限問題，如果服務器配置沒有問題的話，那就仔細檢查一下你的程序源碼吧2011-11-11
asp身份證驗證代碼函數(shù)...2007-11-11
asp實現(xiàn)防止從外部提交數(shù)據(jù)的三種方法腳本之家補充
這篇文章主要介紹了asp實現(xiàn)防止從外部提交數(shù)據(jù)的三種方法,需要的朋友可以參考下2007-11-11
asp get和post數(shù)據(jù)接收過濾函數(shù)，一些為了安全2009-02-02