Autor: Raduzz | 25.10.2006 |
var url="http://www.21stoleti.cz/cisla/9_2006/"; var ie= WScript.CreateObject("InternetExplorer.Application"); var shell=WScript.CreateObject("WScript.Shell"); ie.Visible=true; // cyklus pro 100 stran, chtelo by to vyresit // jinak: "pokud url neexistuje konec" for(var i=1;i<100;i++){ //TVORENI NAZVU SOUBORU var name=""; if (i<10) name="00"+i; else if(i<100) name="0"+i; else name="i"; //tvoreni nazvu souboru ie.Navigate(url+name+".jpg"); // nasmerovani IE na danou url while(ie.busy==true) // pockej dokud se WScript.sleep(100); // stranka nenacte cela ie.Visible=true; // nastaveni okna IE ve vindows jako aktivni. jinak by nasleduji prikaz mohl pozlobit shell.sendKeys("%sa%U"); // odeslani klavesovych zkratek aktivnimu oknu // sendKeys("%s"): realizuje v aktivnim oknu zmacknuti klaves :"Alt+s" ;;; ("+s")="Shift+s" jak je Ctrl to nevim WScript.sleep(500); }
PS: samotného výsledku procesu (ukožení x souboru z netu na hard disc) jde dosáhnout mnohem efektnějším způsobem (script pracuje na pozadí)