| Вопрос: Как обновить страницу в Internet Explorer 6 | Добавлено: 23.11.07 23:16 |
Автор вопроса:  Александр
|
| Как можно программно обновить страницу в Internet Explorere, т.е. с помощью бейсика. |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 24.11.07 01:28 |
|
1) FindWindow, найти кнопку обновить и послать ей массаг баттон_даун, баттон_ап.
2) SendKays F5, толька надо чтобы IE активный был |
||
|
Номер ответа: 2 Автор ответа: Александр Вопросов: 20 Ответов: 44 |
Профиль | | #2 | Добавлено: 24.11.07 09:35 |
| В том и проблема, как программно называется IE...как Microsoft Internet Explorer или Internet Explorer он его не находит...( | ||
|
Номер ответа: 3 Автор ответа: RetupaВопросов: 1 Ответов: 51 |
Профиль | | #3 | Добавлено: 24.11.07 11:30 |
|
'(проект\ссылки)
'MSHTML.TLB 'shdocw.dll Private Sub Command1_Click() Dim ShellWin As New ShellWindows Dim WB For Each WB In ShellWin If TypeOf WB.Document Is HTMLDocument Then Debug.Print "Is HTMLDocument " Debug.Print WB.Type Debug.Print WB.Name Debug.Print WB.hWnd Debug.Print WB.Document.domain Debug.Print WB.Document.url Debug.Print WB.Document.cookie Debug.Print WB.Document.Title Debug.Print Len(WB.Document.body.outerHTML) Debug.Print "--" If WB.Document.url = "about:blank" Then WB.Document.location.reload (True) Next Set WB = Nothing End Sub |
||
|
Номер ответа: 4 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #4 | Добавлено: 24.11.07 17:21 |
|
В том и проблема, как программно называется IE...как Microsoft Internet Explorer или Internet Explorer он его не находит...(
А ты тогда все окна перебери и Like'ом, найди %Microsoft Internet Explorer% 
|
||
Страница: 1 |