数据库技术及应用程序设计实例.docx

1、数据库技术及应用程序设计实例B/S模式产品销售管理系统一 课题目的基本掌握B/S模式数据库应用系统的开发二开发环境与工具WindowsXP操作系统 IIS 5.1SQL Server2000数据库管理系统ASP开发工具IIS5.1环境搭建：第一步：控制面板 - 添加删除程序 - 添加删除WINDOWS组件 - 选中IIS依次下一步最后完成。安装过程中需要WINDOWS XP 安装盘，首先需要确认安装的系统为SP1或SP2，选择对应的安装光盘放入光驱。第二步：打开Internet信息服务，即IIS。控制面板 - 管理工具 - Internet信息服务。第三步：WEB站点设置，“TCP端口”是WE

2、B服务器端口，默认值是80，不需要改动。“IP地址”是WEB服务器绑定的IP地址，默认值是“全部未分配”，建议不要改动。默认情况下，WEB服务器会绑定在本机的所有IP上，包括拨号上网得到的动态IP。第四步：主目录设置，在“本地路径”右边，是网站根目录，即网站文件存放的目录，默认路径是“c:inetpubwwwroot”。如果想把网站文件存放在其他地方，可修改这个路径。 第五步：文档的设置，在这里设置网站的默认首页文档。IIS会在网站根目录下查找默认的首页文件，如果找到就打开，找不到就显示“该页无法显示”。在这里添加所需的默认首页文件名，添加完后可以用左边的上下箭头排列这些文件名的查找顺序。二

3、需求分析1 问题的提出：为了高效率的完成产品信息的管理，决定开发产品销售管理系统。2 需完成的功能：（1） 能添加、修改、删除、查询产品的信息，这些产品信息包括产品的编号、产品的名称、产品的价格、产品的库存量。（2） 能添加、修改、删除、查询销售商的信息，销售商信息包括销售商的编号、销售商的名称、地区、负责人、电话、备注。（3） 能添加、修改、删除、查询销售的信息，销售信息包括产品编号、销售商编号、销售时间、数量、金额。3 E-R图设计：产品实体产品销售商销售商实体产品实体联系图mn销售商四数据库结构设计根据E-R图，转换成关系模式：产品（产品编号、产品名称、价格、库存量）销售商（销售商编号、

4、销售商名称、地区、负责人、电话、备注）销售（产品编号、销售商编号、销售时间、数量、金额）产品表(CP)表结构列名数 据 类 型长度是否允许为空值说 明CPBH字符型(char) 6产品编号，主键CPMC字符型(char) 30产品名称JG浮点型(float)8价格KCL整型(int)4库存量销售商(XSS)表结构列名数据类型长度是否允许为空值说 明XSBH字符型(char)6销售商编号，主键XSMC字符型(char)30销售商名称DQ字符型(char)10地区FZR字符型(char)8负责人DH字符型(char)12电话BZ文本(text)16备注产品销售(XSCP)表结构列名数据类型长度是否

5、允许为空值说 明CPBH字符型(char)6产品编号，主键XSBH字符型(char)6销售商编号，主键XSSJDatetime8销售时间SL整型(int)4数量JE浮点型(float)8金额五系统功能概述产品销售管理系统销售信息维护销售商信息维护产品信息维护销售信息销售商信息产品信息删除销售记录修改销售记录增加销售记录删除销售商记录修改销售商记录增加产品记录修改产品记录删除产品记录增加销售商记录 该系统包括6个功能模块：产品信息、销售商信息、销售信息、产品数据维护、销售商数据维护、销售数据维护。（1）产品信息：查询产品基本信息。（2）销售商信息：查询销售商基本信息。（3）销售信息：查询销售基本

6、信息。（4）产品信息维护： 增加产品记录：添加产品编号、产品名称、价格等产品基本信息。 修改产品记录：修改除产品编号外的产品基本信息。 删除产品记录：删除根据条件查询出的产品记录。（5）销售商信息维护： 增加销售商记录：添加销售商编号、销售商名称、地区、负责人、电话等销售商基本信息。 修改销售商记录：修改除销售商编号外的销售商基本信息。 删除销售商记录：删除根据条件查询出的销售商记录。（6）销售信息维护： 增加销售记录：添加产品编号、销售商编号、销售时间等销售基本信息。 修改销售记录：修改销售表中的数量、金额基本信息。 删除销售记录：删除根据条件查询出的销售记录。六主界面设计 主界面由上下两个

7、框架（frame）组成，上部的frame为标题和以功能命名的超连接，下部的frame为数据显示区。 cpxs.htm： 主页面文件，位于根目录下。 top.htm： 上部frame，位于根目录下。 main.asp： 主frame，位于根目录下。 showrs.asp： 显示结果集，位于根目录下。 conn.inc： 连接数据库，位于根目录下。1cpxs.htm产品销售系统 2top.htmtop!-a:visited color:#0000ff;text-decoration:nonea:link font-family:宋体;font-size:12pt;color:#0000ff;tex

8、t-decoration:nonea:hover font-family:宋体;font-size:14pt;color:#0000ff;text-decoration:none产品销售管理    产品信息    销售商信息    销售信息    产品信息维护    销售商信息维护    销售信息维护3main.asp%sub ShowPage(rs,pag

9、e) 显示结果集中的指定页 response.write() response.write() for i=0 to rs.fields.count-1 response.write( & rs.fields(i).Name & ) next response.write() rs.AbsolutePage=Page for i=0 to rs.PageSize response.write() response.write( & rs.fields(0).Value & ) for j=1 to 2 response.write( & rs.fields(j).Value & ) next

10、response.write( & rs.fields(3).Value & ) response.write() rs.MoveNext if rs.eof then exit for next response.write()end subset rs=Server.createobject(adodb.recordset)sql = select CPBH as 产品编号,CPMC as 产品名称,JG as 价格,KCL as 库存量 from CPrs.open sql,conn,3%rs.PageSize=10Page=CInt(request(PageText)if Pagers

11、.PageCount then Page=rs.PageCountShowPage rs,Page%if Page1 then response.write(第一页) response.write( ) response.write(上一页)end ifif Pagers.PageCount then response.write(下一页) response.write( ) response.write(最后一页)end if%输入页号：总页号：/4showrs.asp%Sub ShowRS(rs) 显示结果集rs response.write() response.write() for

12、i=0 to rs.fields.count-1 response.write( & rs.fields(i).Name & ) next response.write() while not rs.eof response.write() for i=0 to rs.fields.count-1 response.write( & rs.fields(i).Value & ) next response.write() rs.MoveNext wend response.write()end Sub%5conn.incProvider=SQLOLEDB： 数据库提供者User id=sa：

13、数据库的帐号Password=944679： 数据库的帐号密码Initial Catalog=cpxs： 数据库名字Data Source=(local)： 数据源,SQL服务器名或其IP七各功能模块设计1 产品信息：浏览产品表的数据以及根据产品编号查询包括产品、销售商、销售三张表中对应产品编号的数据信息。显示的数据以表格的形式在数据显示区显示所查看的数据，在表格中再以超链接的形式提供数据查询。例如，对产品数据，提供的是按产品编号进行查询，即将产品编号数据作为超链接，单击产品编号后将查询该产品编号的产品情况及产品销售情况。cpll.asp： 浏览产品表中产品数据，位于CP文件夹下。cpno.a

14、sp： 按产品编号查询程序，位于CP文件夹下。(1) cpll.asp%sub ShowPage(rs,page) 显示结果集中的指定页 response.write() response.write() for i=0 to rs.fields.count-1 response.write( & rs.fields(i).Name & ) next response.write() rs.AbsolutePage=Page for i=0 to rs.PageSize response.write() response.write( & rs.fields(0).Value & ) for

15、j=1 to 2 response.write( & rs.fields(j).Value & ) next response.write( & rs.fields(3).Value & ) response.write() rs.MoveNext if rs.eof then exit for next response.write()end subset rs=server.createobject(adodb.recordset)sql=select CPBH as 产品编号,CPMC as 产品名称,JG as 价格,KCL as 库存量 from CPrs.open sql,conn

16、,3%rs.PageSize=10Page=CInt(request(PageText)if Pagers.PageCount then Page=rs.PageCountShowPage rs,Page%if Page1 then response.write(第一页) response.write( ) response.write(上一页)end ifif Pagers.PageCount then response.write(下一页) response.write( ) response.write(最后一页)end if%输入页号：总页号：/(2) cpno.asp2 销售商信息浏

17、览销售商表的数据以及根据销售商编号查询包括产品、销售商、销售三张表中对应销售商编号的数据信息。显示的数据以表格的形式在数据显示区显示所查看的数据，在表格中再以超链接的形式提供数据查询。例如，对销售商数据，提供的是按销售商编号进行查询，即将销售商编号数据作为超链接，单击销售商编号后将查询该销售商编号的产品情况及产品销售情况。xssll.asp： 浏览销售商表中产品数据，位于XSS文件夹下。xssno.asp： 按销售商编号查询程序，位于XSS文件夹下。(1) xssll.asp%sub ShowPage(rs,page) 显示结果集中的指定页 response.write() response.

18、write() for i=0 to rs.fields.count-1 response.write( & rs.fields(i).Name & ) next response.write() rs.AbsolutePage=Page for i=0 to rs.PageSize response.write() response.write( & rs.fields(0).Value & ) for j=1 to 5 response.write( & rs.fields(j).Value & ) next response.write() rs.MoveNext if rs.eof then exit for next response.write()end subset rs=server.createobject(adodb.recordset)sql=select XSBH as 销售商编号,XSMC as 销售商名称,DQ as 地区,FZR as 负责人,DH as 电话,BZ as 备注 from XSSrs.open sql,conn,3%rs.PageSize=10Page=CInt(request(PageText)if Pagers.PageCount then