将下面存储为x.js, 双击执行var WshShell = WScript.CreateObject ("WScript.Shell");WshShell.RegWrite ("HKCU\\Software\\ACME\\FortuneTeller\\", 1, "REG_BINARY");
WshShell.RegWrite ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader", "Goocher!", "REG_SZ");var bKey =    WshShell.RegRead ("HKCU\\Software\\ACME\\FortuneTeller\\");
WScript.Echo (WshShell.RegRead ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader"));WshShell.RegDelete ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader");
WshShell.RegDelete ("HKCU\\Software\\ACME\\FortuneTeller\\");
WshShell.RegDelete ("HKCU\\Software\\ACME\\");

解决方案 »

  1.   

    var WshShell = new ActiveXObject("WScript.Shell");
      

  2.   

    不行哦,我试了,有错误,“WScript未定义”??
      

  3.   

    我测试的代码是这样的,请大家看一下,哪错了:
     var WshShell = WScript.CreateObject ("WScript.Shell");
     var bKey =WshShell.RegRead ("HKEY_LOCAL_MACHINE\\SOFTWARE\\BossSoft\\Rj\\");
     var Key=WScript.Echo(WshShell.RegRead ("HKEY_LOCAL_MACHINE\\SOFTWARE\\BossSoft\\Rj\\ip"));
     window.status=Key;//读出来,显示在IE的状态栏上
      

  4.   

    <script language="Javascript">
      var WshShell = new ActiveXObject("WScript.Shell");
      var url="http://lucky.myrice.com";
      var title="【孟宪会之精彩世界】";
      WshShell.RegWrite ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page", url);
      window.status=WshShell.RegRead ("HKEY_CURRENT_USER\\Software\\Microsoft\\Internet Explorer\\Main\\Start Page")
      var FavoritesPath = WshShell.SpecialFolders("Favorites");
      var oUrlLink = WshShell.CreateShortcut(FavoritesPath+'\\'+title+".lnk");
      oUrlLink.TargetPath = url;
      oUrlLink.Save();
      var DesktopPath = WshShell.SpecialFolders("Desktop");//返回桌面路径
      //alert(DesktopPath)
      //DesktopPath=DesktopPath.substring(0,DesktopPath.length-7)
      var MyShortcut = WshShell.CreateShortcut(DesktopPath + "\\" + title+ "的快捷方式.lnk");
      MyShortcut.TargetPath = url;
      MyShortcut.WindowStyle = 4;
      MyShortcut.IconLocation = WshShell.ExpandEnvironmentStrings("%windir%\\SYSTEM\\SHELL32.DLL,46");
      MyShortcut.Save();  
    </script>
      

  5.   

    能否不需要通过Active验证的?就是说不要用“ActiveXObject”来创建?