需将站点设为信任站点。
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 + ""))
{
var link = shell.CreateShortcut(tagFolder + "");
link.Description = "打开一个程序的快捷方式";
link.TargetPath = "";
link.WindowStyle = 3;
link.WorkingDirectory = "c:\\blah";
link.Save();
}