Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
adb420
4 / 4 / 0
Регистрация: 09.10.2013
Сообщений: 475
1

После выбора файла в OpenFileDialog вывести его путь без расширения

22.11.2014, 16:25. Просмотров 1386. Ответов 3
Метки нет (Все метки)

На форме текстовое поле и кнопка. При нажатии на кнопку, открывается диалог,выбором файл, и выбранный файл записывается в текстовое поле...Необходимо записать в текстовое поле полный путь к файлу, но не выводить его расширение. как вывести полный путь знаю:

vb.net
1
2
3
4
5
Dim OFD As New OpenFileDialog With {.Filter = "Файлы Adobe PDF|*.pdf|Все файлы (*.*)|*.*"}
OFD.InitialDirectory = "C:\"
    If OFD.ShowDialog = Windows.Forms.DialogResult.OK Then
         TextBox1.Text = OFD.FileName    
    End If
а как вывести полный путь, но без расширения файла?
Помогите пожалуйста! Заранее благодарен!
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.11.2014, 16:25
Ответы с готовыми решениями:

После выбора папки в FolderBrowserDialog необходимо вывести путь до этой папки в текстовое поле
После выбора папки в FolderBrowserDialog необходимо вывести путь до этой папки в текстовое поле

При открытии файла в OpenFileDialog его путь записать в textbox
Всем добрый вечер. Такая проблема значит: Прикрепил я openFileDialog1, button1 и textbox1 Мне...

Как извлечь имя файла без его полного пути и расширения?
как извлечь имя файла без его полного пути и расширения? какой код для кнопки сохранить в...

Как вывести имя файла без расширения
Как вывести имя файла без расширения ? Делаю так : Lab.Text = openFileDialog1.SafeFileName; ...

SharpDevelop, получить название файла без расширения и прибавить 14 дней к дате которая в первой его строке
содержимое 1000.txt файла 2014-08-13 13:50:19 126.48.232.103 2014-08-23 08:53:54 содержимое...

3
Step_UA
1537 / 621 / 214
Регистрация: 09.06.2011
Сообщений: 1,280
22.11.2014, 16:36 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

vb.net
1
2
3
4
5
6
7
            TextBox1.Text = IO.Path.GetDirectoryName(OFD.FileName) ' путь к папке содержащей выбранный файл
            TextBox1.Text = IO.Path.GetFileNameWithoutExtension(OFD.FileName) ' наименование файла без расширения
 
            Dim Path = IO.Path.GetDirectoryName(OFD.FileName)
            If Path.EndsWith("\") = False Then Path += "\"
            TextBox1.Text = Path + IO.Path.GetFileNameWithoutExtension(OFD.FileName) ' путь к файлу без его расширения
            TextBox1.Text = OFD.FileName.Substring(0, OFD.FileName.LastIndexOf(".")) ' путь к файлу без его расширения
2
Visualist
51 / 51 / 25
Регистрация: 01.02.2014
Сообщений: 201
22.11.2014, 18:15 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

vb.net
1
2
3
4
5
6
        Dim OFD As New OpenFileDialog With {.Filter = "Файлы Adobe PDF|*.pdf|Все файлы (*.*)|*.*"}
        OFD.InitialDirectory = "C:\"
        If OFD.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim LastI = OFD.FileName.LastIndexOf(".")
            TextBox1.Text = Mid(OFD.FileName, 1, LastI)
        End If
0
GSXL
26.11.2014, 14:43     После выбора файла в OpenFileDialog вывести его путь без расширения
  #4

Не по теме:

Хочу добавить что в FAQ есть решение вашей задачи, к тому же много чего еще интересного, рекомендую заглянуть!

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.11.2014, 14:43
Привет! Вот еще темы с ответами:

вывести путь файла по его названию с++
с клавиатуры вводится имя файла и расширение, требуется найти полный путь к файлу на с++

Получить путь из OpenFileDialog и вывести в Label
нужно что бы указывался полный путь к файлу в lable1 public partial class Form1 : Form { ...

Если файл не существует, показать OpenFileDialog для его самостоятельного выбора
Здравствуйте. Нужно чтобы при загрузке программы проверялся путь к БД, если такого нет то открыть...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.