powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / открыть с помощью
13 сообщений из 13, страница 1 из 1
открыть с помощью
    #33288865
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
у меня есть файл txt, и мне его надо програмно открыть с помощью internet explorera.
подскажите как это сделать.
...
Рейтинг: 0 / 0
открыть с помощью
    #33288903
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
    Dim ie      ' As Object
    
    Set ie = CreateObject("InternetExplorer.Application")
    
    ie.Visible = True
    ie.Navigate "D:\1\Test.txt"

    Set ie = Nothing
...
Рейтинг: 0 / 0
открыть с помощью
    #33288922
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну самое простое видимо
shell "C:\Program Files\Internet Explorer MyTxt.txt"
...
Рейтинг: 0 / 0
открыть с помощью
    #33288927
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
немного не дописал
shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE MyTxt.txt"
...
Рейтинг: 0 / 0
открыть с помощью
    #33288940
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
спасибо огромное,Пользователь2!
а не подскажите зачем нужна последняя строчка?
...
Рейтинг: 0 / 0
открыть с помощью
    #33288966
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
HandKot, тоже огромное спасибо!

и так и так работает! а что же тогда лучше? или без разницы?
...
Рейтинг: 0 / 0
открыть с помощью
    #33289041
bimа не подскажите зачем нужна последняя строчка?

В связи с тем, что мы больше не собираемся использовать объект InternetExplorer, сбрасываем объектную переменную и освобождаем память.

bimи так и так работает! а что же тогда лучше? или без разницы?

С shell проще.
...
Рейтинг: 0 / 0
открыть с помощью
    #33289098
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пользователь2 bimа не подскажите зачем нужна последняя строчка?

В связи с тем, что мы больше не собираемся использовать объект InternetExplorer, сбрасываем объектную переменную и освобождаем память.


а если еще и распечатать все то, что открыто, то это как?
...
Рейтинг: 0 / 0
открыть с помощью
    #33289274
bimа если еще и распечатать все то, что открыто, то это как?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
    Dim ie      ' As Object
    
    Set ie = CreateObject("InternetExplorer.Application")
    
    ie.Visible = True
    ie.Navigate "D:\1\Test.txt"
    ie.ExecWb  6 ,  2 ,  0 ,  0 

    Set ie = Nothing
...
Рейтинг: 0 / 0
открыть с помощью
    #33289293
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ошибка выдаеться: "method 'ExecWB' of 'IWebBroswer2' failed"
...
Рейтинг: 0 / 0
открыть с помощью
    #33289360
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
значит ваш браузер не поддерживает печать или страница еще не открылась или у вас принтер не настроен или вообще отсутствует в системе (браузер должен быть 5.01 и выше желательно)
...
Рейтинг: 0 / 0
открыть с помощью
    #33289821
Konst_One прав.
...
Рейтинг: 0 / 0
открыть с помощью
    #33296416
bim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проблема была в браузере.
после обновления все работает замечательно!
спасибо всем огромное!
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / открыть с помощью
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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