Сценарий 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©(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->Programs->Java Web Start->Java Web Start], or "
ReadyHTML = ReadyHTML & "its shortcut on the desktop.<BR>"
ReadyHTML = ReadyHTML & "In the menu File->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:[email protected]?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:[email protected]?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>
Я нашел проблему. Я не уверен, как он работает в IE10, но его работа с исправлением ниже
Sub JWS
document.write()
ReadyHTML = ReadyHTML & "<br>Please remember to set up the"
ReadyHTML = ReadyHTML & "<SPAN STYLE=""background-color:yellow"">Proxy</SPAN> for Java Web Start©(JWS) as"
ReadyHTML = ReadyHTML & "<SPAN STYLE=""background-color:yellow"">None</SPAN>, either: -"
ReadyHTML = ReadyHTML & "<UL>"
Да, просто сохранение document.write() работает как charm :) в IE 10. VBScript работает в IE10
On Error Resume Next
?