posts - 16, comments - 21, trackbacks - 0, articles - 30
  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理

2006年9月5日

使用Javascript创建快捷方式


需将站点设为信任站点。

             var fso = new ActiveXObject("Scripting.FileSystemObject");   
             var shell = new ActiveXObject("WScript.Shell");     
             var tagFolder = "c:\\Temp";
               
                if(!fso.FolderExists(tagFolder ))
                 {
                      fso.CreateFolder(tagFolder);
                     //alert("Create success!");
                 }
                 if(!fso.FileExists(tagFolder + "\\eip.lnk"))
                 {               
                     var link = shell.CreateShortcut(tagFolder + "\\eip.lnk"); 
                     link.Description = "打开一个程序的快捷方式";          
                     link.TargetPath = "http://www.163.com";
                     link.WindowStyle = 3;
                     link.WorkingDirectory = "c:\\blah";            
                     link.Save();                     
                 }            
            

posted @ 2006-09-05 19:44 XiaoK 阅读(546) 评论(6) 编辑

使用Javascript修改客户端注册表

    　　
需将站点设为信任站点。
                        
try
{                 
    var shell = new ActiveXObject("WScript.Shell");      

//读注册表值
var  key1  = shell.RegRead("HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Run\\eip");
                 
//删除注册表项 
shell.RegDelete("HKEY_CURRENT_USER\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run\\eip");
                  
//往注册表中写入值
  shell.RegWrite 
("HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Run\\eip",
                "C:\\eip\\eip.lnk","REG_SZ");           
  shell.RegWrite("HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run\\eip",
    "c:\\eip\\eip.lnk","REG_SZ");
 }
 catch(e)  
  {}       

可通过用最后的反斜线终止 来指定项名。指定值名时最后不要包括反斜线。

类型 说明 形式
REG_SZ 字符串 字符串
REG_DWORD 数字 整数
REG_BINARY 二进制值 整数
REG_EXPAND_SZ 可扩展的字符串（例如，"%windir%\\calc.exe"） 字符串

posted @ 2006-09-05 18:45 XiaoK 阅读(446) 评论(0) 编辑