VB Script to download series of PDF

[Dewajtis]

Can you help to write a vbs code to download all the pdf files from http server, for example to download all the pdf's from this website: http://eur-lex.europa.eu/JOHtml.do?u...3E:SOM:PL:HTML.
I did something like this:
'========================
'--Zmienne--
sZrodlo = "target site"
sNazwaPliku = "file name"
'---Zmienne---

set oHTTP = WScript.CreateObject("Microsoft.XMLHTTP")
set oFSO = WScript.CreateObject("Scripting.FileSystemObject")

oHTTP.open "GET", sZrodlo, False
oHTTP.send
body8209 = oHTTP.responseBody
set oHTTP = nothing

sOut = ""
For i = 0 to UBound(body8209)
sOut = sOut & chrw(ascw(chr(ascb(midb(body8209,i+1,1)))))
Next

set oTS = oFSO.CreateTextFile(sNazwaPliku, True)
oTS.Write sOut
oTS.Close
set oTS = Nothing
set oFSO = Nothing
'========================
but I can download only one file at a time.

[Goth_pixie]

You really ought to say please.

[Zooropa]

Tricky.

Why does it have to be VBS?

[Dewajtis]

I want it to be as simple as possible. Just a click away. I can't use any compiler. It must be something like vbs.

[Zero]

There are tons of Firefox plugins for downloading all the files linked to from a page. No need to code anything.

[Dewajtis]

It is for use at work. I can't use any plugins. It must be something like vbs. Can anyone give me a clue how to write this sort of code in vbs?

[Zero]

So it works, but "you download only one file at a time"?

I'm pretty sure you can't write multithreaded code in VBScript.

[Dewajtis]

Yes, that is correct. If you look at this page what I gave you will know what I mean. Maybe there is a way to download all pdf's.