function toDesktop(sUrl,sName){
try{
var WshShell = new ActiveXObject("WScript.Shell");
var oUrlLink = WshShell.CreateShortcut(WshShell.SpecialFolders("Desktop") + "\\" + sName + ".url");
oUrlLink.TargetPath = sUrl;
oUrlLink.Save();
}catch(e){
alert("当前IE安全级别不允许操作！");
}
}
创建快捷方式