//Written in 2007 by NoAngel777
//Init
var dlistfilename="dlist.txt"
var tempfilename="temp.txt"
var linkfilename="link.txt"
//Get site link
var fso=new ActiveXObject("Scripting.FileSystemObject");
var fi=fso.OpenTextFile(dlistfilename,1);
var addr;
if(!fi.AtEndOfStream)
addr=fi.ReadLine();
else
{
fi.Close();
WScript.Quit();
}
var fo=fso.CreateTextFile(tempfilename,true);
while(!fi.AtEndOfStream)
{
var t=fi.ReadLine();
fo.WriteLine(t);
}
fo.Close();
fi.Close();
fso.DeleteFile(dlistfilename);
fso.MoveFile(tempfilename,dlistfilename);
//Download site content
var oReq=new ActiveXObject("Microsoft.XMLHTTP");
oReq.open("GET",addr,false);
oReq.send();
fo=fso.CreateTextFile(tempfilename,true);
fo.Write(oReq.responseText);
fo.Close();
//Get file name and file link
fi=fso.OpenTextFile(tempfilename,1);
var dlink
while(!fi.AtEndOfStream)
{
var t=fi.ReadLine();
var n=t.indexOf("http://www.2shared.com/download/");
if(n!=-1)
{
t=t.substr(n);
dlink=t.substr(0,t.indexOf("\""));
break;
}
}
fi.Close();
fi=fso.OpenTextFile(tempfilename,1);
var dfname
while(!fi.AtEndOfStream)
{
var t=fi.ReadLine();
var n=t.indexOf("<title>");
if(n!=-1)
{
t=t.substr(n+26);
dfname=t.substr(0,t.indexOf("</title>"));
break;
}
}
fi.Close();
fso.DeleteFile(tempfilename);
//Wait while site enables file link
WScript.Sleep(40000);
//Write download command to file
fo=fso.CreateTextFile(linkfilename,true);
fo.WriteLine("wget -c -O "+dfname+" "+dlink);
fo.Close(); |
