Покажет ли кто пример на “MASM32” как используется компонент IExplorer

Discussion in 'WASM.BEGINNERS' started by mikityak, Sep 1, 2008.

  1. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    И если не трудна как на ньом когда загрузил страницу найти одну силку и что-бы мая прога нажала на эту ссылку.. [​IMG]
     
  2. TOLSTOPUZ

    TOLSTOPUZ New Member

    Blog Posts:
    0
    Joined:
    Apr 26, 2008
    Messages:
    509
    ShellExecuteA(0,"open","http://wasm.ru/","","",1);
    ; Запускаем КОМПОНЕНТ IE

    Тебе может ещё нужно чтобы программа нажала на ссылочку незаметно? Или пофиг? Если нужно, то окно "браузера по умолчанию" нужно открывать свёрнутым.
     
  3. dgs

    dgs New Member

    Blog Posts:
    0
    Joined:
    Jun 23, 2008
    Messages:
    434
    Ну тут оффлайн браузер, а онлайн найти в исходниках довольно трудно(забыл как архив называется) среди нескольких тысяч.

    Тут я думаю проще использовать PHP или Java Script
     
  4. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    TOLSTOPUZ
    ShellExecute нет не это я хотел.. я хачу в "масе" зделать окошко разместить на нем компонент.. браузера, загрузить страницу.. знать когда окончена загрузка страницы..
    найти на ней ссылку нажать на нее.. дождатса загрузку страницы на которую перешол, и закрить прогу.. Кто подскажет пример в котором штото подобное показано !!!

    п.с
    PHP или Java я их просто незнаю..
     
  5. driver

    driver New Member

    Blog Posts:
    0
    Joined:
    Jun 18, 2008
    Messages:
    302
    браузеры есть, но ... ты хочешь что-то типа IE на масме? я бы тоже не отказался, найдёшь если поделишься?
     
  6. driver

    driver New Member

    Blog Posts:
    0
    Joined:
    Jun 18, 2008
    Messages:
    302
  7. driver

    driver New Member

    Blog Posts:
    0
    Joined:
    Jun 18, 2008
    Messages:
    302
    ....
     
  8. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    [​IMG] та какой браузер.. просто хачу пример.. как подключить.. Ну вот этот пример я имею.его..но вот то што пасредине неработает а точнее нет етого основного как там назвать.. забыл как називалса когда в Бейсике подключал..

    Ладно тогда савсем без окошка што за обект должен быть в проекте.. в которое загружаем страницу ищем сслыка не ней и делаем переход.. но нада знать когда как первая и когда вторая окончила загружатся..
     
  9. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    Microsoft® HTML Help Control эт чтоли.. (нет щас Basica штобы сказал точно..) C:\WINDOWS\system32\Hhctrl.ocx ???
     
  10. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    1. Получаем интерфейс IHTMLDocument2 из IWebBrowser::lol: ocument (пример doc:=WebBrowser1.Document as IHTMLDocument2)
    2. Получаем коллекцию элементов IHTMLElementCollection = IHTMLDocument2::all (allEl:=doc.all)
    3. Получаем коллекцию элементов формы allElForm:IHTMLElementCollection;
    allElForms:=allEl.tags('form') as IHTMLElementCollection;
    4. Перечисляем все элементы на имя тега Input:
    For i:=0 to allElForms.length-1 do
    begin
    elItem:=allEl.item(i, i) as IHTMLElement;
    If elItem.tagname = 'input' then
    ....
    end;
    5. Проверяем атрибут Type элемента Input, если он Submit или Button:
    If string(elItem.getAttribute('type', 0)) = 'submit' then
    6. Если все вышеуказанные условия выполняются, делаем клик: elItem.click


    КАК ПОДОБНОЕ ЗДЕЛАТЬ НА MASM32 :)
     
  11. TOLSTOPUZ

    TOLSTOPUZ New Member

    Blog Posts:
    0
    Joined:
    Apr 26, 2008
    Messages:
    509
    а что такое
    begin
    ???
     
  12. 2FED

    2FED New Member

    Blog Posts:
    0
    Joined:
    Feb 20, 2008
    Messages:
    1,002
    Начало блока в дельфи
     
  13. KiNDeR

    KiNDeR New Member

    Blog Posts:
    0
    Joined:
    Jun 13, 2003
    Messages:
    258
    Location:
    Russia
    не проще ли послать запрос серверу, получить контент страницы, выдернуть из нее ссылку и отправить запрос по этой ссылке серверу?
     
  14. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    KiNDeR а поподробней ? пример можно ? на масе !!! [​IMG]
     
  15. KiNDeR

    KiNDeR New Member

    Blog Posts:
    0
    Joined:
    Jun 13, 2003
    Messages:
    258
    Location:
    Russia
    за подробностями читай статьи из http://wasm.ru/publist.php?list=16
    а вообще алгос (упрощенный):
    1. составляем HTTP GET или POST запрос на нужный адрес
    2. получаем ответ от сервера(либо полностью страницу со всеми заголовками, либо ошибку)
    3. парсим ответ сервера в поисках нужной ссылки (анализируем теги <a href=...>)
    4. формируем новый HTTP GET или POST запрос на найденную ссылку и посылаем серверу.

    P.S.: пользуйся поиском, тут уже поднимались подобные темы
     
  16. 2FED

    2FED New Member

    Blog Posts:
    0
    Joined:
    Feb 20, 2008
    Messages:
    1,002
    _mikityak_ николай фисоф?
     
  17. mikityak

    mikityak Забанен

    Blog Posts:
    0
    Joined:
    Aug 5, 2007
    Messages:
    160
    про што ты ?
     
  18. patolog

    patolog New Member

    Blog Posts:
    0
    Joined:
    Dec 29, 2007
    Messages:
    49
    :lol: