ASP 去除空格
Functionnohtml(str)'自定义一个函数Dimre'定义一个变量Setre=newRegExp'实例化一个对象,这个对象是asp中固定的,用于启用正则表达式...
Function nohtml(str) '自定义一个函数
Dim re '定义一个变量
Set re=new RegExp '实例化一个对象, 这个对象是asp中固定的,用于启用正则表达式匹配替换
re.IgnoreCase = True '这个忘记了, 好多年没弄asp了
re.Global = True '这个应该是设置全局匹配
re.Pattern="(\<.*?\>)" '设置一个正则, 用于匹配 <....> 之间的内容, 比如 <table> <div> <div class="***">等等
str=re.replace(str,"") '将上面匹配到的内容替换为空
re.Pattern="(\<\/.*?\>)" '这个和上面同理, 匹配的是</tr></td></div>.....等等等
str=re.replace(str,"") '同理,将匹配的内容替换为空
nohtml=str '给自定义函数返回值
End Function
这个上面的,,最后的数据导入数据库后,里面有很多空格,如何在上面加一个删除文字或字母之间的空格. 展开
Dim re '定义一个变量
Set re=new RegExp '实例化一个对象, 这个对象是asp中固定的,用于启用正则表达式匹配替换
re.IgnoreCase = True '这个忘记了, 好多年没弄asp了
re.Global = True '这个应该是设置全局匹配
re.Pattern="(\<.*?\>)" '设置一个正则, 用于匹配 <....> 之间的内容, 比如 <table> <div> <div class="***">等等
str=re.replace(str,"") '将上面匹配到的内容替换为空
re.Pattern="(\<\/.*?\>)" '这个和上面同理, 匹配的是</tr></td></div>.....等等等
str=re.replace(str,"") '同理,将匹配的内容替换为空
nohtml=str '给自定义函数返回值
End Function
这个上面的,,最后的数据导入数据库后,里面有很多空格,如何在上面加一个删除文字或字母之间的空格. 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询