Quantcast
Channel: The Official Scripting Guys Forum! forum
Viewing all articles
Browse latest Browse all 15028

VBScript - Help downloading jpg from allcdcovers and google (album art)

$
0
0

I am stuck. I have created a MP3 sorter that plays the mp3 and ask what folder you want to move the song to. that works fine.

All my mp3's have embedded album art.

I have spent weeks trying to figure out how to extract the art to a temporary file to be shown while the mp3 is playing from my hta page. I have given up on that for now because I do not want to use a 3 party executable.

So here is where I am stuck: instead of extracting the art from the mp3's, I decided I could download the art from a web site.

Oh boy was I wrong in thinking it was an easy task. At the moment I am using an executable (DisCoverArt.exe) to do this.

It would be fine but every time it loads I get a black box on the screen for a few seconds.

I just can't seem to be able to get my head wrapped around this.

here is the code I have so far for locating the art, I just can't figure out how to download it:


searchbox = "Cypress Hill Greatest Hits From the Bong"

set ie = createobject("internetexplorer.application")
ie.visible=true 'will be false when it works

'ie.navigate "http://image.google.com"
ie.navigate  "http://www.allcdcovers.com/"

do while ie.readystate <> 4: loop

'ie.document.all.q.innertext = searchbox & " ext:jpg site:amazon.com size:300" 'for google.com
ie.document.all.searchphrase.innertext = searchbox

WaitAFew(2) ' If i don't wait, sometimes we don't get the click.

ie.document.all.searchSubmit.Click
'ie.document.all.btng.click ' for google.com

set ie=nothing

wscript.echo "all done"

Sub WaitAFew(PauseSeconds)    
  Dim ScondsToWait    
  ScondsToWait = DateAdd("s", PauseSeconds, Now())    
  Do Until (Now() > ScondsToWait): Loop
End Sub

If someone could help me figure it out I would be very appreciative.


Viewing all articles
Browse latest Browse all 15028

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>