ASP向下超链接函数
来源:爱站网时间:2020-10-02编辑:网友分享
ASP使用正则表达式筛选标记,以筛选页面中或提交的所有超链接,正则表达式可以用来准确地找出这些链接并清除它们,本文是爱站技术频道小编为大家带来的ASP向下超链接函数,一起进入下文了解一下吧!
ASP使用正则表达式筛选标记,以筛选页面中或提交的所有超链接,正则表达式可以用来准确地找出这些链接并清除它们,本文是爱站技术频道小编为大家带来的ASP向下超链接函数,一起进入下文了解一下吧!
复制代码 代码如下:
Function ReplaceUrl2(HTMLstr)
Dim n,str1,str2,str3,str4
HTMLstr = Lcase(HTMLstr)
For n=1 to Ubound(Split(HTMLstr," str1 = Instr(HTMLstr," str2 = Instr(str1,HTMLstr,">")
HTMLstr = left(HTMLstr,str1-1)&right(HTMLstr,len(HTMLstr)-len(left(HTMLstr,str2)))
HTMLstr = replace (HTMLstr,"","")
ReplaceUrl2 = HTMLstr
Next
End Function
%>
正则表达式去除链接:
Function RegRemoveHref(HTMLstr)
Set ra = New RegExp
ra.IgnoreCase = True
ra.Global = True
ra.Pattern = "]+>(.+?)"
RegRemoveHref = ra.replace(HTMLstr,"$1")
END Function
以上就是爱站技术频道小编介绍的ASP向下超链接函数,在程序的开发中,很多内容都是可以共享的,希望大家可以抽空学习更多的知识。