📄 inc_menuleft.asp
字号:
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<table width="159" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="159" valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<SCRIPT language="javascript" src="script/vmenu.js"></SCRIPT>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="26">
<tr>
<td width="11">
<img border="0" src="images/head_gr_2.gif" width="11" height="26"></td>
<td class="head" style="background-image: url('images/green_bg.gif'); background-repeat: repeat-x">
<img border="0" src="images/around2.gif" width="8" height="7">
SẢN PHẨM</td>
</tr>
</table>
</td>
</tr>
<tr>
<td align="left" background="images/menuleft_bg.gif" style="padding-left: 12px; padding-right: 8; padding-top:4">
<%
var rsCat = Server.CreateObject("ADODB.Recordset");
var strSQLcat = "SELECT Distinct CatName, CatID, CatOrder FROM vwSubCat Where CatDelete=1 Order by CatOrder";
rsCat.Open(strSQLcat,oConn,3,1);
if((!rsCat.BOF)&&(!rsCat.EOF))
{
%>
<DIV id=menu>
<UL class=ulVMenu>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<%
while((!rsCat.BOF)&&(!rsCat.EOF))
{
%>
<tr>
<td width="12" height="21" valign="middle">
<img border="0" src="images/arround1.gif" width="6" height="5"></td>
<td height="21" valign="middle">
<LI><a href="Product.asp?catID=<%=rsCat.Fields('CatID')%>">
<%=rsCat.Fields("CatName")%></a>
<%
var rsSub = Server.CreateObject("ADODB.Recordset");
var strSQLsub = "SELECT SubName, SOrder, SubID, SCatID FROM vwSubCat Where SDelete=1 AND SCatID=" + rsCat.Fields("CatID") + " Order by SOrder";
rsSub.Open(strSQLsub,oConn,3,1);
if((!rsSub.BOF)&&(!rsSub.EOF))
{
%>
<UL class=ulVMenu>
<%
while((!rsSub.BOF)&&(!rsSub.EOF))
{
%>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td onmouseover="this.className='bgmenuover'" onmouseout="this.className='bgmenuout'" nowrap><a href="Product.asp?subID=<%=rsSub.Fields('SubID')%>"><li><%=rsSub.Fields("SubName")%></li><li></li></a></td>
</tr>
<tr>
<td bgcolor="#DFDFDF" height="1"></td>
</tr>
</table>
<%
rsSub.MoveNext();
}rsSub.Close();
%>
</UL>
<%
}
%>
</LI>
</td>
</tr>
<%
rsCat.MoveNext();
if((!rsCat.BOF)&&(!rsCat.EOF))
%>
<tr>
<td width="12" bgcolor="#E6E6E6" height="1"></td>
<td bgcolor="#E6E6E6" height="1"></td>
</tr>
<%
}rsCat.Close();
%>
</table>
</UL>
</DIV>
<%
}
%>
</td>
</tr>
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="17">
<tr>
<td width="11">
<img border="0" src="images/left_conner.gif"></td>
<td background="images/left_under_bg.gif" width="148"></td>
</tr>
</table>
<SCRIPT language="JavaScript">initialiseMenu();</SCRIPT>
</td>
</tr>
</table></td>
</tr>
<tr bgcolor="#2D87CD">
<td> </td>
</tr>
<tr>
<td valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="25">
<tr>
<td width="11">
<img border="0" src="images/head_o_1.gif"></td>
<td class="head" align="left" style="background-image: url('images/head_right_orin.gif'); background-repeat: repeat-x">
<img border="0" src="images/around2.gif" width="8" height="7">
TÌM KIẾM</td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/menuleft_bg.gif">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<form name="frmSearch" method="post" action="search.asp" onSubmit="return checkSearch(this);">
<tr>
<td align="center" height="35"><input class="textbox" type="text" name="keyword" size="18" style="width:148px; "></td>
</tr>
<tr>
<td align="center">
<input type="hidden" name="company" value="">
<input type="hidden" name="_from" value="">
<input type="hidden" name="_to" value="">
<select name="list" size="1" class="textbox" style="width:148px; ">
<option value="0"> - Tất cả</option>
<%
var oRsCat=Server.CreateObject("ADODB.Recordset");
var SQLcat="Select * From tblCategory Where CatDelete=1 Order by CatID ASC";
oRsCat.Open(SQLcat,oConn,3,1);
while((!oRsCat.BOF)&&(!oRsCat.EOF))
{
%>
<optgroup label="<%=oRsCat.Fields("CatName")%>" style="background-color:#006600; color:#FFFFFF;"></optgroup>
<%
var oRsSub=Server.CreateObject("ADODB.Recordset");
var SQLsub="Select * From tblSubCategory Where SCatID="+oRsCat.Fields("CatID")+"AND SDelete=1 Order by SubID ASC";
oRsSub.Open(SQLsub,oConn,3,1);
while((!oRsSub.BOF)&&(!oRsSub.EOF))
{
%>
<option value="<%=oRsSub.Fields("SubID")%>"> + <%=oRsSub.Fields("SubName")%></option>
<%
oRsSub.MoveNext();
}
oRsSub.Close();
%>
<%
oRsCat.MoveNext();
}
oRsCat.Close();
%>
</select></td>
</tr>
<tr>
<td align="center" valign="middle" style="padding-top:6px; ">
<input type="submit" name="search" value="Tìm kiếm" onClick="">
</td>
</tr>
<tr>
<td align="center" height="25" style="padding-top: 8px">
<table border="0" cellpadding="0" cellspacing="0" width="80%">
<tr>
<td height="14">
<img border="0" src="images/search.gif" width="20" valign="middle"></td>
<td width="135" valign="top"><a href="Search.asp?keyword=">Tìm kiếm nâng cao</a></td>
</tr>
</table>
</td>
</tr>
</form>
</table>
</td>
</tr>
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="19">
<tr>
<td width="11">
<img border="0" src="images/left_conner.gif"></td>
<td background="images/left_under_bg.gif" width="148"></td>
</tr>
</table>
</td>
</tr>
</table></td>
</tr>
<tr bgcolor="#2D87CD">
<td> </td>
</tr>
<tr bgcolor="#2D87CD">
<td align="left" valign="top">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="26">
<tr>
<td width="11">
<img border="0" src="images/head_gr_2.gif" width="11" height="26"></td>
<td class="head" style="background-image: url('images/green_bg.gif'); background-repeat: repeat-x">
<img border="0" src="images/around2.gif" width="8" height="7">
DỊCH VỤ</td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/menuleft_bg.gif" style="padding-left: 12px; padding-right: 8; padding-top:4">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="12" height="21">
<img border="0" src="images/arround1.gif" width="6" height="5"></td>
<td height="21"><a href="Warranty.asp">Dịch vụ bảo hành</a></td>
</tr>
<tr>
<td width="12" bgcolor="#E6E6E6" height="1"></td>
<td bgcolor="#E6E6E6" height="1"></td>
</tr>
<tr>
<td width="12" height="21">
<img border="0" src="images/arround1.gif" width="6" height="5"></td>
<td height="21"><a href="download.asp">Download báo giá</a></td>
</tr>
<tr>
<td width="12" bgcolor="#E6E6E6" height="1"></td>
<td bgcolor="#E6E6E6" height="1"></td>
</tr>
<tr>
<td width="12" height="21">
<img border="0" src="images/arround1.gif" width="6" height="5"></td>
<td height="21"><a href="System.asp">Cấu hình bộ máy</a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="19">
<tr>
<td width="11">
<img border="0" src="images/left_conner.gif"></td>
<td background="images/left_under_bg.gif" width="148"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#2D87CD">
<td> </td>
</tr>
<tr>
<td valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<!--DWLayoutTable-->
<tr>
<td width="159" height="26" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="11"><img src="images/head_red1.gif"></td>
<td class="head" align="left" valign="middle" style="background-image: url('images/head_red_center.gif'); background-repeat: repeat-x">
<img border="0" src="images/around2.gif" width="8" height="7"> Thống kê Website</td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top" background="images/menuleft_bg.gif"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="111" height="23" align="right" valign="middle"><font face="tahoma" color="#000000">Tổng số thành viên: </font></td>
<td width="48" align="right" valign="middle"><b><%=rsCount.Fields("TotalCust")%></b></td>
</tr>
<tr>
<td height="23" align="right" valign="middle"><font face="tahoma" color="#000000">Tổng số lượt truy cập: </font></td>
<td height="23" align="right" valign="middle"><b><%=Application("visitors")%></b></td>
</tr>
<tr>
<td height="23" align="right" valign="middle"><font face="tahoma" color="#000000">Khách trực tuyến:</font></td>
<td height="23" align="right" valign="middle"><b><%=Application("online")%></b></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td height="19" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="11" height="19" valign="top" background="images/left_conner.gif"><!--DWLayoutEmptyCell--> </td>
<td width="148" valign="top" background="images/left_under_bg.gif"><!--DWLayoutEmptyCell--> </td>
</tr>
</table></td>
</tr>
<tr bgcolor="#2D87CD">
<td> </td>
</tr>
<script>
function link_()
{
var txtLink = document.frmlink.linkTo.value;
window.open(txtLink);
}
</script>
<form name="frmlink" method="post" action="">
<tr bgcolor="#2D87CD">
<td height="28" align="center" valign="middle"><select name="linkTo" onChange="link_();">
<option value="google.com" selected>--- Liên kết Website ---</option>
<option value="gigabyte.com">GIGABYTE</option>
<option value="intel.com">INTEL</option>
<option value="asus.com">ASUS</option>
<option value="lg.com">LG</option>
<option value="seagate.com">SEAGATE</option>
<option value="maxtor.com">MAXTOR</option>
<option value="samsung.com">SAMSUNG</option>
<option value="kingston.com">KINGSTON</option>
</select></td>
</tr>
<tr bgcolor="#2D87CD"><td height="5"></td></tr>
</form>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -