ASPにハイパーリンクを追加する場合がありますが、追加した後は必要ない場合はどうすればよいですか？それでは、ASPからすべてのハイパーリンクを削除する方法を見てみましょう。知りたい場合は、それらを参照してください。
<％
'*******************************
'機能：removehref_a（htmlstr）
'引数：HTMLSTR、削除される文字列
著者：アリクシ
'日付：2007/7/12
'説明：文字列内のすべてのハイパーリンクを削除します
'例：<％= removehref_a（ "<a href =/abc/html> test </a>"）％>
'*******************************
関数removehref_a（htmlstr）
dim n、str1、str2、str3、str4
htmlstr = lcase（htmlstr）
n = 1からubound（split（htmlstr、 "<a"））
str1 = instr（htmlstr、 "<a"）
str2 = stron（str1、htmlstr、 ">"）
htmlstr = left（htmlstr、str1-1）＆右（htmlstr、len（htmlstr）-len（左（htmlstr、str2）））
htmlstr =置換（htmlstr、 "</a>"、 ""）
removehref_a = htmlstr
次
エンド関数
％>
文字列のすべてのハイパーリンクを定期的に削除します
<％
'*******************************
'機能：RegremoveHref（HTMLSTR）
'引数：HTMLSTR、削除される文字列
著者：アリクシ
'日付：2007/7/12
'説明：定期的に文字列のすべてのハイパーリンクを削除します
'例：<％= regremovehref（ "<a href =/abc/html> test </a>"）％>
'*******************************
function regremovehref（htmlstr）
ra = new regexpを設定します
ra.ignorecase = true
ra.global = true
ra.pattern = "<a [^>]+>（。+？）<// a>"
Regremovehref = ra.replace（htmlstr、 "$ 1"）
エンド関数
％>
上記はこの記事のすべての内容です。この記事の内容が、すべての人の勉強や仕事に役立つことを願っています。また、間違った新しいテクノロジーチャネルをサポートしたいと考えています！