提取HTML代码中文字的Asp函数

Asp 2005-2-17 10:3

独家!转贴请标名出处!!
望高人指教!
'''''''''''''''''''''''''''
'作用:提取HTML代码中文字的Asp函数
'日期:2005-2-16
'联系QQ:844120
'''''''''''''''''''''''''''
Function OutHtml(str)
    dim a,re
    set re=new RegExp
    re.pattern="<.*?>"
    re.global=true
    a=str
    OutHtml=re.replace(a,"")
    OutHtml=replace(OutHtml," ","")
    OutHtml=replace(OutHtml," ","")
End Function

标签集:TAGS:

回复Comments() 点击Count()

回复Comments

{commentauthor}

{commenttime}

{commentnum}

{commentcontent}

作者:

{commentrecontent}