Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
1 / 1 / 0
Регистрация: 26.10.2017
Сообщений: 108
.NET 4.x

Как из приложения открыть любой документ MS Office?

08.02.2021, 22:54. Показов 2010. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
День добрый!
В ListBox грузятся все файлы с полным путем, т.е. и *.doc, *.docx, *.xls, *.xlsx, *.txt.
Как сделать, чтобы при клике на doc, docx - эти документы открывались в Word, ну а экселевские файлы - в Excel, текстовые - или в блокноте, или в WebBrowser?

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
#Region "Заполняем документами остальными файлами"
            On Error Resume Next
            Dim FilesNamesDoc = My.Computer.FileSystem.GetFiles(
            FolderPath, FileIO.SearchOption.SearchTopLevelOnly, "*.doc", "*.docx", "*.xls", "*.xlsx", "*.txt") 'показываем ВСЕ файлы в папке
 
            For Each FileName As String In FilesNamesDoc
                ListBox6.Items.Add(FileName) 'вместе с путем и расширением
                'ListBox1.Items.Add(IO.Path.GetFileNameWithoutExtension(FileName)) 'без расширения файла
                ListBox5.Items.Add(IO.Path.GetFileName(FileName))  'Без пути, с расширением
            Next
#End Region
 
    Private Sub ListBox5_MouseDoubleClick(sender As Object, e As MouseEventArgs) Handles ListBox5.MouseDoubleClick
        ListBox6.SelectedIndex = ListBox5.SelectedIndex
        ListPutFiles = ListBox6.Text 'Полный путь к файлу
 
 
        Try
            Dim oWord As Word.Application
            Dim oDoc As Word.Document
            oWord = CreateObject("Word.Application")
            oWord.Visible = True
            oDoc = oWord.Documents.Add(ListPutFiles)
        Catch
            Dim oExcel As Excel.Application
            Dim oEx As Excel._Workbook
            oExcel = CreateObject("Excel.Application")
            oExcel.Visible = True
            oEx = oExcel.Workbooks.Open(ListPutFiles)
        End Try
 
    End Sub
Миниатюры
Как из приложения открыть любой документ MS Office?  
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
08.02.2021, 22:54
Ответы с готовыми решениями:

Как открыть документ Microsoft Office?
Народ, подскажите, pls! на диске (сетевом, путь известен) надо открыть на редактирование файл оффиса. Открыть надо по нажатию клиентом...

Как открыть документ docx в OpenOffice
Добрый день! У меня такая проблемма есть документ сделанный клиентом. Скриншоты прикрепил. Причем если этот мерзкий docx сохранить через...

"Открыть документ Office" в Ofiice 2007
Добрый день\утро\вечер: Чувствую себя идиотом, но без Вас похоже не разберусь... Возникла такая проблема: После переустановки Windows XP...

1
3260 / 3286 / 556
Регистрация: 17.02.2019
Сообщений: 5,195
08.02.2021, 23:34
Лучший ответ Сообщение было отмечено zhigalkin_p как решение

Решение

zhigalkin_p, попробуйте так
VB.NET
1
Process.Start("Здесь путь к файлу \ Имя")
Добавлено через 3 минуты
А это так для справки https://docs.microsoft.com/ru-... etcore-3.1
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
08.02.2021, 23:34
Помогаю со студенческими работами здесь

Не открывается файл Документ Office Open XML (docx) - файл поврежден, поэтому его нельзя открыть
Посмотрите, пожалуйста кто может! очень важно:cry: документ , который не отрывается. помогите возобновить...плиз

Как открыть любой с помощью VB?
Mne nado otkrit luboy file pri pomoshi VB v yego 'default'ovom interface. Naprimer PDF v Adobe. BMP v Paint, JPG v Imaging, TIF v MS Photo...

При нажатии на button открыть текстовый документ или вордовский документ, путь к которому задан программой
Подскажите как сделать ,что бы при нажатии на button открывался текстовый документ или вордовский документ, путь которого задан ...

как открыть word документ
Есть документ word он защищен от записи. Не могу понять как снять защиту. Ну вот 1 способ перевести его в pdf и распознать. А как просто...

Как открыть документ в FlowDocumentReader?
НЕ могу понять как нужно считывать файлы чтобы потом делать их содержимым ФлоуДокументРидера. StreamReader file = new...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Функция установки текстового статуса в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru