我正在为在线应用程序编写基于 .hta vbscript 的安装程序。该应用程序需要安装最新的 JDK,我无法使用我的安装程序分发 .exe。
理想情况下,jdk的下载和安装应该是自动的,即
1 - 用户运行我的 .hta 安装程序 -> 点击安装
2 - 用户接受 Oracle 的条款并开始下载
问题
在下载页面http://www.oracle.com/technetwork/java/javase/downloads/jdk7-downloads-1880260.html在ID= agreementdiv的license div中,用户需要点击 * ACCEPT * 才允许下载 jdk . 单击 Accept 后,您甚至可以将此热链接粘贴到 URL 窗口http://download.oracle.com/otn-pub/java/jdk/7u17-b02/jdk-7u17-windows-x64.exe中的 exe和下载
我该如何解决这个问题?理想情况下,我想显示一个小的弹出窗口,该窗口导航到下载页面并自动向下滚动到agreementdiv,用户单击 Accept,jdk 的下载开始(使用热链接),然后页面自动关闭。
由于明显的法律原因,我不想(理想情况下)绕过接受许可证的要求。
这是我用来导航到 jdk 页面的代码的一部分
Set objWshShell = Wscript.CreateObject("Wscript.Shell")
Set IE = CreateObject("InternetExplorer.Application")
With IE
.Visible = True
.Navigate "http://www.oracle.com/technetwork/java/javase/downloads/jdk7-downloads-1880260.html"
'Wait for Browser
Do While .Busy
WScript.Sleep 100
Loop
//somehow scroll to the agreementDiv in the line below
//.Document.getElementById("agreementDiv")
End With
如果有更好的解决方案,将不胜感激。谢谢