以文本方式查看主题

-  中文XML论坛 - 专业的XML技术讨论区  (http://bbs.xml.org.cn/index.asp)
--  『 XML源码及示例(仅原创和转载) 』  (http://bbs.xml.org.cn/list.asp?boardid=32)
----  有没有高手能将它改成vb:  (http://bbs.xml.org.cn/dispbbs.asp?boardid=32&rootid=&id=10690)


--  作者:david888
--  发布时间:9/29/2004 2:15:00 PM

--  有没有高手能将它改成vb:
搞了3天,不会。看有没有高手能将它改成vb:

function word()
{
 HtmlEdit.document.execCommand("Paste",false);
 var editBody=HtmlEdit.document.body;
 for(var intLoop=0;intLoop<editBody.all.length;intLoop++){
  el=editBody.all[intLoop];
  el.removeAttribute("className","",0);
  el.removeAttribute("style","",0);
  el.removeAttribute("font","",0);
 }
 var html=HtmlEdit.document.body.innerHTML;
 html=html.replace(/<o:p>&nbsp;<\/o:p>/g,"");
 html=html.replace(/o:/g,"");
 html=html.replace(/<font>/g, "");
 html=html.replace(/<FONT>/g, "");
 html=html.replace(/<span>/g, "");
 html=html.replace(/<SPAN>/g, "");
 html=html.replace(/<SPAN lang=EN-US>/g, "");
 html=html.replace(/<P>/g, "");
 html=html.replace(/<\/P>/g, "");
 html=html.replace(/<\/SPAN>/g, "");
 HtmlEdit.document.body.innerHTML = html;
 format('selectall');
 format('RemoveFormat');
}


W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
31.250ms