Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Открыть несколько веб-страниц сразу Добавлено: 11.05.08 00:01  

Автор вопроса:  Zahar | Web-сайт: partnerka-ru.info
Хочу в 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-сайт: domkratt.com
 Профиль | | #1
Добавлено: 11.05.08 01:55
Form1.hwnd + i

улыбнуло =)

Ответить

Номер ответа: 2
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #2
Добавлено: 11.05.08 02:02
Уважаемый Захар, а вы знаете, что такое hwnd? :-)

Ответить

Номер ответа: 3
Автор ответа:
 HACKER


 

Разработчик 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-сайт: domkratt.com
 Профиль | | #4
Добавлено: 11.05.08 12:10
А у меня вообще осла нет, что тогда делать? Надо в браузере по умолчанию открывать...

Ответить

Номер ответа: 5
Автор ответа:
 Winand



Вопросов: 87
Ответов: 2795
 Web-сайт: winandfx.narod.ru
 Профиль | | #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 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам