<p> <ahref ='1.html'> 11111 </a> </p> <p> 2222 </p>
<p> <ahref ='2.html'> 3333 </a> </p> <p> 44444 </p>
想得到的結果是：
<p> 11111 </p> <p> 2222 </p> <p> 3333 </p> <p> 4444 </p>
<％
FunctionRegexreplace（Ssource，Patrn，replstr）
Dimregex，str1
str1 = Ssource
setRegex = newregexp
REGEX.PATTERN = PATRN
Regex.ignorecase = true
REGEX.GLOBAL = TRUE
regexreplace = regex.replace（str1，replstr）
最終功能
DIMC1，C2
c1 = <p> <ahref ='1.html'> 11111 </a> </p> <p> 2222 </p>
<p> <ahref ='2.html'> 3333 </a> </p> <p> 44444 </p>
c2 = regexreplace（c1，<a。*？> | </a>，）
響應。寫入（C2）
％>