описать, что значит модуль для 1С, заранее благодарна.

[Alexa555]

Функция ПолучитьКаталог(ВыбФайл)
СтрКаталог = СокрЛП(ВыбФайл);
ИсхСтр = СокрЛП(ВыбФайл);
НовыйКаталог = "";
Если СтрЧислоВхождений(ИсхСтр, ".") = 0 Тогда
Возврат ИсхСтр;
КонецЕсли;
Если СтрЧислоВхождений(СтрКаталог, "\") > 0 Тогда
Поз = Найти(СтрКаталог, "\");
Пока Поз > 0 Цикл
СтрКаталог = Прав(СтрКаталог, СтрДлина(СтрКаталог) - Поз);
Поз2 = Найти(ИсхСтр, СтрКаталог);
НовыйКаталог = Лев(ИсхСтр, Поз2 - 1);
Поз = Найти(СтрКаталог, "\");
КонецЦикла;
КонецЕсли;
Возврат НовыйКаталог;
КонецФункции

//*********************************** ********
Функция ВыборФайла(ВыбФайл, СтрЗаголовок, СтрПриглашение)
Перем ПредстСпр;
НовыйФайл = "";
НовыйКаталог = ПолучитьКаталог(ВыбФайл);
Если НовыйКаталог = "" Тогда
НовыйКаталог = ФС.ТекКаталог()
КонецЕсли;

Если ФС.ВыбратьФайл(1, НовыйФайл, НовыйКаталог, СтрЗаголовок, "Текстовый файл (*.txt)|*.txt|", "txt") = 1 Тогда
ВыбФайл = НовыйКаталог + НовыйФайл;
Возврат 1;
КонецЕсли;
Возврат 0;
КонецФункции

//*********************************** ********
Процедура ВыборФайлаВыгрузки()
ВыборФайла(ВыбФайлВыгрузки, "Выберите файл для выгрузки.","Файл для выгрузки");
КонецПроцедуры