how to handle IE Download dialog with VB Script?
how to save file automatically in particular location using VB Script开发者_JS百科 ?
or How is it possible to Download file to particular location in IE without interacting with Download dialog ?
Ultimately I need to save file in particular location from IE automatically.
Thanks.
What we do for file dialogs with our selenium tests is to leverage AutoIt, a free scripting tool that creates executables that interact with the windows component object model--including file save dialogs.
What I would do is make a simple script that saves the file in your desired location, compile to an executable, and then in VBScript call that program.
Here is a script we use for downloading excel files, although it may be a bit more complicated than what you need.
WinWait("File Download", "", 60)
WinActivate("File Download")
IF WinActive("File Download") Then
Sleep (500)
SendKeepActive ("File Download")
Send("!s")
WinWait("Save As")
WinActivate("Save As")
Sleep (500)
SendKeepActive ("Save As")
If $CMDLine[0] > 0 Then
Send($CMDLine[1])
ELSE
Send("C:\Windows\Temp\latestAutotestExport.xls")
ENDIF
Send("!s")
Sleep (500)
If WinActive("Save As") Then
WinActivate("Save As")
Sleep (500)
SendKeepActive ("Save As")
Send("!y")
Sleep (15000)
EndIf
If WinActive("Download complete") Then
WinClose("Download complete")
EndIf
WinClose("Blank Page - Windows Internet Explorer")
Else
WinActivate("Microsoft Office Excel")
IF WinActive("Microsoft Office Excel") Then
Send("y")
EndIf
Sleep(500)
Send("{F12}")
If $CMDLine[0] > 0 Then
Send($CMDLine[1])
ELSE
Send("C:\Windows\Temp\latestAutotestExport.xls")
ENDIF
Send("!s")
Send("y")
Send("!y")
Send("!y")
Sleep(5000)
ProcessClose("EXCEL.EXE")
Sleep(5000)
WinClose("Blank Page - Windows Internet Explorer provided by Yahoo!")
EndIF
Forcing a file download in Internet Explorer is extremely bad practice. It's also a security risk. That's why there are no native methods for doing this. Can you provide a good reason for needing this? Otherwise, I'm not going to provide a solution for the reasons I've just stated.
精彩评论