Probleme mit SendKeys
Gordon
ich möchte eine Datei die auf einer Seite im Internet liegt öffnen. Das Öffnen des Links im Browsers (IE) geht noch ohne Probleme, aber dann möchte ich mit SendKeys arbeiten, was aber nicht so funktioniert. Hier mal mein Code:
Set objBrowser = CreateObject("InternetExplorer.Application")
With objBrowser
.Navigate ("Mein DOWNLOADLINK")
.StatusBar = False
.MenuBar = False
.Toolbar = False
.Visible = True
.Resizable = True
.Width = 800
.Height = 600
End With
Application.Wait (Now + TimeValue("0:00:10"))
SendKeys ("{TAB}")
SendKeys ("{TAB}")
SendKeys ("{ENTER}")
Sobald der Downloadlink angewählt ist, öffnet scih der IE und das Download-Auswahlfenster erscheint, wo man ja zwischen 'Öffnen', 'Speichern' und 'Abbrechen' wählen kann. Ich möchte hier gerne 'Öffnen'. I dem Falle müsste ich zweimal TAB wählen und dann Enter. Aner das funktioniert leider nicht. Weiß vielleicht jemand woran das liegen mag?Gruß und schon mal Danke
Gordon