Вт Дек 22, 2009 10:18  Кнопка Обзор в «Экспорт-импорт файлов»
Полезность: Нет оценки
Захотелось вместо трех точек на кнопках "Маска файлов источника/приемника" видеть слово, например, "Обзор". В лоб Caption кнопки не меняется. Решение - меняем ValidateName на TextN, где N - свободный номер, и в клиент-скрипте присваиваем TextN.Caption="Обзор".
Альтернатива.
Если вам необходимо выбрать ТОЛЬКО папку, то есть неплохой способ.
Кидаете на форму кнопку (напрмер, Btn_PATH).
В клиент-скрипте пишем:
Код:
sub Btn_PATH_OnClick
Set objShellApp = CreateObject("Shell.Application")
Set objFolder = objShellApp.BrowseForFolder(0, "Выбор каталога", 1)
If objFolder is nothing or Err.Number <> 0 Then
MsgBox "Папка не выбрана!", vbInformation, "Импорт справочника террористов OFAC"
else
Text_PATH = objFolder.Self.Path
'вызов функции поиска файла в директории (если нужно)
Set objShellApp = nothing
End If
end sub
Text_PATH - поле от структуры "импорт-экспорт".
Такой вариант подходит, когда имя файла стандартизированно и его можно найти программно и не озадачивать пользователя выбором одного из 512 файлов. Также, иногда необходимо выбирать ТОЛЬКО папку, а ч/з "импорт-экспорт" это не совсем интуитивно понятно конечному пользователю, т.к. "импорт-экспорт" открывает итменно диалог выбора файла.
Параметры BrowseForFolder:
1ый: Дескриптор родительского окна (0);
2ой: Заголовок окна;
3ий: Параметры диалогового окна.
-1 Отобразит "Рабочий стол" и "Мои документы" с файлами. Имеется возможность создания новой папки.
0 Будут видны все папки и будет возможность создания папки (кнопка). Корзина видна.
1 Будут видны все папки и будет возможность создания папки (кнопка). Корзина не видна;
4ый: Определяет, выше какой папки пользователь не сможет подняться в дереве папок (необязательный).
Чтобы выбирать кнопкой в структуре Экспорт-импорт файлов не только файлы, но и папки, достаточно проинициализировать P_FILE.[SRC_NAME] любым непустым значением, например '0', и наличие файла в выбираемой папке необязательно.
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
Домен cftclub.ru не связан с ЗАО "Центр Финансовых Технологий" и ни в коей мере не нарушает авторских и иных прав
Владелец может не разделять мнения Участников и не несет ответственности за их публикации
Powered by phpBB