Получить значение с диаграммы на web-странице - VB
Формулировка задачи:
Форумчане, доброго времени суток!
Мне очень помогли здесь с вопросом о том как вытащить данные с таблицы размещенной на web-странице. Теперь возникла необходимость вытащить данные с диаграммы.
Вот код в котором содержится число из диаграммы(66,7%):
Можно ли его отсюда как то вытащить в visual basic, к примеру в TextBox?
Были попытки прошерстить html-код и вытянуть данные, но они не увенчались успехом.
Я так предполагаю, что transform="translate(630,4) это как id "значения", которое мне нужно, но не знаю как этим воспользоваться.
Прошу помощи.
Спасибо!
Листинг программы
- <g zIndex="1" style="cursor:default;" transform="translate(630,4)">
- <text x="3" zIndex="1" style="font-size:11px;font-weight:bold;color:#333;fill:#333;" y="15">66.7%</text></g>
Решение задачи: «Получить значение с диаграммы на web-странице»
textual
Листинг программы
- Option Explicit
- Private Sub Form_Load()
- Dim NAME, HTML, HT, K, EL, U() As String, Q
- NAME = App.Path & "\test.html"
- HT = CreateObject("Scripting.FileSystemObject").Getfile(NAME).OpenasTextStream(1).ReadAll
- Set HTML = CreateObject("htmlfile")
- HTML.write HT
- Set Q = HTML.body
- ' Debug.Print Q.innertext
- U = Split(Q.innertext, "%")
- Показатель = U(UBound(U) - 1)
- MsgBox U(UBound(U) - 1), 64, "ЭТО?"
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д