Мне нужно получить часть ссылки на веб-странице, используя Excel VBA.Атрибут href находится в теге "a" и является ссылкой cfm с параметрами.Я вижу полную ссылку с параметрами при открытии страницы в «Просмотр источника», но при программном доступе к ней часть ссылки после CFM не существует.Мне нужно получить значение EntityID из href.
Вот как выглядит HTML:
<tr class="Odd">
<td colspan="3">March, 2019</td>
<td><a href="/SiteAdmin/ViewStats.cfm?EntityId=980568&EntityType=3&MM=3&YY=2019">View</a></td>
</tr>
Вот часть кода, которая должна получить ссылку в виде строки:
Set pHTML = IE.document
Set aTagList = pHTML.getElementsByTagName("a")
For Each aTag In aTagList
aTagHref = aTag.href
If Left(aTagHref, 51) = "https://cp.homesandland.com/SiteAdmin/ViewStats.cfm" Then
Debug.Print aTagHref
Exit For
End If
Next
Я изменил обрабатывающую часть на простой файл debug.print, чтобы сэкономить здесь место.
Я ожидаю получить полную ссылку со всеми параметрами, но в действительности получается следующее:
https://cp.homesandland.com/SiteAdmin/ViewStats.cfm#
Есть идеи, почему это происходит и как я могу получить параметры ссылки href?