Download a WMV file "Object required" error

[NMadson]

I've found umpteen examples of code to download files from the Internet, none of which I can get to work in Excel 2013. I'm trying to get the basic functionality working before I expand my code to do the other things I want to do, so below is the simplest version of code I could find which I thought should work. At the following line

Set objStream = CreateObject(“ADODB.Stream”)

I get an error message "Object required." I must be doing something simple wrong. Can anyone point me in the direction of my error?

TIA,
Nolan
<code>
Sub testDownload()

Dim objStream As Object
Dim xHttp As MSXML2.XMLHttp
Set xHttp = New MSXML2.XMLHttp
xHttp.Open "GET", "http://www.xxxxx.wmv", False
xHttp.send
Set objStream = CreateObject(“ADODB.Stream”)
objStream.Type = 1
objStream.Open
objStream.Write xHttp.responseBody
objStream.SavetoFile "I:\xxxxx.wmv", 2
objStream.Close

End Sub
</code>

 

[wigi]

What is the URL of the wmv file?

Also, can you please use

 tags when you paste code over here? Thanks.

 

[wigi]

I noticed that in the offending line your double quotes seem to be incorrect.
Might be worth looking at (next to using

 tags).

 

[NMadson]

Re:

 tags; sorry, I thought it was <Code>.  I'll use "[Code]" henceforth.
Re: the URL - sorry, I can't publish the exact details of the process - confidentiality reasons.
Re: quotes, yes, in cutting and pasting I accidentally inserted non-printable left and right double quotes instead of straight double quotes.  That was the issue.

Now the file I download is only the log-in page, not the media file that was my intent.  Passing my user id and password to the site is another problem I was having, but I was trying to address issues one at a time.

Thanks,
Nolan

 

[wigi]

Hello Nolan

You're welcome !