Названия песен Soundcloud - PullRequest
       5

Названия песен Soundcloud

0 голосов
/ 01 декабря 2019

Я новичок в веб-очистке VBA и структуре html в целом, и у меня возникают некоторые проблемы с получением названий песен с этого адреса html "https://soundcloud.com/maraudamusic/tracks"

Это то, что я пробовал до сих пор, иКажется, я не могу извлечь названия песен <li> из HTML-документа (я едва знаю, о чем говорю, так что прости меня).

Option Explicit

Sub SCScrape()

Dim ie As InternetExplorer
Dim html As HTMLDocument
Dim site As String
Dim artist As String

artist = "maraudamusic"
site = "https://soundcloud.com/" & artist & "/tracks"

Set ie = New InternetExplorer
ie.Visible = True
ie.navigate site

Do While ie.readyState <> READYSTATE_COMPLETE
    DoEvents
Loop

Set html = New HTMLDocument

Dim ul As IHTMLElementCollection
'Dim ul As Variant
'Dim li As IHTMLListElement
Dim els As Variant
Dim el As Variant
'Dim li As Variant

'Set ul = html.getElementsByClassName("lazyLoadingList__list sc-list-nostyle sc-clearfix")
'Set ul = html.getElementsByTagName("ul")
Set els = html.getElementsByClassName("soundTitle_usernameTitleContainer")
Debug.Print

For Each el In els
    Debug.Print el.innerHTML
Next el

Debug.Print "Hello"
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...