home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 July & August / PCWorld_2005-07-08_cd.bin / software / vyzkuste / tipy / tipy.exe / pcwDropdemo.js < prev    next >
Text File  |  2005-05-14  |  756b  |  22 lines
  1.  
  2. /* Script name:    pcwDropdemo                */
  3.  
  4.  
  5. var oWs = WScript.CreateObject("WScript.Shell");
  6. var oFs = new ActiveXObject("Scripting.FileSystemObject");
  7. var i;
  8. var strliste = "";
  9.  
  10. var argcount = WScript.Arguments.length;
  11.  
  12. if (argcount == 0) { 
  13.   oWs.Popup("Tento skript ukazuje, v jakΘm po°adφ Pr∙zkumnφk p°edßvß jmΘna oznaΦen²ch soubor∙, pokud tyto soubory zapou₧itφ technologie drag&drop p°etßhnete myÜφ do n∞jakΘ aplikace nebo na n∞jak² objekt.", 0, "Skript PC-WORLDu", 64);
  14.   WScript.Quit();
  15. }
  16. else {
  17.   var strname = WScript.Arguments.item(0); 
  18.   for (i = 0; i < argcount; i++) {
  19.     strliste = strliste + WScript.Arguments.item(i) + "\n";
  20.   }
  21.   oWs.Popup("Soubory budou zpracovßny v tomto po°adφ:\n"+strliste,0, "Skript PC-WORLDu", 64);
  22. }