[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();