java - jsp/HTML の VB スクリプトは IE10 では機能しませんが、以下のバージョンでは機能します

Question

VB スクリプトが IE10 で機能しない .html ファイルにコピーする以下のコードを使用しました。下の .html ファイルをダブルクリックすると、ファイルは IE8 で完全に開きますが、IE 10 では開きません。助けてください

---

         <STRONG>New version of <SPAN STYLE="background-color:yellow"> v 2.10.12 </SPAN>,
        released on <SPAN STYLE="background-color:yellow"> 7th Mar 2008.</span>. </STRONG>            
    <BR><BR>
    <DIV ID="jwsReady">
    </DIV>
    <BR>
    <SCRIPT Language="VBScript">
    <!--
    Sub JWS
    ReadyHTML = ReadyHTML & "<br>Please remember to set up the"
    ReadyHTML = ReadyHTML & "<SPAN STYLE=""background-color:yellow"">Proxy</SPAN> for Java Web Start&copy;(JWS) as"
    ReadyHTML = ReadyHTML & "<SPAN STYLE=""background-color:yellow"">None</SPAN>, either: -"
    ReadyHTML = ReadyHTML & "<UL>"
    ReadyHTML = ReadyHTML & "<LI>during first access, when JWS prompts for proxy set up, or,</LI>"
    ReadyHTML = ReadyHTML & "<LI>by accessing the JWS program, either through the Start Menu"
    ReadyHTML = ReadyHTML & "[Start-&gt;Programs-&gt;Java Web Start-&gt;Java Web Start], or "
    ReadyHTML = ReadyHTML & "its shortcut on the desktop.<BR>"
    ReadyHTML = ReadyHTML & "In the menu File-&gt;Preferences, General tab, select the Proxy as"
    ReadyHTML = ReadyHTML & "   <SPAN STYLE=""background-color:yellow"">None</SPAN>.</LI>"
    ReadyHTML = ReadyHTML & "</UL>"
    ReadyHTML = ReadyHTML & "If you have any questions during setup, please contact the <a href=""mailto:XYZ@gmail.com?subject=Install Support"">dev group</a>."

    NotReadyHTML = NotReadyHTML & "<BR>"
    NotReadyHTML = NotReadyHTML & "<EM>Before Installation, please make sure you have closed all other programs.</EM><BR>"
    NotReadyHTML = NotReadyHTML & "Please choose default options all throughout<BR>"
    NotReadyHTML = NotReadyHTML & "After installing the runtime environment, you may be required to restart the machine."
    NotReadyHTML = NotReadyHTML & "If you have restarted, please visit this page again. If you have not restarted,"
    NotReadyHTML = NotReadyHTML & "please refresh this page."
    NotReadyHTML = NotReadyHTML & "If you have any questions during install, please contact the <a href=""mailto:xyz@gmail.com?subject=Install Support"">dev group</a>."

BothJREJNLP = "JWS installed, but version not detectable. Try <A HREF=""/rca/rca.jnlp"" STYLE=""color:blue;"">Client</A>. If you get any error(s), try <a href=""http://mpts.ctc.chrysler.com/jre/j2re-1_4_2_07-windows-i586-p.exe"">JRE v 1.4.2_06</a>." & NotReadyHTML & ReadyHTML
        On Error Resume Next
Document.All.jwsReady.innerHTML = BothJREJNLP 
    End Sub
    Call JWS
    -->
    </SCRIPT>
</DIV>