HERE IS THE FRAMESET CODE:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Frameset//EN" "http://www.w3.org/TR/html4/frameset.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<frameset rows="1,*" cols="173,*" frameborder="NO" border="0" framespacing="0">
<frame src="UntitledFrame-4.htm">
<frame src="UntitledFrame-5.htm">
<frame src="ShipmentFramesetLeft.htm" name="leftFrame" scrolling="NO" noresize>
<frameset rows="*,146" cols="*" framespacing="0" frameborder="NO" border="0">
<frame src="ShipmentsViewByDate.asp" name="mainFrame">
<frame src="ShipmentsViewByDate.asp" name="bottomFrame" scrolling="NO" noresize>
</frameset>
</frameset>
<noframes><body>
</body></noframes>
</html>
HERE IS THE ASP PAGE THAT SHOULD LOAD IN THE MAIN (TOP) FRAME... Instead of rendering the ASP page, it displays the ASP/HTML code in the MAIN(TOP) frame.
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
@import url("myCSS/MainHeadings.css");
body {
background-color: #F7E777;
}
-->
</style></head>
<body class="MainHeading">
<p class="NavigationStyle"><a href="Welcome.htm">Welcome</a> <a href="SpecimenPage.asp">Specimens </a></p>
<p> </p>
<p> </p>
<p>Please select a Shipment Date to View: </p>
<p> </p>
<Form method="post" ACTION="ViewPastShipmentsByDateResponse.asp">
<p><Select Name="ShipmentDt" size="1">
<%
Set objConn = server.CreateObject("ADODB.connection")
objConn.open "DSN=MbararaWeb;UID=sa;PWD=bluetrain"
set objCmd=server.CreateObject("ADODB.command")
set objCmd.activeconnection = objConn
objCmd.commandtext = "Select * from vwShipmentDtSent"
objCmd.commandtype = 1
set objRS=server.CreateObject("ADODB.recordset")
set objRS = objcmd.execute
Do while not objRS.EOF
Response.write "<option Value =" & objRS("DtSent") & ">"
Response.write objRS("DtSent") & "</Option>"
objRS.movenext
Loop
objRS.close
Set objRS=nothing
%>
</Select> </p>
<p><Input Type = "submit" Value="Submit" Name = "frmViewByDate"></P>
</Form>
</body>
</html>
|