yet I can't get a ActiveX Browser from a MM Script to get out of IE7 compatibility mode,
I'd like to know if this is a MM limitation or somehow it's IE8 configuration's fault.
IE9 is coming so it'll be nice to use CSS3 and other stuff.
With this script press Shift+B and if you have IE8 installed it should output "MSIE 8.0", does it?
Scripts.ini
- Code: Select all
[TestBrowser]
Filename=TestBrowser.vbs
Procname=Test
Order=100
DisplayName=Test Browser
Language=VBScript
ScriptType=0
Description=Testing
TestBrowser.vbs
- Code: Select all
Option Explicit
Sub Test()
Dim Form, WB
Set Form = SDB.UI.NewForm
Form.Common.SetRect 50, 50, 600, 400
Form.Common.MinWidth = 400
Form.Common.MinHeight = 300
Form.FormPosition = 4
Form.StayOnTop = False
Form.Caption = "Test"
Set WB = SDB.UI.NewActiveX(Form, "Shell.Explorer")
WB.Common.Align = 5
WB.Common.ControlName = "WB"
SDB.Objects("TestWindow") = Form
SDB.Objects("TestWebBrowser") = WB
WB.SetHTMLDocument("<!DOCTYPE HTML><html><head><meta http-equiv='Content-Type' content='text/html; charset=utf-8'><title></title></head><body><script type='text/javascript'>document.write(navigator.userAgent.match(/MSIE [\d.]+/))</script></body></html>")
Form.Common.Visible = True
End Sub
