Что нового

Передать картинку с сайта в PictureBox

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
Версия AutoIt: 3.3.6.1

Описание:
Есть сайт: Погода, на котором есть картинка.

Captured_Image.png


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

P.S. Картинка меняется в зависимости от времени суток (погоды). ;)
 

sss

Продвинутый
Сообщения
332
Репутация
96
Самое сложное здесь на мой взгляд - выдрать картинку. Ведь адрес ее будет меняться при разных погодных условиях. Ссылку на картинку я выдрал так:
Код:
#include <IE.au3>
$oIE = _IECreate ("http://www.wunderground.com/global/stations/33815.html",0,0,1)
$sHTML = _IEDocReadHTML ($oIE)
$split=StringSplit($sHTML,'<DIV id=curIcon><',1)
$split2=StringSplit($split[2],'src="',1)
$split3=StringSplit($split2[2],'"')
$pic_link=$split3[1]

В переменной $pic_link - ссылка на картинку. Скачиваем (функция InetGet(ссылка, куда скачать) ) в нужное место и вставляем в Pic ( фукция GUICtrlSetImage(контрол, путь до картинки) ). Все! А чтобы она менялась при смене на сайте, повторяй через некоторое время (полчаса, четверть часа, час, несколько часов...) операцию, приведенную выше, с логическим условием: если ссылка изменилась - скачать и вставить, если нет - продолжить работу.
 

rusreg79

Продвинутый
Сообщения
159
Репутация
57
код постом выше у меня вываливается
можно еще так вытянуть url:
Код:
#include <INet.au3>
$url = _INetGetSource("http://www.wunderground.com/global/stations/33815.html")
$url_gif = StringRegExpReplace($url, '(?s)(.*iconSwitchBig"><img src=")(.*?)(".*)', '\2')

MsgBox(0,'',$url_gif)
 
Автор
Zaramot

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
код постом выше у меня вываливается

У меня пример Sky-WaLkeR работает нормально, как твой пример.

СПАСИБО ЗА ПОМОЩЬ !!!

P.S. Буду использовать пример rusreg79, так как он карочи ;D
 
Верх