asp下去除超链接函数

asp下去除超链接函数

　　复制代码 代码如下:

　　<%

　　Function ReplaceUrl2(HTMLstr)

　　Dim n,str1,str2,str3,str4

　　HTMLstr = Lcase(HTMLstr)

　　For n=1 to Ubound(Split(HTMLstr,"(.+?)"

　　RegRemoveHref = ra.replace(HTMLstr,"$1")

　　END Function

【asp下去除超链接函数】相关文章：

ASP的特点与功能04-20

ppt中如何设置超链接10-17

ppt中超链接打不开10-17

Word如何批量取消超链接11-08

excel函数07-30

excel函数[优选]07-31

EXCEL函数公式大全08-01

Excel函数公式大全07-27

(经典)excel函数15篇08-02

EXCEL函数公式大全[经典]08-05