Вызвать событие InternetExplorer |
[/SRC] Dim ie As Object Dim el As Object Set ie = CreateObject("InternetExplorer.Application") ie.Visible = True ie.navigate (CurrentProject.Path & "/CADmatic 4.1.html") varReturn = SysCmd(acSysCmdClearStatus) Do Until ie.readyState = 4: DoEvents: Loop 'Пытаюсь вызвать событие Click - ошибка: Run-time Error '424' 'Это не кнопка а картинка (может у нее нет события Click) ie.Document.getElementById("ctl00$cphBody$btnPrgHistory").Click Set el = Nothing Set ie = Nothing [SRC vba]
http://www.sql.ru/forum/1171757/vyzvat-sobytie-internetexplorer
Комментировать | « Пред. запись — К дневнику — След. запись » | Страницы: [1] [Новые] |