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

Javascript
IE中直接运行显示当前网页中的图片 推荐
广告显示判断
srcElement表格样式
免费空间广告万能消除代码
[原创]手机号码本地检测
JS实现浏览器菜单命令
JS代码混淆初步
经验几则 推荐
MSN消息提示类
正宗的日历(含农历)
农历与西历对照
在网页中屏蔽快捷键
简单获取键盘的KeyCode
音乐播放用的的几个函数
你的编程语言可以这样做吗?
如何遍历对象的属性?
自动关闭的层
prototype 的说明 js类
js脚本学习 比较实用的基础
日期函数扩展类Ver0.1.1

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


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