| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 626 人关注过本帖
标题:自己写了一段改变段间距的代码,不知道错在哪
取消只看楼主 加入收藏
authorboy
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2007-3-13
收藏
 问题点数:0 回复次数:0 
自己写了一段改变段间距的代码,不知道错在哪

代码如下:
<%
content="<table><tr><td><p> 创新意识不强,工作方法简单。工作善于应付,只把chr(34)自己份内的事做好就可以了,得过</p><p style='FONT-SIZE: 16pt; FONT-FAMILY: 华文仿宋'>持理论联系实际,没能及时用科学思想分析出现问题的原由,及时纠正主观认识上出现</p></td></tr></table>"


for i=1 to len(content)
char=mid(content,i,1)
if char="<" then
t=i
end if
if char=">" then
tt=i
sw=1
if tt>t then
htmstring=mid(content,t,tt+1-t)
leftstr=left(htmstring,2)
if leftstr="<P" or leftstr="<p" then
sw=instr(htmstring,"style")
response.write("<br>")
  if sw>0 then
  changehtmstring=replace(htmstring,"style="&chr(34),"style="&chr(34)&"MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px;")

  else
  changehtmstring=replace(htmstring,"<P","<P style="&chr(34)&"MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px")
end if
content=replace(content,htmstring,changehtmstring)
end if
end if
end if
next
response.write(content)

%>

目的:改变段间距
思路:1:找出字符串中所有的html语句.
   2:判断html标记是否为<p>,如果是,继续判断其中是否有"style"语句,有则在style语句中插入“MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px;”,无则在<p>中插入“style="MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px;"”,其中插入是通过replace函数来完成。
运行代码时并有达到目的,查来查去都查不出错在哪。这个问题困扰我好几天了,请大家帮分析一下到底是我的思路有问题还是代码写得不对,谢谢!

搜索更多相关主题的帖子: 间距 代码 
2007-05-13 14:16
快速回复:自己写了一段改变段间距的代码,不知道错在哪
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022323 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved