📄 top_menu.asp

📁 javascript source code part2
💻 ASP
字号:
<!--#include file="ServerSideGlobalDef.inc"-->
<HTML>
<HEAD>
<SCRIPT language='javascript'>

function linkCheckout_onClick()
{
  
  if (window.parent.cookiesEnabled == false)
  {
  	// cookies disabled - so checkout will not function
	// inform user then cancel event
	alert("You require cookies to be enabled to order online")
  	return false;
  }
  else if (parent.getCookie("Basket") == "")
  {
     // Empty basket - go to empty basket page
	window.parent.fraMain.location.href = "emptybasket.asp";
  }
  else
  {
     // something in basket to buy - so go to checkout
	parent.fraMain.location.href = "Checkout_frame.htm";
  }
  	return true;
}
function linkViewBasket_onClick()
{
  
   if (window.parent.cookiesEnabled == false)
  {
  	// cookies disabled - so basket will not function
	// inform user then cancel event
	alert("You require cookies to be enabled to order online")
	return false;
  }
  else if (parent.getCookie("Basket") == "")
  {
     // Empty basket - go to empty basket page
	window.parent.fraMain.location.href = "emptybasket.asp";
  }
  else
  {
     // basket has contents - display basket page in main frame
	parent.fraMain.location.href = "viewbasket.asp"
  }
  	return true;
}
function cmdGoBrowse_onclick()
{
	var sURL = document.frmMenu.cboBrowse.options[document.frmMenu.cboBrowse.selectedIndex].value;
	window.parent.fraMain.location.href = sURL;
}

</SCRIPT>
</HEAD>
<BODY BACKGROUND="musicbk2.jpg">
<BASE TARGET="fraMain">
<TABLE>
<TR ALIGN="CENTER">
  <TD VALIGN="TOP" WIDTH="150">
     <A HREF="home.asp">
	    <STRONG><FONT face="comic sans ms" COLOR=#FF8040>Home</FONT></STRONG>
     </A>
  <TD>
  <TD VALIGN="TOP" WIDTH="150">
     <A HREF="#" TARGET="_self" NAME="linkViewBasket" onClick="linkViewBasket_onClick();">
	    <STRONG><FONT face="comic sans ms" COLOR=#FF8040>Shopping Basket</FONT></STRONG>
    </A>
  </TD>
  <TD VALIGN="TOP" WIDTH="150">
    <A HREF="#" TARGET="_self"
		  NAME="linkCheckout" 
		  onClick="linkCheckout_onClick()">
		     <STRONG><FONT face="comic sans ms" COLOR=#FF8040>Checkout</FONT></STRONG>
	</A>
  </TD>
<FORM METHOD=POST ACTION="" NAME="frmMenu">
 <TD VALIGN="top" WIDTH="200">
 <%
      var loRS;
	  loRS = Server.CreateObject("ADODB.Recordset");
      loRS.Open("Exec ListCategories", sdbConnString);
%>
	   <STRONG><FONT face="comic sans ms" COLOR=#FF8040>Browse</FONT></STRONG>	
		<select  name="cboBrowse" size="1"  onChange="cmdGoBrowse_onclick()">
		<% while (!(loRS.Eof))
        {
		%>
		    <option value="Browse.asp?CatId=<%=loRS("CatId")%>&Description=<%=loRS("Description")%>&StartItemId=-1">
				<%=loRS("Description")%>
			</option>
				<%   loRS.MoveNext();
        }
		loRS = null;
		%>
		</select>
		<input type="Button" NAME="cmdGoBrowse" onClick="cmdGoBrowse_onclick()" value="Go">
  </FORM>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -