Internet Question 1

[vzachin]

Hi,

I have a code that goes to a website to download a CSV file. I am stuck at the dialog box that asks me the following question: "Do You Want To Open Or Save This File?". There are 3 buttons: "OPEN","SAVE","CANCEL".
I don't know how to send the <TAB> key to "OPEN" and then <ENTER>.
Is this something real simple?

     Dim ie As Object
     Dim ieForm As Variant
     Dim WebPage As String
     
     Set ie = CreateObject("InternetExplorer.Application")
     WebPage = "[URL unfurl="true"]http://xxxxxxxxxxxx.CSV"[/URL]
     ie.Visible = True
     ie.Navigate WebPage

thanks
zach

 

[Skie]

You can use SendKeys "{tab}". Alt+O (if it's a hotkey for Open) would be more reliable though.

 

[vzachin]

hi Skie,

i'm not having any luck with the SendKeys Method. The send keys just won't function.
i tried the AppActivate method as well but to no avail.
The dialog box i get is "File Download". From here, i can manually Alt+O or Tab to Open, then Enter.
any other ideas?


thanks again
zach

 

[vzachin]

i ended up doing this in vba

Workbooks.Open Filename:= _
        "[URL unfurl="true"]http://xxxxxxxxxxxx.CSV"[/URL]
        ActiveWindow.Visible = False
        Windows("xxxxxxxxxxxx.CSV").Visible = True
[code]