推奨:ASPタグ付き文字列は、それらが症例感受性であることを指定します通常の交換関数コードは次のとおりです。パブリック関数ハイライト(s、f)dim tl、tm、tr、k tl = tm = tr = s k = s k = s k = s k = s k = s k = s k = s k = stl = tl = tl左(tr、k-1)tm = mid(tr、k、len(f))tl = tl span = '色tr = right(tr、len(tr)-len(f)-k+1)k = strust(1、tr、f、1)ループHig
現在、バグがまだあり、最新のテストページはhttp://www.reallydo.com/getimg.aspです。
通常の分析ページは、http://jorkin.reallydo.com/article.asp?id=380にあります
バグが見つかったら、後でメッセージを残してください、ありがとう。
1.31修正
SRC =正しく一致できない後のスペース。修理済み。
src = ''が空のときにエラーが発生しました。修理済み。
バグが見つかりました:画像パスに複数のスペースがある場合、保持できるのは1つだけです。修正されていない。
2.18修正
画像パスに複数のスペースがある場合、1つのバグのみを保持できます。修理済み。
<%
'関数:すべての画像アドレスを取得し、配列に保存します。
'出典:http://jorkin.reallydo.com/article.asp?id=448
'交換機能が必要です:http://jorkin.reallydo.com/article.asp?id=406
関数getimg(sstring)
Dim Sreallydo、Regex、Ireallydo
Dim Omatches、cmatch
'//空の配列を定義します
ireallydo = -1
redim areallydo(ireallydo)
isnull(sstring)の場合
getimg = areallydo
出口機能
ifを終了します
'// HTMLコードをフォーマットします
'//各<IMGラインブレークを持ち込み、定期的な交換を容易にします
SREALLYDO = SSTRING
エラーの再開時に次に再開します
SREALLYDO =置き換え(sreallydo、vbcr、)
sreallydo = falple(sreallydo、vblf、)
SREALLYDO =置き換え(SREALLYDO、VBTAB、)
SREALLYDO = facter(sreallydo、<img、vbcrlf&<img、1、-1、1)
sreallydo = falple(sreallydo、 />、 />、1、-1、1)
sreallydo = applayeall(sreallydo、=、=、true)
sreallydo = applecteall(sreallydo、>、>、true)
sreallydo = falple(sreallydo、> <、>&vbcrlf&<)
SREALLYDO = TRIM(SREALLYDO)
regex = new regexpを設定します
regex.ignorecase = true
regex.global = true
'//オンクリック、オンロード、その他のスクリプトを削除します
regex.pattern =/s [on] .+?=(....//'](.*?)/1
sreallydo = regex.replace(sreallydo、)
'//引用符なしでSRC画像アドレスを置きます
regex.pattern = <img。*?/ssrc =([^// '/s] [^//'/s>]*)。*?>
sreallydo = regex.replace(sreallydo、<img src = $ 1 />)
'//画像SRCアドレスを定期的に一致させます
http://bizhi.cncms.com/
regex.pattern = <img。*?/ssrc =([// '])([^//']+?)/1。*?>
Omatches = regex.execute(sreallydo)を設定する
'//画像アドレスを配列に保存します
Omatchesの各cmatchについて
ireallydo = ireallydo + 1
Redim Preserve areallydo(ireallydo)
areallydo(ireallydo)= regex.replace(cmatch.value、$ 2)
次
getimg = areallydo
エンド関数
%>
<%
「使用法:多くの人が私にそれを使用する方法を尋ねますが、実際、配列の使用方法を尋ねます。
scontent = HTMLコードフィールド '// scontentはHTMLコードを表します。 ORSを書いている場合、それがレコードセットであることを理解してみませんか? 。 。
DIM AIMAGES:aimages = getImg(scontent) '//配列を定義し、分析されたすべての画像アドレスを保存するために使用します
'すべての写真のアドレスをリストします。
i = 0からubound(aimages)の場合
Response.Write(<b> Things&i + 1&Image Address:< /b>&aimages(i)&<br />)
次
'最初の画像アドレスをリストします。
ubound(aimages)> -1の場合、response.write(<p> <b>最初の画像アドレス:</b>&aimages(0)&</p>)
'最後の画像アドレスをリストします。
ubound(aimages)> -1の場合、response.write(<p> <b>最後の画像アドレス:</b>&aimages(ubound(aimages))&</p>)
%>
共有:鈍感な場合にASPを交換する方法まず、交換リターン文字列の詳細なパラメーターの説明を見てみましょう。ここで、指定された数のサブストリングが別のサブストリングに置き換えられます。構文の交換(式、検索、[交換]と[[、count]] [count [、start]]]])の構文には、次のパラメーターがあります。パラメーター説明式が必要です。文字列式パッケージ