新微赢技术网»论坛 › 学习网知识堂 › WEB开发 › ASP › 谁有办法把标签给屏蔽了??

12 / 2 页下一页

查看: 158|回复: 11

谁有办法把标签给屏蔽了??

[复制链接]

★功夫小子★

电梯直达

1^#

发表于 2010-1-7 03:45:12 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

我从编辑器里用left 截取一段文字. 发现居然把里面的标签截取了一半,
哪位大哥帮我想个办法,能把标签给去掉.

收藏0

使用道具举报

生活的成功者

2^#

发表于 2010-1-7 03:45:15 | 只看该作者

用正则
试试这个：

Function Stringhtml(str)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "<(.[^>]*)>"
str = re.replace(str, "")
re.Pattern = "\[(.[^\[]*)\]"
str = re.replace(str, "")
str = replace(str, ">", ">")
str = replace(str, "<", "<")
If str="" Then str="..."
Stringhtml=str
End Function

回复支持反对

使用道具举报

孤独者

3^#

发表于 2010-1-7 03:45:17 | 只看该作者

用什么方法解决的?

回复支持反对

使用道具举报

欠你一滴泪

4^#

发表于 2010-1-7 03:45:20 | 只看该作者

我试下谢谢

回复支持反对

使用道具举报

づ嗳嘚亽鈊↑

5^#

发表于 2010-1-7 03:45:23 | 只看该作者

那你去问问偶老师吧.

回复支持反对

使用道具举报

三颗残牙

6^#

发表于 2010-1-7 03:45:26 | 只看该作者

怎么替换?
有N 多的标签啊!

回复支持反对

使用道具举报

枫之泪-天涯

7^#

发表于 2010-1-7 03:45:29 | 只看该作者

以下是引用阳光白雪在2007-4-29 14:36:57的发言：
用正则
试试这个：

Function Stringhtml(str)
Dim re
Set re = new RegExp
re.IgnoreCase = True
re.Global = True
re.Pattern = "<(.[^>]*)>"
str = re.replace(str, "")
re.Pattern = "\[(.[^\[]*)\]"
str = re.replace(str, "")
str = replace(str, ">", ">")
str = replace(str, "<", "<")
If str="" Then str="..."
Stringhtml=str
End Function
这个是不是转换好了以后在存数据库?

我想要的是在数据库提取吃来的转换.

我也不知道为什么, 第一次提交的时候是没有问题的,

但是修改的时候就出现问题了. 因为在编辑框中就出现了标签..

附件: 只有本站会员才能下载或查看附件，请您登录或注册