Что нового

[Сеть, интернет] IE. Как импортировать изображение со со страницы в GUI?

Belfigor

Модератор
Локальный модератор
Сообщения
3 590
Репутация
938
Имеется вот такой вот код:
Код:
<a href="/player/" class="name"><img src="/@/images/pers/man2_thumb.png" class="avatar">
<b>WilliBubba [1]
		</b></a>
На странице он отображает аватар и ниже его ник. Как можно импортировать картинку со страницы сайта к себе в ГУИ?
 

dwerf

Использует ArchLinux
Сообщения
478
Репутация
218
Скачать картинку с помощью InetGet(), в ГУИ использовать GuiCtrlCreatePic() и возможно GuiCtrlSetImage().
 
Автор
B

Belfigor

Модератор
Локальный модератор
Сообщения
3 590
Репутация
938
Суть в том что я не знаю как качать картинку вот по такой ссылке:
src="/@/images/pers/man2_thumb.png"
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4 020
Репутация
622
Код:
URL/@/images/pers/man2_thumb.png
 

dwerf

Использует ArchLinux
Сообщения
478
Репутация
218
Если в начале адреса какого нибудь файла указанного в хтмл-странице не стоит домен то:
если первый знак / то в начале просто подставляется домен
иначе в начале подставляется адрес самого хтмл-файла минус название хтмл-файла.

Надеюсь понятно написал. :whistle:
 

FlatX007

Tattoo!
Сообщения
197
Репутация
35
Может исходный код этой программы поможет вам :smile:

http://autoit-script.ru/index.php?topic=1723.0
 

Garrett

Модератор
Локальный модератор
Сообщения
3 999
Репутация
964
Belfigor
Можно ссылку на страницу с аватаром?
Вот тут тоже посмотрите, может, поможет.
 
Автор
B

Belfigor

Модератор
Локальный модератор
Сообщения
3 590
Репутация
938
Ссылка на страницу вот: http://www.moswar.ru/player/
Но надо логиниться в игру чтобы аватар отображался :(
 

Garrett

Модератор
Локальный модератор
Сообщения
3 999
Репутация
964
Где-то так:
Код:
#include <StaticConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <GDIPlus.au3>

Global $oForm
Global $sPath = @ScriptDir & "\avatar.jpg"

_GDIPlus_Startup ()

$oIE = _IECreate("http://www.moswar.ru/")

#Region ### START Koda GUI section ### Form=
$Form = GUICreate("Form1", 105, 133, 192, 114)
$BottonSend = GUICtrlCreateButton("Войти", 14, 96, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    _ShowAvatar()
    Select
        Case $nMsg = $GUI_EVENT_CLOSE
            _GDIPlus_ShutDown ()
            Exit
        Case $nMsg = $BottonSend
            _Submit()
    EndSelect
WEnd

Func _Load() ; Загружаем и сохраняем картинку
    $oDiv = _IEGetObjById ($oIE, "personal")
    $oImgs = _IETagNameGetCollection ($oDiv, "img")

    For $oImg In $oImgs
        $sAvatar = $oImg.src
    Next
   
    InetGet($sAvatar, $sPath, 1)
    _ShowAvatar() 
EndFunc

Func _ShowAvatar() ; Показываем картинку в GUI
    $hBitmap = _GDIPlus_BitmapCreateFromFile ($sPath)
    $hGraphic = _GDIPlus_GraphicsCreateFromHWND ($Form)
    _GDIPlus_GraphicsDrawImage ($hGraphic, $hBitmap, 10, 5)
    _GDIPlus_GraphicsDispose ($hGraphic)
    _GDIPlus_BitmapDispose ($hBitmap)
    Sleep(30)
EndFunc


Func _Submit() ; Отправляем данные
    Local $sLogin	= "" ; Логин
    Local $sPass	= "" ; Пароль

	$oForm = _IEFormGetCollection ($oIE, 0)
    $oInputs = _IETagNameGetCollection ($oForm, "img")
    $sNW_login = _IEFormElementGetObjByName($oForm, "email")
        _IEFormElementSetValue($sNW_login, $sLogin)
    $sNW_pass = _IEFormElementGetObjByName($oForm, "password")
        _IEFormElementSetValue($sNW_pass, $sPass)
	_IEFormElementCheckboxSelect ($oForm, 0,"remember", 0, "byIndex")
    _IEFormSubmit($oForm)
    _IELoadWait ($oIE)
	If Not FileExists($sPath) Then _Load()
EndFunc
 
Верх