物流管理信息系统课程设计模板

物流管理信息系统课程设计资料内容仅供参考，如有不当或者侵权，请联系本人改正或者删除。目录第一章系统设计及开发的可行性分析 11.1经济可行性系统的初步调查 21.2系统开发的必要性 61.3技术可行性分析 61.4经济可行性研究 6第二章系统分析 82.1需求分析 82.2组织结构分析 82.3业务流程分析 92.4数据流程分析 9第三章系统设计 123.1系统总体结构设计 123.2代码设计 133.3数据结构设计 323.4输入输出界面设计 32第四章课程设计的总结和体会 374.1课程设计的总结 374.2课程设计的体会 37参考文献 38第一章系统设计及开发的可行性分析1.1经济可行性系统的初步调查1.1.1企业概况湖南长沙家润多超市有限公司是由全国零售业前十强企业湖南友谊阿波罗股份有限公司全资控股的子公司。公司的第一家门店于9月28日在长沙市朝阳区开业,至今在湖南省拥有家润多朝阳店、千喜店、赤岗冲店、常德店、益阳店、岳阳店、浏阳店、吉首店、衡阳店、郴州店等多家大型超市。家润多超市从10月开始在其供应商中间推广9448-SCM供应链管理解决方案。家润多的供应商可经过9448网站的供应链管理平台,共同分享销售、库存、结算等商业数据,共同进行品类分析和管理。该平台在家润多超市1352家供应商中,推广率达到91％。该平台不但帮助家润多超市节省了大量的结算人力,也让供应商体会到了网络技术带来的便捷。1月lO日,家润多物流配送中心正式投入运营。同时。公司向国内知名商业ERP供应商武汉富基公司购买了一套连锁超市ERP管理软件,对超市进行信息化管理。在购买的软件与家润多运作模式出现了一些不协调之后,超市于开始,委托友谊阿波罗集团旗下的远征软件公司,根据家润多超市本身的需求重新开发了一套超市管理信息系统。家润多超市之因此能在竞争激烈的湖南商业圈内立足不败,与其在信息技术上的不断革新是密不可分的。1.1.2组织结构1家润多超市总体结构家润多超市采取总部、门店、物流中心的整体架构,总部统一管理、统一结算,物流中心统一采购。以总部为主体,在全省各县市开设大型卖场(1)经过营运部的管理以及对城市财务中心或地区配送中心的监控实现对各门店的管理与控制;(2)经过统一的信息管理系统实现整体的统一;(3)经过计算机联网方式实现信息数据的共享:总部总部财务部地区配送中心块营运部财务部地区配送中心块营运部城市财务中心城市配送中心块分店(1城市财务中心城市配送中心块分店(1….n)分店出纳分店出纳图1.1家润多超市总体框架图2家润多总部的机构设置总部是公司的管理机构,是经营决策部门,是整个系统运营的信息控制中心。其职能是负责网点开发、商品开发、经营计划和发展战略,财产和资金管理、成本核算、往来结算、税收、利润分配、流转票据统一管理等。总部的业务涉及财务部门、业务部门、供货厂商、客户、银行等往来单位。收集、汇总、分析各门店的补货、销售信息和物流中心的库存信息,及时与供货厂商沟通,调整经营策略,向物流中心下达配送、进货等指令,指导整个连锁系统的经营活动。如下图。人事部人事部财务部门店出纳工程部发展部咨询部市场部营运副总经总经理商品部城市财务中心门店维修部门店咨询部营运部门店(1...n)地方性采购门店运营管理全国性采购门店人事部门店公关部图1.2家润多超市总部机构图(1)入力资源部负责人事档案管理、人员招聘考核、人员培训、人员考勤、工资计算。经过电脑网络系统有权查阅各分店的人事档案资料,可直接与分店人力资源部发生工作关系。(2)资讯部信息系统的需求分析,电脑系统的开发,电脑软硬件的维护维修,操作流程的培训,保证总部与门店之间信息传递的顺畅,可直接与门店电脑资讯部发生工作关系。(3)财务部负责供应商的结算、工资的发放、财务报表的制定、资金方面的管理。经过电脑网络系统有权调阅、监督门店或地区财务中心的相关财会报表,直接监控公司在全省各地区的财务结算中心,可直接与门店财务部发生工作关系。(4)发展部负责新店的选址及场地的谈判。(5)工程部负责新店的设计,工程实施及店内设备,小资产的采购。(6)商品部是卖场流通业务开展的主要部门,包括采购预算、新品的引进、供应商的硕士学位论文第3章湖南家润多超市管理信息系统应用现状分析引进、淘汰及谈判、商品的促销、商品价格的交动、门店销售的分析。(7)营运部负责管理并控制各分店的营运及分店卖场内的货架排面管理。(8)市场部负责公司总体促销策略、广告宣传的策划,并对促销效果作出分析、评估;对商品的进销存数据进行详细的分析,对商品、采购的业绩加以评估。1.1.3现行系统存在的问题家润多连锁超市管理信息系统整个停留在功能全面的MIS系统层面,特别没能够达到真正的管理信息系统所期望的辅助决策分析的功能,其根本原因在该系统在决策分析上是采用事务型处理而非分析性处理。如;物流中心在进货、补货的问题上一般是依靠管理人员的判断,或者干脆等到商品断货再补货,这样的方式受主观因素影响严重,容易引起商品的滞销或脱销。要达到科学选择进货商品,优化进货流程的目的,就必须对以往的商品销售数据进行分析,并在基础上制定进货方案。管理信息系统是将企业所有资源进行整台集成管理,简单的说是将企业的三大流:物流、资金流、信息流进行全面一体化管理的管理信息系统。在一个缺乏决策支持系统的管理信息系统中,企业的资源无法达到最有效的使用。1.1.4新系统开发的条件基于旧的信息系统已经不能满足极润多超市的发展要求,资金尚且足够,研发新软件的资金也足够,技术上夜能给予很大的支持。家润多超市已经具备开发信系统的条件。1.2系统开发的必要性1.2.1竞争:家润多近几年的经营状况并不是非常理想。在湖南地区,像沃尔玛,步步高,大润发,家乐福等这样的实力雄厚的大型超市林立其中。家润多超市这样一个起步晚,实力较弱的超市要在湖南继续生存,谋求发展,改革势在必行。旧的管理信息系统已经跟不上时代的发展,满足不了超市的发展,新管理信息系统的开发迫在眉睫。1.2.2采购、销售、储存:物流管理信息系统是指与物流活动有关的信息。在物流活动的管理与决策中,具有支持与保障的功能。对于超市的采购、销售、储存和财务四个方面来说,信息系统是必不可少的。如果事事都让人去一步一步的来做,将会很费时,费力,费钱。在采购管理、销售管理、储存管理、财务管理等活动中,信息系统能起到支持保障功能。1.3技术可行性分析在家润多连锁超市管理信息系统中,业务系统采用了C,s结构,网上的订货系统和远程决策系统采用B／S结构。系统是基于PⅣ微处理器,Windows操作系统和VB6.0,OfficeXP的软件环境,能够满足系统开发的软件要求,安全可靠,开发人员对其也容易熟练掌握。在IT行业中从业的工作人员一般都要求掌握计算机技术,具有一定的软硬件基础,会使用各种管理软件,熟悉IT产品。因为,有的超市对员工的素质要求比较高,从管理层到下面的销售人员,都要求具有一定的计算机基础,因此在新系统投入使用时,只要对员工进行少量的培训,系统的功能和使用方法就基本上能够是系统顺利运行。1.4经济可行性研究1.4.1超市有能力承担系统开发费用开发新系统的工作是一项间距复杂的工作,它的投资主要是人力和物力的投资。对于本系统的开发者来说,其主要投资还是在人力和物力两个方面。如果是企业自己安排人手开发系统的话,其主要的投资还是在人力资源上,从系统的业务需求调查到系统的分析编码制作都是需要巨大的人力投入的。软件企业作为一个简短的高科技产业,其员工要求都比一般企业的要求要高,而且对系统开发及软件产业了解比较多,因此在自我开发管理系统的过程中,企业自己比较容易安排人手,这样就能够为企业借阅大部分的额外开支。同时软件就其它产品来说,属于高端行业,无论是产品的价格还是质量都比较高,而经营产品的经销商或者是商家都要求有雄厚的资金支持。因此,在系统的开发过程中,企业完全有能力承担开发费用。1.4.2新系统将为企业带来经济效益销售管理系统是一个信息化、智能化和先进管理理念的集合体。而销售管理是一个动态过程,在其运行过程中要采取多项措施。因此在管理中获得经济效益是一个综合效益,要对它进行直接定量的分析是比较困难的。一般新系统带来的经济效益是简介的,其最主要的表现就是能够及时地了解超市每日的销售情况,据此还可实现短缺商品的配送。而其它一些繁琐的食物都经过新系统来加以分析解决,不但节省了大量的时间,还为企业的各项决策提供了宝贵的资料,为企业带来巨大的经济效益。第二章系统分析2.1需求分析把握市场动向,提高销售利润是企业的最终目标。在企业管理日趋科学化的今天,如何准确及时地进行经营决策是企业老总面临的严峻问题。这要求决策者准确及时地捕捉到销售信息,分析销售情况,随时根据历史的销售情况,对下一步的经营科学地进行决策。销售分析需要的基础数据涉及到的模块有销售、库存和财务,能够围绕销售合同,历史销售数据、应收款、财务、库存等多角度进行分析,并给出如销售趋势、产品需求趋势等辅助决策信息。具体地,采用决策支持系统进行销售分析能够帮助企业解决的问题有:某段时闻内的商品销售情况分析;当天商品销售的时段分析:某商品在某段时间内促销的情况分析;同一种品如何根据不同情况制定不同的价格策略;产品销售收入及获利情况分析,何种产品在给定的分析条件下的销售量最大?决策支持系统根据企业需要解决的问题,帮助企业建立相应的分析主题和分析指标,从业务系统的基础数据库中抽取需要的数据,按预先建立的业务模型进行分析决策,分析结果显示直观、形象。决策者只需要简单地点取操作,便能够从决策支持强大的销售分析工具中获得所需的决策信息。2.2组织结构分析根据调查结果,企业人事部将安排专职人员对超市的销售情况进行监督管理,也就说本销售系统开发出来后会有专业人员来操作执行。该管理软件将根据用户的需要销售情况进行查询,并能打印详细信息。销售信息查询销售信息维护销售信息盘点销售信息查询销售信息维护销售信息盘点超市销售系统图2.1组织结构图2.3业务流程分析根据分析,本系统业务流程主要包括如下内容:顾客发订单给销售部门销售部门经过订单检查,把不合格的订单反馈给客户对合格的订单,经过核对库存记录,缺货订单经过缺货统计,向采购部门发出缺货通知,并登记缺货记录;对于可供货订单,登记客户档案,开出备货单,通知仓库备货。保存订单数据,并进行销售统计。销售部门业务流程图:销售人员销售人员顾客采购员不合格订单订单发货票库存信息到货通知单缺货单图2.2销售部业务流程图2.4数据流程分析根据调查结果绘出销售系统数据流程图如下:2.4.10层数据流程图顾客档案顾客档案P0业务处理顾客订货销售统计表库存记录图2.30层数据流程图2.4.21层数据流程图校验校验数据缺货通知P2缺货统计缺货货单少供货货单P3备货处理库存记录销售统计表P1可供货货单不合格货单缺货货单顾客档案顾客货单校验数据图2.41层数据流程图2.4.32层数据流程图S1.1S1.1顾客D1.1新顾客登记表P1.1登录新顾客的数据F1.1顾客档案S2.1供应商D2.1发货通知P2.1处理发货单F2.1发货单S3.1仓库D3.1备货单P3.1处理备货单F3.1库存记录销售统计表F3.2S3.2超市D3.2发货单P3.2销售统计图2.52层数据流程图第三章系统设计3.1系统总体结构设计根据系统分析的结果,本系统分为四个子模块:定货处理模块、缺货处理模块、提货处理模块和系统管理模块,如图所示:超市销售管理系统超市销售管理系统系统管理模块提货处理模块进货处理模块系统管理模块提货处理模块进货处理模块订货处理模块订货处理模块增加库存量输入进货单用户设置系统初始化增加库存量输入进货单用户设置系统初始化缺货记录登记库存记录修改确定能否提供货输入并检验订单读库存记录缺货记录登记库存记录修改确定能否提供货输入并检验订单读库存记录缺货订单处理缺货订单处理可供货处理减少库存量减少库存量3.1系统总体结构功能图3.2代码设计登陆页面:<HTML><HEAD> <Title>index.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="javascript">functionvalidate()//检查用户名或密码不能为空{if((document.login.username.value.length==0)||(document.login.password.value.length==0)){alert("用户名和密码都不能为空!!!");returnfalse;}returntrue;}</script></HEAD><BODY><center>请先选择登录身份再登录<formname="login"onsubmit="returnvalidate()"action="logincheck.asp"method="post">选择登录身份:<selectname="position"SelectedIndex=1><optionvalue="user">顾客身份</option><optionvalue="manager">管理员身份</option></select><br>姓名:<inputname="username"type="text"><br>密码:<inputname="password"type="password"><br><inputtype="submit"value="登录"><br></form>如果没有账号,请点击下面的注册按钮<formname="regist"action="regist.asp"method="post"><br><inputtype="submit"value="注册"></form><br></center><%%></BODY></HTML>获取数据:<HTML><HEAD> <Title>logincheck.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="vbscript"> dimname,password </script></HEAD><BODY><% name=trim(Request("username"))'获取用户名 password=trim(Request("password"))'获取用户密码 setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") if(request("position")="user")then '选择用户表还是管理员表 strsql="select*fromuserwhereusername='"&name&"'andpassword='"&password&"'" else strsql="select*frommanagerwhereusername='"&name&"'andpassword='"&password&"'" endif rs.openstrsql,conn ifrs.eofthen response.Redirect"error.asp" elseif(request("position")="user")then'如果登录身份是顾客,则跳转到顾客页面 response.Redirect"user.asp" else response.Redirect"manager.asp" endif endifrs.Closeconn.Close%></BODY></HTML>系统检查:<HTML><HEAD> <Title>logincheck.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="vbscript"> dimname,password </script></HEAD><BODY><% '请在这里输入您的ASP代码 name=trim(Request("username"))'获取用户名 password=trim(Request("password"))'获取用户密码 setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") if(request("position")="user")then '选择用户表还是管理员表 strsql="select*fromuserwhereusername='"&name&"'andpassword='"&password&"'" else strsql="select*frommanagerwhereusername='"&name&"'andpassword='"&password&"'" endif rs.openstrsql,conn ifrs.eofthen response.Redirect"error.asp" elseif(request("position")="user")then'如果登录身份是顾客,则跳转到顾客页面 response.Redirect"user.asp" else response.Redirect"manager.asp" endif endifrs.Closeconn.Close%></BODY></HTML>顾客使用:<HTML><HEAD> <Title>user.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"></HEAD><BODY><center><h1>用户订货页面</h1></center><% setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") strsql="select*fromproducts" rs.openstrsql,conn%><tableborder=1><tr><%fori=0tors.fields.count-1 '显示记录集的字段数%><th><%=rs(i).name'显示字段名%></th><%next%></tr><%whilenotrs.eof%><tr><%fori=0tors.fields.count-1%><td><%=rs(i) '显示字段值%></td><%next%></tr><%rs.movenextwendrs.closeconn.close%></table><formaction="userupdate.asp"method="post">订单产品ID号:<inputtype="text"name="id"><br>订货数量:<inputtype="text"name="count"><br><inputtype="submit"value="提交订单"></form></BODY></HTML>顾客购买商品<HTML><HEAD> <Title>userupdate.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="vbscript"> dimid,count,minus </script></HEAD><BODY><% '请在这里输入您的ASP代码 id=trim(Request("id")) count=trim(Request("count")) setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") if(isnumeric(id))and(isnumeric(count))then '判断输入的是否是数字 if(id=cstr(cint(id)))and(id>0)and(count=cstr(cint(count)))and(count>0)then'判断输入的是否是正整数 sql1="select*fromproductswhereid="&id rs.Opensql1,conn ifrs.eofthen %> <scriptlanguage="vbscript"> msgbox"输入的ID号不存在!!请重新输入" </script> <center><h1> 订货失败!! </h1> <ahref="user.asp">返回重新订</a> </center> <% else minus=CInt(rs.fields("库存量"))-count ifminus<0then %> <scriptlanguage="vbscript"> msgbox"库存量不足,请重新输入" </script> <center><h1> 订货失败!! </h1> <ahref="user.asp">返回重新订</a> </center> <% else sql="updateproductsset库存量=库存量-"&count&"whereid="&id conn.Executesql %> 订货成功!! <ahref="user.asp">返回继续订</a> <% endif endif else%> <scriptlanguage="vbscript"> msgbox"输入的ID或者订货数量为非正整数!!请重新输入" </script> <center><h1> 订货失败!! </h1> <ahref="user.asp">返回重新订</a> </center> <% endif else %> <scriptlanguage="vbscript"> msgbox"输入的ID或者订货数量不是数字!!请重新输入" </script> <center><h1> 订货失败!! </h1> <ahref="user.asp">返回重新订</a> </center> <% endifconn.Close %></BODY></HTML>管理员使用:<HTML><HEAD> <Title>manager.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"></HEAD><BODY><center><h1>管理员操作页面</h1></center><% '请在这里输入您的ASP代码 setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") strsql="select*fromproducts" rs.openstrsql,conn%><tableborder=1><tr><%fori=0tors.fields.count-1 '显示记录集的字段数%><th><%=rs(i).name'显示字段名%></th><%next%></tr><%whilenotrs.eof%><tr><%fori=0tors.fields.count-1%><td><%=rs(i) '显示字段值%></td><%next%></tr><%rs.movenextwendrs.closeconn.close%></table> <formname="f1"action="managerupdate.asp"method="post"> <!--修改单价或者库存量-->将ID号为<inputtype="text"name="id">的产品的<selectname="option"SelectedIndex=1><optionvalue="单价(元)">单价(元)</option><optionvalue="库存量">库存量</option></select>改为<inputtype="text"name="newvalue"><br><inputtype="submit"value="修改"></form><formname="f2"action="addproduct.asp"method="post">增加一种产品,请输入对应项:<br><tableborder=1><tr><th>名称</th><th>单价(元)</th><th>计量方式</th><th>库存量</th><th>类别</th></tr><tr><td><inputtype="text"name="name"></td><td><inputtype="text"name="DJ"></td><td><inputtype="text"name="JLFS"></td><td><inputtype="text"name="KCL"></td><td><inputtype="text"name="sort"></td></tr></table><inputtype="submit"value="添加"></form></BODY></HTML>管理员修改已有商品信息:<HTML><HEAD> <Title>managerupdate.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="vbscript"> dimid,op,newvalue </script></HEAD><BODY><% id=trim(Request("id"))'获取id号 op=trim(Request("option"))'获取选择项 newvalue=trim(Request("newvalue"))'获取新值 setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" if(isnumeric(id))andisnumeric(newvalue)then if(id=cstr(cint(id)))and(cint(id)>0)and(newvalue=cstr(cint(newvalue)))and(cint(newvalue)>0)then setrs=Server.CreateObject("ADODB.Recordset") sql1="selectid,库存量fromproductswhereid="&id rs.Opensql1,conn ifrs.eofthen %> <scriptlanguage="vbscript"> msgbox"输入的ID号不存在!!请重新输入" </script> <center><h1> 修改失败!! </h1> <ahref="manager.asp">返回重新修改</a> </center> <% else sql="updateproductsset"&op&"="&newvalue&"whereid="&id conn.Executesql %> <center><h1> 修改成功!! </h1> <ahref="manager.asp">返回继续修改</a> </center> <% endif else %> <scriptlanguage="vbscript"> msgbox"输入的ID或者修改数量为非正整数!!请重新输入" </script> <center><h1> 修改失败!! </h1> <ahref="manager.asp">返回重新修改</a> </center> <% endif else %> <scriptlanguage="vbscript"> msgbox"输入的ID或者修改数量不是数字!!请重新输入" </script> <center><h1> 修改失败!! </h1> <ahref="manager.asp">返回重新修改</a> </center> <% endif conn.Close %></BODY></HTML>管理员添加新商品:<HTML><HEAD> <Title>addproduct.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="vbscript"> dimname,DJ,JLFS,KCL,sort,flag1,flag2 </script></HEAD><BODY><% '请在这里输入您的ASP代码 name=trim(Request("name"))'获取新增产品的名称 DJ=trim(Request("DJ"))'获取新增产品的单价 JLFS=trim(Request("JLFS"))'获取新增产品的计量方式 KCL=trim(Request("KCL")) sort=trim(Request("sort")) flag1=true flagr2=trueif(name="")or(DJ="")or(JLFS="")or(KCL="")or(sort="")then '每项均不能为空 flag1=falseendififisnumeric(DJ)andisnumeric(KCL)then '单价大于0,库存量大于0 if(DJ>0)and(KCL>0)then flag2=true endifendif setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" setrs=Server.CreateObject("ADODB.Recordset") sql1="select*fromproductswhere名称='"&name&"'" rs.Opensql1,conn ifnotflag1then %> <scriptlanguage="vbscript"> msgbox"每项数据都需要输入!请重新输入" </script> <center><h1> 增加失败!! </h1> <ahref="manager.asp">返回重新增加</a> </center> <% elseifnotflag2then %> <scriptlanguage="vbscript"> msgbox"单价和库存量输入有误!!请重新输入" </script> <center><h1> 增加失败!! </h1> <ahref="manager.asp">返回重新增加</a> </center> <% elseifrs.eofthen sql="insertintoproducts(名称,单价(元),计量方式,库存量,类别)values('"&name&"',"&DJ&",'"&JLFS&"',"&KCL&",'"&sort&"')" conn.Executesql %> <center><h1> 增加成功!! </h1> <ahref="manager.asp">返回查看数据</a> </center> <% else %> <scriptlanguage="vbscript"> msgbox"该产品已经存在,不需要增加" </script> <center><h1> 增加失败!! </h1> <ahref="manager.asp">返回管理员操作页面</a> </center> <% endif endif endif conn.Close %></BODY></HTML>增加顾客用户:<HTML><HEAD> <Title>adduser.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"></HEAD><BODY><center><h1>增加用户成功!!</h1></center><% name=trim(Request("username"))'获取用户名 password=trim(Request("password"))'获取用户密码 setconn=Server.CreateObject("ADODB.connection") conn.Open"mydata" sql="insertintouser(username,password)values('"&name&"','"&password&"')" conn.Executesqlconn.Close%></BODY></HTML>检查添加顾客输入信息是否符合规定:<HTML><HEAD> <Title>regist.asp</Title> <METAhttp-equiv="Content-Type"content="text/html;charset=gb2312"> <METAname="Generator"content="AspStudio1.0"> <scriptlanguage="javascript">functionvalidate()//检查两次输入的密码是不是一样{if(NamePass()){if(document.f.password.value!=document.f.password2.value){alert("两次输入的密码不一致!!!");returnfalse;}returntrue;}elsereturnfalse;}functionNamePass()//检查用户名或密码不能为空{if((document.f.username.value.length==0)||(document.f.password.value.length==0)){alert("用户名和密码都不能为空!!!");returnfalse;}returntrue;}</script> </HEAD><BODY><center><h1>注册页面</h1><formna