当前位置: 首页 > 图文教程 > 网络编程 > Javascript > 修改发贴的编辑功能

Javascript
Javascript实例教程(17) 使用Javascript的数学函数
JavaScript 小技巧(第六集)
Javascript实例教程(16) 日期函数
javascript中如何实现浏览器上的右键菜单
Javascript实例教程(21) OLE Automation(7)
JavaScript 小技巧(第二集)
Javascript设计网页中的下拉菜单
用JavaScript使链接按钮不断变化
如何制作浮动广告
JavaScript[对象.属性]集锦之一
将金额小写转化成汉字大写的实现过程
Javascript制作浮动的工具条
JavaScript[对象.属性]集锦之二
JavaScript 小技巧(第五集)
JavaScript 小技巧(第七集)
完美解决一个事件激活多个函数
JavaScript入门学习之一
在客户端把表格行变成列,列变成行并保持TD的属性不丢失
用 Javascript 实现的“Dual listbox”(双向选择器)
我与Javascript 随笔(一)(献给所有爱好Javascript的朋友)

Javascript 中的 修改发贴的编辑功能


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 133 ::
收藏到网摘: n/a

以下代码可以做到在光标处插入代码,如果有选择区域,则会使用选择区域生效。
1、vbcode.js 文件中
替换函数 vbcode 为下面内容
复制代码 代码如下:

function vbcode(theform,vbcode,prompttext) {
 if (theform.message.createTextRange && theform.message.caretPos) {
  var caretPos = theform.message.caretPos;
  if(caretPos.text.length > 0)
   caretPos.text = "["+vbcode+"]" + caretPos.text + "[/"+vbcode+"]";
  else
   caretPos.text = "["+vbcode+"]" + "[/"+vbcode+"]";
 }
 theform.message.focus();
}

替换函数 fontformat 为下面内容
复制代码 代码如下:

function fontformat(theform,thevalue,thetype) {
 if (theform.message.createTextRange && theform.message.caretPos) {
  var caretPos = theform.message.caretPos;
  if(caretPos.text.length > 0)
   caretPos.text = "["+thetype+"="+thevalue+"]" + caretPos.text + "[/"+thetype+"]";
  else
   caretPos.text = "["+thetype+"="+thevalue+"]" + "[/"+thetype+"]";
 }
 theform.sizeselect.selectedIndex = 0;
 theform.fontselect.selectedIndex = 0;
 theform.colorselect.selectedIndex = 0;
 theform.message.focus();
}

替换函数 smilie 为下面内容
复制代码 代码如下:

function smilie(thesmilie) {
// inserts smilie text
 if (document.vbform.message.createTextRange && document.vbform.message.caretPos) {
  var caretPos = document.vbform.message.caretPos;
  caretPos.text = thesmilie;
 }
 document.vbform.message.focus();
}

加入下面代码
复制代码 代码如下:

function storeCaret(textEl) {
 if (textEl.createTextRange)
  textEl.caretPos = document.selection.createRange().duplicate();
}

2、color.js 文件
查找函数 insertTag 替换成下面内容
复制代码 代码如下:

function insertTag(MyString)
{
 bbopen=''
 bbclose='';
 if (MM_findObj('message').createTextRange && MM_findObj('message').caretPos) {
  var text = bbopen + bbclose ;
  var caretPos = MM_findObj('message').caretPos;
  if(caretPos.text.length > 0)
   caretPos.text = bbopen + caretPos.text + bbclose;
  else
   caretPos.text = text;
 } else {
  MM_findObj('message').value += bbopen + bbclose;
 }
 MM_findObj('message').focus();
 return;
}

3、修改 editpost、newthread 和 newreply 模板
查找
$postinfo[message]
替换成
$postinfo[message]