Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Путь к файлу / 12 сообщений из 12, страница 1 из 1
27.10.2003, 06:46
    #32305552
Maximusss
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Как в диалоге OpenDialog при нажатии на кнопку открыть, файл не открывался а в TextBox' е появился путь к файлу ??????
...
Рейтинг: 0 / 0
27.10.2003, 07:10
    #32305561
tpg
tpg
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Private Sub cmdView_Click()

CommonDialog1.Filter = "Файлы Excel (*.xls)| *.xls" 'Фильтр для открытия файла
CommonDialog1.ShowOpen 'Запуск диалога открытия файла фактуры
If CommonDialog1.FileName = "" Then 'Если файл не выбран,
MsgBox "Файл не задан ! ", vbOKOnly + vbCritical 'сообщение, что файл не найден,
InputFileTxt.Text = CommonDialog1.FileName 'иначе вставляем в TextBox имя выбранного файла
End If

End Sub
...
Рейтинг: 0 / 0
27.10.2003, 07:22
    #32305563
Maximusss
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Что такое CommonDialog и где его взять ?????????
...
Рейтинг: 0 / 0
27.10.2003, 08:55
    #32305613
DionX
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
project-->components-->ms commondiolog - ставь галку. На панели инструментов появитса новый значёк - енто и есть он :)
...
Рейтинг: 0 / 0
27.10.2003, 08:59
    #32305620
tpg
tpg
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Пардон, не указал. Это Microsoft Common Dialog Control 6.0 (SP3), файл comdlg32.ocx. Добавляется через меню Project->Components...
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
20.12.2006, 17:11
    #34214075
Qht
Qht
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
А кроме CommonDialog'а это как можно сделать?
А то у меня VBA в Exclel, не понял как добавить этот инструмент.
...
Рейтинг: 0 / 0
20.12.2006, 17:45
    #34214163
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
используй GetOpenFilename

Код: plaintext
1.
2.
3.
4.
5.
6.
Sub f()
    fileToOpen = Application _
        .GetOpenFilename("Text Files (*.txt), *.txt")
    If fileToOpen <> False Then
        MsgBox fileToOpen 
    End If
End Sub
...
Рейтинг: 0 / 0
21.12.2006, 07:04
    #34214861
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
можно еще API, например на vbaccelerator.com есть классы, для отображения диалогов на базе API
...
Рейтинг: 0 / 0
22.12.2006, 20:16
    #34220009
RUSYA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Если всё же на CommonDialog, это болячая тема... т.к. он если выбрать файл, а потом нажать Отмена, он всёравно возвращает путь к файлу :) Проблема конечно решается сабклассингом, но есть слово лень :)
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
11.03.2008, 13:57
    #35182479
jenekcowboy
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
помогите пожалуста..я вставил в форму обьект Common dialog..А что дальше то делать???при обработке его ничего не выходит в код проги..При запуске проги его на форме не видно..
...
Рейтинг: 0 / 0
11.03.2008, 15:01
    #35182706
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
Он и не должен быть виден.
Покажите код, который вы написали для вызова диалога.
...
Рейтинг: 0 / 0
11.03.2008, 16:25
    #35183043
IguMEN
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Путь к файлу
RUSYAЕсли всё же на CommonDialog, это болячая тема... т.к. он если выбрать файл, а потом нажать Отмена, он всёравно возвращает путь к файлу :) Проблема конечно решается сабклассингом, но есть слово лень :)

Помимо лени есть еще и свойство commondialog1.cancelerror=true
Теперь ручками пиши обработчик отмены. Кажется, код 32755.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Путь к файлу / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]