网站首页采用框架技术将菜单导航区和主体控制区分别放在两个框架里，以便在同一个页面中管理多个页。菜单导航区顾名思义，主要用于实现网站首页管理功能的导航；主体控制区主要用于显示每个管理模块的内容。
网站首页主要包括以下功能模块。
菜单主导航区：主要用于显示网站的旗帜广告条及为用户提供网站的功能导航。
菜单子导航区：主要用于管理功能导航。
主体操作区：主要用于完成各种管理功能。
退出登录：主要用于退出企业进销存管理系统。
菜单主导航区的完整代码如下：
广州网站建设,网站建设,广州网页设计,广州网站设计
<!--********************************Default.asp***** **********************************--> <html> <head> <title>企业进销存管理系统</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <frameset rows="99,*" cols="*" framespacing="0" framebo rder="no" border="0"> <frame src="Top.asp" frameborder="no" scrolling="no"> <frame src="main.asp" name="mainF" scrolling="auto"> </frameset> <noframes><body> </body></noframes> </html> |
A注意
在网页中一般应该加上<meta http-equiv="Content-Type" content="text/html; charset=gb2312">这段代码，因为这样才能使页面中的文字显示正常，如果不明确地使用这段代码，在有的浏览器上将会出现字符显示不正确的问题。
菜单子导航区的关键代码如下：
<!--************************************Top.asp*******
*******************************-->
<%
response.buffer=true
response.expires=0
if session("ulogin")<>"yes" then '判断是否登录
response.write("<script>parent.location.href='login.asp'
</script>") '重新定向到页面
response.End()
end if
%>
<a href="#" onClick="Fsubmenu('基础')">基础信息</a>|<a href="#"
onClick="Fsubmenu('采购')">采购管理</a>|<a href="#" onClick="Fsubmenu
('库存')">库存管理</a>|<a href="#" onClick="Fsubmenu('销售')">商品销售</a>|<a
href="#" onClick="Fsubmenu('查询')">查询统计</a>|<a href="#" onClick="Fsubmenu('往来')
">往来管理</a>|<a href="#" onClick="Fsubmenu('系统')">系统设置</a>
<script language="JavaScript" >
var today=new Date();
var month=today.getMonth()+1
if (today.getDay()==1)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期一");}
if (today.getDay()==2)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期二");}
if (today.getDay()==3)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期三");}
if (today.getDay()==4)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期四");}
if (today.getDay()==5)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期五");}
if (today.getDay()==6)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期六");}
if (today.getDay()==0)
{document.write(" "+today.getYear()+"年"+month+"月"+today.getDate()+"日 星期日");}
</script>
...
<script language="javascript">
function Fsubmenu(value){
switch (value){
case "基础":
submenu.innerHTML="<a href='jcxx/khinfo.asp' target='mainF'>客户信息管理
</a>|<a href='jcxx/spinfo.asp' target='mainF'>商品信息管理</a>|<a href='jcxx/
gysinfo.asp' target='mainF'>供应商信息管理</a>|<a href='jcxx/khindex.asp' target='mainF'>
客户信息查询</a>|<a href='jcxx/spindex.asp' target='mainF'>商品信息查询</a>|<a href='jcxx/
gysindex.asp' target='mainF'>供应商信息查询</a>";
break;
case "采购": '类型为采购时，进入相应的处理页面
submenu.innerHTML="<a href='cggl/spcg.asp' target='mainF'>商品采购
</a>|<a href='cggl/cgindex.asp' target='mainF'>采购查询</a>";
break;
case "库存": '类型为库存时，进入相应的处理页面
submenu.innerHTML="<a href='kcgl/sprk.asp' target='mainF'>商品入库
</a>|<a href='kcgl/rkth.asp' target='mainF'>商品入库退货</a>|<a href='kcgl/kcindex.
asp' target='mainF'>库存查询</a>|<a href='kcgl/jgtz.asp' target='mainF'>价格调整</a>";
break;
case "销售": '类型为销售时，进入相应的处理页面
submenu.innerHTML="<a href='spxs/spxs.asp' target='mainF'>商品销售</a>|<a
href='spxs/spxsth.asp' target='mainF'>商品销售退货</a>|<a href='jcxx/spinfo.asp'
target='mainF'>";
break;
case "查询": '类型为查询时，进入相应的处理页面
submenu.innerHTML="<a href='cxtj/xsindex.asp' target='mainF'>销售信息查询
</a>|<a href='cxtj/xsthindex.asp' target='mainF'>销售退货查询</a>|<a href='cxtj/
rkindex.asp' target='mainF'>商品入库查询</a>|<a href='cxtj/rkthindex.asp' target='mainF'>
入库退货查询</a>|<a href='cxtj/xsph.asp' target='mainF'>商品销售排行</a>|<a href='cxtj/
yearxsfx.asp' target='mainF'>年销售额分析</a>";
break;
case "往来": '类型为往来时，进入相应的处理页面
submenu.innerHTML="<a href='wlgl/ysgl/xsjz.asp' target='mainF'>商品销售结账
</a>|<a href='wlgl/ysgl/rkthjz.asp' target='mainF'>入库退货结账</a>|<a href='wlgl
/ysgl/xsjzindex.asp' target='mainF'>销售结账查询</a>|<a href='wlgl/yfgl/rkjz.asp'
target='mainF'>商品入库结账</a>|<a href='wlgl/yfgl/xsthjz.asp' target='mainF'>
销售退货结账</a>|<a href='wlgl/yfgl/rkjzindex.asp' target='mainF'>入库结账查询</a>";
break;
case "系统": '类型为系统时，进入相应的处理页面
submenu.innerHTML="<a href='xtsz/addczy.asp' target='mainF'>添加操作员
</a>|<a href='xtsz/midczy.asp' target='mainF'>更改操作员密码</a>|<a href='xtsz/
delczy.asp' target='mainF'>删除操作员</a>";
break;
}
}
</script>
|
A注意
本例程的服务器端程序主要使用VBScript进行编写，在编写ASP程序时，应该使用<% %>将程序括起来。
退出导航区的完整代码如下：
广州网站建设,网站建设,广州网页设计,广州网站设计
<!--**********************************Logout.asp****
*********************************-->
<%
Session.Abandon() '清除session对象并释放其所占的资源
response.write("<script>parent.location.href='login.asp'</script>") '
父窗口重新定向到登录页面
%>
|
