Обновить окно IE. Очень срочно нужна помощь. Вилы...

[Kepmann]

Сабж.
Надо обновить окно ИнтернетИспортила. Хендл я знаю. По сути, надо отправить ему нажатие F5. Но как сделать не пойму.

Помогите пожалуйста...

Видимо надо заюзать sendmessage, но как не знаю.
К тому же нужно сделать это не в активном окне, чтоб обновленное, желательно не становилось активным.
Главное, чтобы обновлять окно IE, не делая его перед этим активным.

Надо срочно сделать прогу, а я давно не программил и книг под рукой нет.


Клянусь, как сделаю, нткогда больше не буду забивать на родной VB.

[GSerg]

Ищи...
Ищи пример под названием IE Spy...
Когда найдёшь, там всё понятно...

[Kepmann]

Трабл в том, что я уже двое суток (не дней а именно суток) ищу эту инфу - начинаю по-тихоньку сходить с ума...

В принципе, фиолетово совершенно, что это окно именно IE, важен сам принцип обновления окна. Там по хендлу надо отправить sendmessage WM_REFRESH... или нажатие F5.

Пожалуйста, дайте одну строчку кода - а то заплачу... хнык-хнык

[ANDLL]

SendMessage(hwnd,WM_KEYDOWN,vbKeyF5,0)...

[Kepmann]

Не помогает... 8(
Или может такое можно только активному окну посылать?

[Kepmann]

Хотя и с активным окном не работает... 8(

[Крост]

Получить окно IE можно без поиска окон, не по hwnd...подключаешь MSHTML к проекту, и там есть класс, точно не помню, что-то вроде WindowsList. В нём все открытые окна IE и обычного эксплорера. Сверяешь хэндел, потом получаешь из этого окна документ, и делаешь refresh..=)

[Kepmann]

Блин, я раньше делал так, как и сейчас хочу, но блин, не получается... Давно не занимался!

2Крост
Проще с бубном потанцевать - такие извращения не выход...


sendmessage прекрасно должен справляться.

[Крост]

иди танцуй с бубном. Это не извращения, а самый простой вариант.

[Kepmann]

SendMessage(hwnd,WM_KEYDOWN,vbKeyF5,0)...

Вот это - нормальный вариант, вот только не работает почему-то.
Может надо значение константы прописывать?

[ANDLL]

В смысле? Напиши в начале своей формы Option Explicit.
И еще: ты надеюсь не hWnd писал в своей программе? Вместо hWnd надо указать hWnd именно окна IE(его омжно найти с помощью FincWindow или EnumWindows)

[Kepmann]

Да я не тупой... Я в проге штук десять апишек юзаю, естественно sendmessage описал, конечно подставляю хендл нужного окна...

[ANDLL]

Попробуй
а) Заменить на KEYUP
б) Поставить lParam=1
в) В объявлении API-функции должно быть ByVal lParam as Long и никак иначе.
Что ты имел ввиду, говоря "Может надо значение константы прописывать"

[Kepmann]

Const WM_SYSCOMMAND = &H112
Const SC_SCREENSAVE = &HF140&

SendMessage hwnd, WM_SYSCOMMAND, SC_SCREENSAVE, ByVal 0&

Это пример из АПИгид... Вот сдесь заранее прописываются значения констант.

Сейчас буду пробовать твои советы

[ANDLL]

Приведи-ка свой код...

[Kepmann]

Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As Any, ByVal lpWindowName As Any) As Long

retval = SendMessage(FindWindow(vbNullString, "Имя страницы - Microsoft Internet Explorer"), WM_KEYDOWN, vbKeyF5,0)


Вот как-то так...

Попробовал твои рекомендации - не помогло... 8(

[ANDLL]

И Option Explicit написал?

[Kepmann]

Написал... все равно не рефрешится

vbKeyF5
Это точно так?

[Kovu]

ANDLL
Извини но каким образом включение режима проверки объявленности всех переменных может помочь

[Kepmann]

ANDLL
Извини но каким образом включение режима проверки объявленности всех переменных может помочь

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

А вообще совет был хороший. Ведь при юзаньи АПИ VB не ругается на переменные необьявленные, а апишки не пашут...

[ANDLL]

2Kovu: Помогает, если забываешь объявить какую-то константу. Если Option Explicit нету, то вызов API-функции не приведет к ошибке, но и не приведет к нужному результату. Вообще, список чудес, которые могут быть вызваны использованием необъявленых переменных широк и весьма занимателен .
Просто, в приведеннном Kepmann'ом коде не объявлена константа WM_KEYDOWN. У меня было подозрение, что она вообще нигде не объявлена.
2Kepmann: Посмотри, что возвращает SendMessage и FindWindow.
Первое должно возвращать 0, второе - не ноль.
В общем, завтра постараюсь разобраться.

[Kepmann]

Да просто я не все копировал, забыл ее сюда сунуть, та то она есть (WM_KEYDOWN)

[Kepmann]

Посмотри, что возвращает SendMessage и FindWindow.
Первое должно возвращать 0, второе - не ноль.

Так и есть.

[ANDLL]

Код: Выделить всё

Dim hExplorerWnd As Long
hExplorerWnd = 'Сам находишь нужное тебе окно
Dim hChildSHDocVw As Long
hChildSHDocVw = FindWindowEx(hExplorerWnd, 0, "Shell DocObject View", vbNullString)
PostMessage hChildSHDocVw, WM_KEYDOWN, vbKeyF5, 0

SendMessage не работает... Интересно, почему...

[Kepmann]

Вот и мне интересно... Вчера друг насмсил тоо же самое про sendmessage (а у него опыт VB приличный)...

Не работает и все!

C postmessage - все ок!!!
Огромное спасибо!!!!


Но хочется с sendmessagem разобраться... 8(
Ну пока пост поюзаю - и то гуд...

[ALX_2002]

2 Kepmann: Извиняюсь, что не по теме. А может пересмотреть задачу ? Обязательно обновлять именно окно IE ? Может написать свой код обращения к странице.

http://bbs.vbstreets.ru/viewtopic.php?t ... ht=alx2002

В конце поста простой пример на одних API.

Тогда вообще никаких окон не понадобится.

P.S Поделись траблом - почему именно IE мучать нужно ?

[ANDLL]

2Kepmann:SendMessage и PostMessage работают по разным принципам(если интересно, можешь почитать в MSDN). так что если SendMessage не работает, то нечего с ним и разбираться...

[Kepmann]

почитать в MSDN

дык читал уже, поэтому и хотел заюзать именно sendmessage

Да еще когда искал инфу, нашел семпл из Дельфей, в котором sendmessage используется для обновления именно таким образом как хотел, но в VB как-то не пашет.

В МСДН, насколько я помню, сказано, что использование postmessage менее надежно, чем sendmessage...

[ANDLL]

Где это там сказано?

[Kovu]

The PostMessage function places (posts) a message in the message queue associated with the thread that created the specified window and then returns without waiting for the thread to process the message. Messages in a message queue are retrieved by calls to the GetMessage or PeekMessage function.
Ты подразумеваешь под надёжностью возврат результата ?
If you send a message in the range below WM_USER to the asynchronous message functions (PostMessage, SendNotifyMessage, and SendMessageCallback), its message parameters can not include pointers. Otherwise, the operation will fail. The functions will return before the receiving thread has had a chance to process the message and the sender will free the memory before it is used.
или это ?