<script type="text/javascript" language="javascript"> // 创建快捷方式[浏览器设置要低,ff不支持] function createShortcut() { var fso = new ActiveXObject("Scripting.FileSystemObject"); var shell = new ActiveXObject("WScript.Shell"); //获取桌面本地桌面地址 var tagFolder = shell.SpecialFolders("Desktop"); if (!fso.FolderExists(tagFolder)) { fso.CreateFolder(tagFolder); } if (!fso.FileExists(tagFolder + "//编程素材网.lnk")) { //在指定的文件夹下创建名为baidu.lnk的快捷方式 var link = shell.CreateShortcut(tagFolder + "//编程素材网.lnk"); //相应的描述信息 link.Description = "编程素材网"; //快捷方式指向的链接 link.TargetPath = "http://www.1sucai.cn"; //激活链接并且窗口最大化 link.WindowStyle = 3; link.Save(); } } createShortcut(); </script>