Страница: 1 |
Вопрос: Открыть несколько веб-страниц сразу | Добавлено: 11.05.08 00:01 |
Автор вопроса: ![]() |
Хочу в VB одним нажатием открыть несколько веб-страниц сразу.
Пробую такой код: for i=1 to n hBrowse = ShellExecute(Form1.hwnd + i, "open", "http://" + адрес(i), "", "", 5) next i Однако все страницы последовательно открываются в однмо и том же окнt. как сделать, чтобы они открывались в разных окнах, то есть одновременно открылось несколько сайтов. |
Ответы | Всего ответов: 5 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 11.05.08 01:55 |
Form1.hwnd + i
улыбнуло ![]() |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #2 | Добавлено: 11.05.08 02:02 |
Уважаемый Захар, а вы знаете, что такое hwnd? ![]() |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | Цитата | #3 | Добавлено: 11.05.08 04:48 |
run
X:\Program Files\Internet Explorer\ie.exe http://example.com т.е. в параметр командной строки осел путь принимает который и открывает... Дальше - думай.. можно через shell простой.. можно и через shellexecute параметры передавать вроде.. |
Номер ответа: 4 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | Цитата | #4 | Добавлено: 11.05.08 12:10 |
А у меня вообще осла нет, что тогда делать? Надо в браузере по умолчанию открывать... |
Номер ответа: 5 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #5 | Добавлено: 11.05.08 13:40 |
гм..Вот код делает именно так как нужно Zahar - 4 страницы открывает. Правда у меня Опера.
Call ShellExecute(0, "open", "http://google.com", "", "", 5) Call ShellExecute(0, "open", "http://nnm.ru", "", "", 5) Call ShellExecute(0, "open", "http://vbnet.ru", "", "", 5) Call ShellExecute(0, "open", "http://motofan.ru", "", "", 5) |
Страница: 1 |
|