mshtml: Added more IHTMLWindow2::open tests.
[wine] / dlls / mshtml / tests / exectest.html
1 <html>
2 <body>
3 Script execution test
4 <div id="b1"></div>
5 <div id="b2"></div>
6 <div id="b3"></div>
7 <script>
8 function ok(b, msg) {
9     return external.ok(b, msg);
10 }
11
12 var executed = false;
13 var len = document.getElementsByTagName('div').length;
14 ok(len === 3, "init length = " + len);
15
16 document.write("<script>"
17     + "var len = document.getElementsByTagName('div').length;"
18     + "ok(len === 3, 'unexpected length ' + len);"
19     + "executed = true;"
20     + "<" + "/script>");
21
22 len = document.getElementsByTagName('script').length;
23 ok(len === 2, "script col length = " + len);
24 ok(executed, "written script not executed");
25
26 external.reportSuccess();
27 </script>
28 <div id="a1"></div>
29 <div id="a2"></div>
30 <div id="b3"></div>
31 </body>
32 </html>