需将站点设为信任站点。

复制代码 代码如下:

             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.uoften.com";
                     link.WindowStyle = 3;
                     link.WorkingDirectory = "c:\blah";           
                     link.Save();                     
                 }            

点赞(93)

评论列表共有 0 条评论

立即
投稿
返回
顶部