Icons8というサイトの画像を自動ダウンロードしたいです。
以下VBAサンプルを使用して「Download」のボタンを押したいのですが
ソースを表示しても、どれがそのボタンなのかわかりません。
buttonとかdownloadで検索するとたくさんヒットしますが、
1つずつみてもそれらしいものが見当たりません。
●どうやって「Download」のボタンのタグを探せばいいですか?
IT初心者です。親切な方教えてください。
VBA
1Sub useButton() 2 Dim ie As InternetExplorer 3 Dim button As HTMLInputElement 4 5 Set ie = CreateObject("InternetExplorer.Application") 6 ie.Visible = True 7 ie.navigate "https://icons8.com/icon/new-icons/all" 8 Do While ie.Busy Or ie.readyState < READYSTATE_COMPLETE 9 DoEvents 10 Loop 11 12 'ソースが読めないから、ここからなんて書けばいいのか分からない↓ 13 For Each button In ie.document.getElementsByTagName("INPUT") 14 If button.Type = "button" And button.Value = "Download" Then 15 button.Click 16 Exit For 17 End If 18 Next 19End Sub 20
そもそも自動で収集するような仕組みはアクセスするサイトへの負荷が増大になる可能性があり利用規約などで禁止しているケースも少なくないです。そのあたりはクリアされた上ですか?
正直「自動収集するな」という規約は見つけられませんでした。私はたくさんの画像を収集したいのではなく、個人的に「ダウンロード→フォルダに保存→保存した画像を任意のサイズにして挿入」という流れを自動化したいだけだったのですが。。。
ちゃんとサイトを見たわけではないですが、この手のサイトなら何かしら提供する仕組みがありそうには思いますがそうではないんですかね。material iconsみたいに。保存した画像を任意のサイズにして…はちょっと分かりませんが、ブラウザ操作ですとダウンロード時にダウンロードダイアログの操作もあるので一筋縄ではいかなそうに思います。画像URLとってきたほうがいいかもしれませんね
IT初心者には荷が重いのでやめた方がいいと思いますよ。
回答1件
あなたの回答
tips
プレビュー