Varför kan dessa inte vara på samma sida?

Varför kan dessa två scripten inte vara på samma sida? och hur ska jag modda dem så de kan vara det? behöver nämligen båda..

<SCRIPT LANGUAGE=JavaScript>
<!--
var InternetExplorer = navigator.appName.indexOf("Microsoft") != -1;
// Handle all the the FSCommand messages in a Flash movie
function button_DoFSCommand(command) {
  var buttonObj = InternetExplorer ? button : document.button;
 	if (command == "back") {
		javascript:history.back(-1);
	}
}
// Hook for Internet Explorer 
if (navigator.appName && navigator.appName.indexOf("Microsoft") != -1 && 
	  navigator.userAgent.indexOf("Windows") != -1 && navigator.userAgent.indexOf("Windows 3.1") == -1) {
	[B]document.write('<SCRIPT LANGUAGE=VBScript\> \n');[/B]
	document.write('on error resume next \n');
	document.write('Sub button_FSCommand(ByVal command, ByVal args)\n');
	document.write('  call button_DoFSCommand(command, args)\n');
	document.write('end sub\n');
	document.write('</SCRIPT\> \n');
}
//-->
</SCRIPT>

<%Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/omt.mdb")

	Set Allscreen = Server.CreateObject("ADODB.Recordset")
	SQL = "SELECT * FROM lcp_all_screens WHERE id = 1"
	AllScreen.Open SQL, Conn

	Set Singelscreen = Server.CreateObject("ADODB.Recordset")
	SQL = "SELECT * FROM lcp_singel_screen WHERE NR_ID = " & Request.QueryString("screen") & ""
	SingelScreen.Open SQL, Conn%>

Fel meddelande:

Active Server Pages error 'ASP 0138' 

Nested Script Block 

/omt2005/standard.asp, line 32 

A script block cannot be placed inside another script block.

Line 32:

document.write('<SCRIPT LANGUAGE=VBScript\> \n');