ie.Navigate save file to folder?

[JumboCactuar]

Hi,
I managed to login to site then navigate to specific URL which is a JSON

After loading the page, a prompt comes up to open/save JSON

Is there a way I can save this to a specific folder with VBA?

 

[Worf]

This example shows how to download a text file without Internet Explorer:

Sub DloadFile()
Dim ostream, wreq As Object
Set wreq = CreateObject("Microsoft.XMLHTTP")
wreq.Open "GET", "https://raw.githubusercontent.com/jdorfman/" & _
"awesome-json-datasets/master/tests/relaxed.json", False
wreq.send
If wreq.Status = 200 Then
    Set ostream = CreateObject("ADODB.Stream")
    ostream.Open
    ostream.Type = 1
    ostream.Write wreq.responseBody
    ostream.SaveToFile "C:\pub\file.json", 2    ' overwrite
    ostream.Close
End If
End Sub

 

[JumboCactuar]

@Worf
Thanks for the reply but it isn't this simple as the site requires secure login.

I managed to automate this with IE, though stuck at the (Open /Save) notification bar that pops up.

Tried lots of code from various sites but no luck.

 

[John_w]

Try calling the IE_Download_File_Using_UIAutomation routine at https://www.mrexcel.com/forum/gener...le-download-ie11-post5221771.html#post5221771, as shown in the test example.

Note that, as written, the code outputs debugging information to the first sheet. Change the following line to False to disable the debugging:

Const DebugMode As Boolean = True