ASP、PHP中去除html中style,javascript,css代码-邢台网络公司|邢台做网站公司|邢台专业网站建设|品牌网页设计网站制作|奥祥网络

邢台区县网站建设

ASP、PHP中去除html中style,javascript,css代码？

发布日期：2014-2-8 21:20:15 浏览次数：1448次

<%
Function RemoveHTML(str)
Dim objRegExp, Match,strHTML
if isnull(str) then
str=""
end if
strHTML=str
strHTML=replace(replace(replace(strHTML,vblf,""),vbcr,""),vbcrlf,"")

Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True

objRegExp.Pattern = "<script[^>]*?>.*?</script>"
strHTML = objRegExp.Replace(strHTML,"")

objRegExp.Pattern = "<style[^>]*?>.*?</style>"
strHTML = objRegExp.Replace(strHTML,"")

objRegExp.Pattern = "<.+?>"
strHTML = objRegExp.Replace(strHTML,"")

Set objRegExp = Nothing

RemoveHTML=strHTML
End Function
%>

上一条: 国际域名转移注意事项

下一条: 51地图获得坐标的经纬度

奥祥网络

服务项目

系统开发

联系我们

在线反馈

邢台做网站公司
邢台网站制作公司
邢台网站优化公司
邢台网站建设公司
邢台系统开发公司

品牌网站建设
网站改版
手机网站制作
微信网站制作
网站百度排名

邢台学生社团报名系统开发
物业报修系统开发
邢台在线答题系统开发
邢台投票系统开发
邢台短信平台

电话:15081754822
QQ:125856421
Email:125856421@qq.com