内容显示页
 
类别:服务器相关 | 浏览(347) | 2007-8-28 17:47:08
/**
 * 添加各种常见的注释
 * @FileName    Comment.jsee
 * @Author      yongfa365
 * @Version     v1.0
 * @WEB         http://www.yongfa365.com
 * @Email       yongfa365@qq.com
 * @FirstWrite  http://www.yongfa365.com/item/Add-All-Comment-Tool-vbs-js-html-For-Emeditor-Macros-yongfa365.html
 * @LastModify  2007-8-28
 */

mainMenu=CreatePopupMenu();
mainMenu.Add("功能:为选中文字或全文添加各种注释",0);
mainMenu.Add("//",1);
mainMenu.Add("'",2);
mainMenu.Add("<!--……-->",3);
mainMenu.Add("/*……*/",4);
mainMenu.Add("段之前加入字符",5);
mainMenu.Add("段之后加入字符",6);
mainMenu.Add("关于",100);
mainMenu.Add( "", 0, eeMenuSeparator );
var witchItem=mainMenu.Track();
switch(witchItem)
{
    case 1:
        Comment("//");
        break;
    case 2:
        Comment("'");
        break;
    case 3:
        Comment("<!--……-->");
        break;
    case 4:
        Comment("/*……*/");
        break;
    case 5:
        Comment("前");
        break;
    case 6:
        Comment("后");
        break;
    case 100:
        alert("哈哈哈哈,柳永法制作,\nhttp://www.yongfa365.com");
        break;
    default:
        break;
}

function Comment(n){
    if (document.selection.Text=="") document.selection.SelectAll();
    if(n=="//"||n=="'")
        {
        document.selection.Replace("(^.)|(^\\n)",n + "\\1",eeFindNext | eeFindReplaceEscSeq | eeReplaceSelOnly | eeReplaceAll | eeFindReplaceRegExp);
        }
    if(n=="<!--……-->")
        {
        document.selection.Text="<!--\n" + document.selection.Text + "\n-->";
        }
    if(n=="/*……*/")
        {
        document.selection.Text="/*\n" + document.selection.Text + "\n*/";
        }
    if(n=="前")
        {
        n=prompt("您想要在选中的行前加入什么字符","yongfa365.com");
        document.selection.Replace("(^.)|(^\\n)",n + "\\1",eeFindNext | eeFindReplaceEscSeq | eeReplaceSelOnly | eeReplaceAll | eeFindReplaceRegExp);
        }
    if(n=="后")
        {
        n=prompt("您想要在选中的行后加入什么字符","yongfa365.com");
        document.selection.Replace("(.$)|(^\\n$)","\\1" + n,eeFindNext | eeFindReplaceEscSeq | eeReplaceSelOnly | eeReplaceAll | eeFindReplaceRegExp);
        }
}
//原创作者:柳永法(yongfa365)'Blog

引用本页地址:http://www.yongfa365.com/item/Add-All-Comment-Tool-vbs-js-html-For-Emeditor-Macros-yongfa365.html
 
 
相关链接
 
网友评论:
姓名: 记住我
网址:
邮箱:
内容:
验证码:  验证码图片 看不清? 换张图试试
 
     
 
 
文章分类
 
 
专题(3)
 
.Net + C#(41)
 
ASP+VBS(153)
 
 
 
Linux(10)
 
 
 
web 2.0(24)
 
 
 
 
 
心程(59)
 
生活(80)
 
 
     

Power by :柳永法(yongfa365)'Blog | Model by :hibaidu | CSS by:众网友 | 京ICP备07011491号  QQ:64049027  E-mail:64049027qq.com

本空间赞助商:北京中科兴联信息技术有限公司