Copy text file from web server to local drive

[Cliff72]

Is there a way in VBA to copy a file from a web server to a local
drive? Example:
Every morning at 3AM a huge mainframe report is run and a copy of
this report is saved as a text file on a web server:
http://GLJobs.CliffKing.com/Reports_txt/MyReport101007.txt
The name of my report is:
MyReport101007.txt

I manually download this report to the C:\ drive and then manually
import it into access.
Is there a way i can programmatically do this?

Thanks

Cliff

 

[Evertjan.]

Randy Webb wrote on 11 okt 2007 in comp.lang.javascript:

(e-mail address removed) said the following on 10/10/2007 8:15 PM:

I will have to remember the next time I have a VBA question that I
should ask it in a Javascript newsgroup rather than in a VBA group.

We will help you remember, Randy.

 

[drink.the.koolaid]

Is there a way in VBA to copy a file from a web server to a local
drive?

Your post was fine if you just asked "Is there a way in javascript
to..."
On windows you can do this:

Create a text file called c:\GetWebPage.js:

var fso = new ActiveXObject('Scripting.FileSystemObject');
var args = WScript.Arguments;
var url = args(0);
var fileName = args(1);
var xmlhttp=new ActiveXObject("microsoft.xmlhttp");
xmlhttp.open("GET", url, false);
xmlhttp.send();
var data=xmlhttp.responsetext;
var file = fso.CreateTextFile(fileName, 2);
file.writeLine(data);
file.close();

From a command line type:

cscript /nologo c:\GetWebPage.js http://www.YOUR_URL_HERE.com c:
\YOUR_OUTPUT_FILE_HERE.txt

 

[Cliff72]

Your post was fine if you just asked "Is there a way in javascript
to..."
On windows you can do this:

Create a text file called c:\GetWebPage.js:

var fso = new ActiveXObject('Scripting.FileSystemObject');
var args = WScript.Arguments;
var url = args(0);
var fileName = args(1);
var xmlhttp=new ActiveXObject("microsoft.xmlhttp");
xmlhttp.open("GET", url, false);
xmlhttp.send();
var data=xmlhttp.responsetext;
var file = fso.CreateTextFile(fileName, 2);
file.writeLine(data);
file.close();


cscript /nologo c:\GetWebPage.jshttp://www.YOUR_URL_HERE.comc:
\YOUR_OUTPUT_FILE_HERE.txt

Thanks for your help!

 

[drink.the.koolaid]

You're quite welcome.