Скрипт вывода имен файлов.

[ratratrat]

Добрый день! Помогите пожалуйста, нужен скрипт вывода имен файлов папки по возрастанию размера. Спасибо заранее!

[pikko]

у javascript нет доступа к файловой системе

[lord2kim]

ratratrat, смотря где...если на сервере, то это на PHP нужно писать
если на клиенте, то только с Windows и в IE, используя ActiveX-объект FileSystemObject

[ratratrat]

Файл .JS или .JSE на клиентской машине, при открытии которого должно быть:

вывод имен файлов папки по возрастанию размера

Папка указывает заранее в скрипте.

[ratratrat]

ratratrat, смотря где...если на сервере, то это на PHP нужно писать
если на клиенте, то только с Windows и в IE, используя ActiveX-объект FileSystemObject

Знал бы еще! Помоги написать пожалуйста!

[lord2kim]

ratratrat,

var folderaddress = "C:/"; // имя папки из которой будет происходить считывание файлов
   var fso, f, fc, s = "", ar = [], obj = {}, i = 0;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   f = fso.GetFolder(folderaddress); 		
   fc = new Enumerator(f.files); 		
   for (; !fc.atEnd(); fc.moveNext()) {
		obj[fc.item().size] = fc.item().Name;
		ar[i] = fc.item().size;
		i++;
   }
	
	ar.sort(function(a,b){return a-b;});
	
	for (i=0; i < ar.length; i++) {
		s += obj[ar[i]]+"\n";
	}
	
	WScript.Echo(s);

[ratratrat]

lord2kim,
огромное спасибо! Это вывод имен файлов папки по возрастанию размера? То есть от меньшего файла к большему?

Как тут на форуме ставить + ?

[lord2kim]

ratratrat, по возрастанию
рядом с ником стоит "Карма"

[ratratrat]

lord2kim,

Извини за наглость, не можешь помочь еще с 2 задачами?

1)Написать программу (СКРИПТ .JS, .JSE) вывода в файл списка групп на факультете разбив их на 4 колонки. (Названия групп произвольное)

2)В зависимости от кода ошибки записать в текстовый файл результат проведения операции копирования.

Я Visual Basic .NET программист, не писал ранее скрипты, а вот появилась в них зависимость.

[lord2kim]

ratratrat,

var groups = ["АВУП41", "АСУ31", "АСУ41", "АСУ41", "АСУ51", "АСУ52", "БМС41", "БМС51", "УПТС11", "УПТС12", "УПТС21", "УПТС22", "КИБ21", "КИБ22", "КИБ31", "КИБ32", "КИБ41", "КИБ42", "КИБ51", "КИБ52"];
	var fso = new ActiveXObject("Scripting.FileSystemObject");
	var file = fso.CreateTextFile(fso.GetAbsolutePathName("") + "/1.txt", 1);
	for (i=0; i < groups.length; i+=3) {
		file.WriteLine((groups[i] || "")+"\t\t"+(groups[i+1] || "")+"\t\t"+(groups[i+2] || "")+"\t\t"+(groups[i+3] || ""));
	}
	file.Close();

var fso = new ActiveXObject("Scripting.FileSystemObject"),
		file_err = fso.CreateTextFile(fso.GetAbsolutePathName("") + "/1.txt", 1),
		files = ["1.jpg", "2.jpg", "3.jpg", "4.jpg", "5.jpg", "6.jpg", "7.jpg", "8.jpg", "9.jpg"];
	for (i=0; i < files.length; i++) {
		try {
			fso.MoveFile("C:/"+files[i], fso.GetAbsolutePathName("")+"/");
			file_err.WriteLine("копирование произведено успешно");
		}
		catch(e) {
			file_err.WriteLine(e.number + " -> " + e.message);
		}
	}
	file_err.Close();