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

Javascript
javascript实例教程(19) 使用HoTMetal(5)
javascript实例教程(19) 使用HoTMetal(6)
javascript实例教程(19) 使用HoTMetal(7)
javascript实例教程(20) OLE Automation(1)
javascript实例教程(20) OLE Automation(2)
javascript实例教程(20) OLE Automation(3)
javascript实例教程(20) OLE Automation(4)
javascript实例教程(20) OLE Automation(5)
javascript实例教程(20) OLE Automation(6)
javascript实例教程(20) OLE Automation(7)
用javascript实现利用FLASH嵌入声音
javascript版的日期输入控件(6)
javascript设计网页中的下拉菜单
javascript设计漫天雪花
javascript制作浮动的工具条
javascript制作闪烁的边框
javascript模拟游戏中的弹出菜单效果
在IE中使用javascript
利用javascript制作简单动画
首页地址添加到收藏夹(javascript)

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-12   浏览: 162 ::
收藏到网摘: 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]