есть такой сайт http://www.ilm.ee/tallinn
там ввиде картинки публикуется текущая температура.
ссылка на картинку динамическая.
вопрос как мне её поиметь
пытался делать примерно так:
- Код: Выделить всё
Dim m_URL As String = "http://www.ilm.ee/tallinn"
Dim theURL As New Uri(m_URL)
Dim theRequest As Net.WebRequest
Dim location As Integer
theRequest = Net.WebRequest.Create(theURL)
Dim theResponse As Net.WebResponse
Dim theData As String = ""
theResponse = theRequest.GetResponse
Dim aReader As New IO.StreamReader(theResponse.GetResponseStream())
Do ' здесь не могу ничего придумать как тупо найти ссылку на картинку
theData = aReader.ReadLine
lacation = theData.IndexOf("Temperatuur<br />")
Loop While lacation = -1
Dim imgaddres As String
imgaddres = aReader.ReadLine ' и даже нахожу ...........
Dim nac As Integer
Dim kon As Integer
nac = imgaddres.IndexOf("/images/")
kon = imgaddres.IndexOf(";cache=0") + 8
imgaddres = imgaddres.Substring(nac, kon - nac)
imgaddres = imgaddres.Replace(";", "&")
Dim arrAs As Byte()
Dim ddd As New Net.WebClient
Dim instance As New System.Drawing.ImageConverter
'ddd.DownloadFile("http://www.ilm.ee" + imgaddres, "C:/test.jpg") '...... но это не она
arrAs = ddd.DownloadData("http://www.ilm.ee" + imgaddres)
img1 = instance.ConvertFrom(arrAs) ' обьявлено ранее
aReader.Close()
код меняется "на лету" со старого работоспособного со старой версии сайта, извините за сумбур
Как же делает типичный браузер показывая мне картинку?
Если там каждый раз генерируется новая ссылка на картинку, то мой подход вообще тупиковый, а уж порочный изначально