不好意思,我是想找一个对于任一个数据,都能做到去掉前面的修饰字符串,然后再取指定字符!
因为存入数据库中的数据是客户填写的数据标题,我想输出一个不代任何修饰的标题!
颜色可能多种多样,可能还有其它修饰,我上面只不过举个例子!作者: 飞.逝﹏.. 时间: 2010-1-19 23:16
可以这样
取的数据库中的数据 比如存放到一个变量中
<% zfj=数据中的变量
i=1
ii=0
iii=0
zfjcd=len(trim(zfj)) '变量的长度
do while i<=zfjcd
if right(left(zfj,i),1)=">" then
ii=i
exit do
end if
i=i+1
loop
do while i<=zfjcd
if right(left(zfj,i),1)="<" then
iii=i
end if
i=i+1
loop
zfjzfj=right(left(zfj,iii-1),iii-ii-2) '最后这一句你自己测试以下可能
%>
如果数据中的变量值是
<font color=Black>我的网站论坛改版测试中......</font>
这种形式的话 上面的代码可以使
zfjzfj="我的网站论坛改版测试中......"
zfjzfj=right(left(zfj,iii-1),iii-ii) '最后这一句你自己测试以下可能
会有些出入，我没有测试，不过你在iii-ii-2中稍微修改一下就可以用了作者: 【洳☆淉】 时间: 2010-1-19 23:16
好的,我试一下,谢了,不好意思,我是真正的新手!作者: ‘為ㄋ袮 时间: 2010-1-19 23:16
非常感谢,你给得代码是对的!
<% zfj=数据中的变量
i=1
ii=0
iii=0
zfjcd=len(trim(zfj)) '变量的长度
do while i<=zfjcd
if right(left(zfj,i),1)=">" then
ii=i
exit do
end if
i=i+1
loop
do while i<=zfjcd
if right(left(zfj,i),1)="<" then
iii=i
end if
i=i+1
loop
zfjzfj=right(left(zfj,iii-1),iii-ii-1) '这只是把<font color=Black>我的网站论坛改版测试中......</font> 中的汉字取出来啦!
laser=left(zfjzfj,12) '取指代的N个字符
response.write laser '最终理想的字符
%>
如果数据中的变量值是
<font color=Black>我的网站论坛改版测试中......</font>
这种形式的话 上面的代码可以使