Copying a file from another server

[Lysander]

Hi,
ASP is not my strongest subject. I am sure this must be easy-peasy to do but I can't get anywhere.

I have my own IIS server, running an ASP application.

I need to copy several files from somewhere on the web to my local server, where I can then process them. I know I am allowed to do this, as the web site concerened just says autocopy scripts must not be run more than once per hour.
This is one of the files I need to copy.

"http://en6.tribalwars.net/map/village.txt"

The best I could come up with was

<%option explicit
dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
'rename live database
fso.CopyFile "http://en6.tribalwars.net/map/village.txt","C:\t.txt"
set fso=nothing
%>
 

But it dont want to know..

I can go to the site and download the files from there, but there are dozens of them, and I want to do this on a daily basis.

Any hints please.

[AricC]

I don't know if you can pass copyfile a url try using a path

check this
http://www.w3schools.com/asp/met_copyfile.asp

[Lysander]

I don't know if you can pass copyfile a url try using a path

check this
http://www.w3schools.com/asp/met_copyfile.asp

Nope, you can't. I get the error
'Bad file name or number'

There must be an easy way to do this, I mean, thats what every browser does when you type in a url

[Lysander]

Found a solution on another site. This works. Now I just need to work out how to unzip it in code. (This is not the actual file I am after)

<%
 
  Response.Buffer = True
  Dim objXMLHTTP, xml
  Set xml = Server.CreateObject("Microsoft.XMLHTTP")
 
  xml.Open "GET", _
      "http://www.4guysfromrolla.com/webtech/code/mitchell-pres.zip", _
      False
 
  xml.Send
 
set oStream = createobject("Adodb.Stream")
Const adTypeBinary = 1
Const adSaveCreateOverWrite = 2
Const adSaveCreateNotExist = 1 
oStream.type = adTypeBinary
oStream.open
oStream.write xml.responseBody
oStream.savetofile "C:\" & "Test.zip", adSaveCreateOverWrite
 
oStream.close
 
set oStream = nothing
 
Set xml = Nothing
 
%>