添加到帖子Jun-19-2014
感谢Bond。由于您拥有IE9,我很感激您的测试。希望如果有人拥有IE 10,他们也会进行测试。在IE 11引擎下,为什么只能兼容到ie8是没有任何意义的。
我创建了这个微小的HTA,以便发布它,希望我能找出我缺少的内容。
我的系统是Win7 Pro 64位,带有IE 11。
当我将meta标记设置为:
<meta http-equiv="x-ua-compatible" content="ie=8">
HTA运行得很好。没有问题。但是当我将其更改为:
<meta http-equiv="x-ua-compatible" content="ie=9">
它的运行效果不太好。
现在...我知道IE 11和VBScript之间有一个大家庭争吵。VBScript被永久性地赶出了家门。IE 11拒绝再与它通信。所以我能理解为什么将其设置为content="ie=edge"不起作用。但是为什么将其设置为content="ie=9"也不起作用呢?
<!DOCTYPE html>
<head>
<meta http-equiv="x-ua-compatible" content="ie=8">
<hta:application
applicationname="Hmmmmmm"
singleinstance="yes"
id="oHTA"
>
<title>Huh? What?</title>
<script language="VBScript">
Option Explicit
Dim objFSO,file
Sub Window_OnUnLoad
Set objFSO=CreateObject("Scripting.FileSystemObject")
Set file=objFSO.OpenTextFile("c:\temp\submit.txt",2,True)
file.Write oHTA.document.getElementById("aa").value
file.Close
Set objFSO=Nothing
Set file=Nothing
End Sub
Sub Window_OnLoad
window.ResizeTo 240,130
End Sub
Function Form_OnSubmit()
window.Close
Form_OnSubmit=False
End Function
</script>
</head>
<body style="margin:30px;">
<form id="form" action="">
<input id="aa" type="text" size="10" value="test">
<input type="submit" value="Submit">
</form>
</body>
</html>
在 meta 标签中将其设置为 ie8 运行,一切正常...弹出窗口,调整大小,并在提交时写入文件...太棒了!
在 meta 标签中将其设置为 ie9 运行...弹出窗口,调整大小被忽略,并且写入文件也被忽略...就像所有的 VBScript 都被忽略了。
我缺少哪些信息呢?