《数据库系统原理》课程设计——平面设计公司业务管理系统.doc

数据库系统原理 课程设计报告 平面设计公司业务管理系统 姓姓 名 名 学学 号 号 指导教师 指导教师 起始时间 起始时间 截止时间 截止时间 1 目录 概述概述 2 第一章第一章需求分析需求分析 3 1 1 信息要求 3 第二章第二章结构设计结构设计 4 2 1 概念结构设计 4 2 2 逻辑结构设计 6 第三章第三章主要模块设计及代码主要模块设计及代码 7 3 1 数据库连接模块 7 3 2 认证登录模块 9 3 3 查询显示模块 9 3 4 添加 修改 删除模块 12 第四章第四章总结总结 14 第五章第五章参考文献参考文献 15 2 概述 编写目的编写目的 本报告作为软件使用的重要指南 可以方便用户使用 同时 也是一份重要的技术文 档 方便开发人员继续完善各项功能 更新软件 为了更好地管理平面设计公司的各项工 作 撰写此文档 项目背景项目背景 订单管理是每所公司或工厂必须面对的工作 大量的订单管理给企业带来了沉重的负 担 传统人手方式管理文件档案 已经无法满足当前业务量的正常需求 这种管理方式存 在许多缺点 效率低 保密性差 另外随着进货数量的增加 这必然增加了订单管理者的 工作量和劳动强度 同时 将产生大量的文件和数据 这给订单信息的查找 更新和维护 都带来了不少困难 管理机制已经不能适应时代发展的需求 其管理方法将浪费人力物力 随着科技的不断提高 计算机科学与技术日渐成熟 这种传统的手工管理模式必然被以计 算机为物质基础的信息管理方式所取代 软件定义软件定义 图形化界面 人性化的界面 方便了员工的使用 对操作员技术要求不高 数据存取 系统地保存数据 可以加快数据处理 提高工作量 可以同时进行多人对 数据的操作 保证数据存取不出错 开发环境开发环境 在 Windows XP SP3 操作系统下 使用 Visual C 进行开发 数据存取使用 SQL Server 2000 平台 3 第一章 需求分析 1 1 信息要求 通过软件 可以查看 添加 保存 修改 删除各种业务信息 如登录账户的信息 员工的信息 客户的信息 订单信息 送货单信息 历史单信息 1 2 处理要求 软件要灵活实现各种管理功能间的切换 减少麻烦的操作 对于数据的修改 保证不 会出错 确保数据的正确性 在必要的地方 给予一定的提示 以防止误操作导致的数据 4 异常 图 1 1 功能模块图 1 3 安全性与完整性要求 登录安全 采用用户名 密码方式登录系统 不同职工具有的使用权限不同 管理员 拥有最高权限 其他员工根据职务需要规定所需权限 完整性要求 对于一些必须的信息 不能留空值 如编号 名称 日期等信息 第二章 结构设计 2 1概念结构设计 各实体 E R 图 图 2 2 账户 ID 职工编号 登录账户 用户名密码 员工 职工编号 员工姓名性别 月薪职位 稿件 稿件编号长度宽度 规格 色数客户名称 输出机型 页数单价小计 稿件名称 图 2 1 图 2 3 5 图 2 4 图 2 5 图 2 6 客户 客户名称公司地址联系人 邮箱 传真联系人电话 客户编号 联系业务员 订单 订单编号 业务员 客户名 设计员 下单日期 送货员 历史单 送货单编号 编号 送货单 编号订单编号 送货日期 6 2 2 逻辑结构设计 图 2 7 实体联系图 图 2 7 数据关系表 账户职工 历史单 客户 订单 送货单 稿件 拥有 决定 制定 联系 生成 生成 7 第三章 主要模块设计及代码 3 1数据库连接模块 为连接模块独自建立一个类 方便每次访问数据库时可以调用 类命名为 ADOConn 采用 ADO 技术实现程序与数据库的连接 用 import 语句来引用支持 ADO 的组件类型库 tlb 其中类型库可以作为可执行程 序 DLL EXE 等 的一部分被定位在其自身程序中的附属资源里 如 被定位在 msado15 dll 的附属资源中 只需要直接用 import 引用它既可 直接在 Stdafx h 文件中 加入下面语句来实现 import c programfiles commonfiles system ado msado15 dll no namespace rename EOF adoEOF 实际上两行代码是在同一行显示 由于排版原因 分行显示 以下为 ADOConn 类里重要成员函数的代码 函数名称 ADOConn 功能 初始化 COM 环境 void C ADOConn ADOConn CoInitialize NULL try pConn CreateInstance ADODB Connection 创建 Connection 对象 设置字符连接字符串 必须是 BSTR 型或者 bstr t 类型 bstr t strConnect Provider SQLOLEDB 1 Integrated Security SSPI Persist Security Info False User ID sa Initial Catalog DsnCompany Data Source BEN PC 连接数据库的代码语句 pConn Open strConnect adConnectUnspecified 8 catch com error e 捕捉异常信息 AfxMessageBox e ErrorMessage 名称 OpenRecordset 功能 打开记录集 RecordsetPtr 判断是否为空集 try pRs CreateInstance ADODB Recordset 创建 Recordset 对象 pRs Open bstr t sql variant t pConn true adOpenStatic adLockOptimistic adCmdText catch com error e AfxMessageBox e ErrorMessage return pRs void CADOConn FreeData 释放空间 if pConn pConn Close pRs Release pConn Release CoUninitialize 9 3 2 认证登录模块 void CGraphicDsnDlg OnOK 确定按钮事件 TODO Add extra validation here UpdateData CMainMngDlg dlg CString sql select from LogUser where UserName m strUsername and PassWord m strPassword a pRs a OpenRecordset sql 将记录加入到记录集 int n a pRs RecordCount 计算符合条目 if n 0 CDialog OnOK 登陆成功 dlg DoModal else AfxMessageBox 用户名或密码不正确 登陆失败 return 3 3 查询显示模块 BOOL CTickets OnInitDialog 订单管理类初始化函数 CDialog OnInitDialog TODO Add extra initialization here 10 cn ADOConn 连接数据库 Display 设置列表框控件的扩展风格 整行选择 有表格线 表头 单击激活 DWORD dwExStyle LVS EX FULLROWSELECT LVS EX GRIDLINES LVS EX HEADERDRAGD ROP LVS EX ONECLICKACTIVATE 报表风格 单行选择 高亮显示选择行 m List ModifyStyle 0 LVS REPORT LVS SINGLESEL LVS SHOWSELALWAYS m List SetExtendedStyle dwExStyle 设置列表框控件的颜色 m List SetTextColor RGB 200 200 0 m List SetBkColor RGB 240 247 233 初始化列表 插入 11 列 m ListDoc InsertColumn 0 LVCFMT CENTER 0 0 m ListDoc InsertColumn 1 稿件名称 LVCFMT CENTER 120 0 m ListDoc InsertColumn 2 长度 宽度 LVCFMT CENTER 90 0 m ListDoc InsertColumn 3 规格 LVCFMT CENTER 65 0 m ListDoc InsertColumn 4 色数 LVCFMT CENTER 65 0 m ListDoc InsertColumn 5 规格 LVCFMT CENTER 65 0 m ListDoc InsertColumn 7 输出机型 LVCFMT CENTER 90 0 m ListDoc InsertColumn 8 页数 LVCFMT CENTER 65 0 m ListDoc InsertColumn 9 单价 LVCFMT CENTER 70 0 m ListDoc InsertColumn 10 小计 LVCFMT CENTER 80 0 m ListDoc InsertColumn 11 客户名称 LVCFMT CENTER 137 0 return TRUE return TRUE unless you set the focus to a control EXCEPTION OCX Property Pages should return FALSE return TRUE return TRUE unless you set the focus to a control EXCEPTION OCX Property Pages should return FALSE void CTicketsMngDlg Show 输出单据信息到列表控件框 CString DocName int index m oddno GetCurSel if index CB ERR AfxMessageBox T 出错 return m oddno GetLBText index coursename 11 CString s select from Documents where DocName DocName a pRs a OpenRecordset s 把数据加到记录集 UpdateData CString sql select from Documents where CustomerName CustomerName a pRs a OpenRecordset sql 打开数据到记录集 variant t DocNo DocName Length Format Color OutputMacMac Pagess Price CustomerName 定义列表名变量 int i 0 a pRs a OpenRecordset s int nIndex m List GetItemCount LV ITEM lvItem lvItem mask LVIF TEXT lvItem iItem nIndex lvItem iSubItem 0 第 nIndex 行 lvItem pszText char LPCTSTR DocName1 第一列参数 for a pRs MoveFirst a pRs adoEOF a pRs MoveNext m List InsertItem DocName a pRs GetCollect DocName 取数据 Length a pRs GetCollect Length Format a pRs GetCollect Format Color a pRs GetCollect Color Pages a pRs GetCollect Pages Price a pRs GetCollect Price Subtotal a pRs GetCollect Subtotal Color a pRs GetCollect Color design a pRs GetCollect design CustomerName a pRs GetCollect CustomerName OutputMac a pRs GetCollect OutputMac DocName ChangeType VT BSTR 改变类型 Length ChangeType VT BSTR 12 Format ChangeType VT BSTR Color ChangeType VT BSTR Pages ChangeType VT BSTR Price ChangeType VT BSTR Subtotal ChangeType VT BSTR Color ChangeType VT BSTR CustomerName ChangeType VT BSTR OutputMac ChangeType VT BSTR DocName DocName bstrVal 调用 bstrval Length Length bstrVal Format Format bstrVal Color Color bstrVal OutputMac1 OutputMac bstrVal Pages Pages bstrVal Price Price bstrVal Color Color bstrVal CustomerName CustomerName bstrVal 3 4 添加 修改 删除模块 打开修改订单 void CTicketsManDlg OnItemmanButton TODO Add your control notification handler code here UpdateData TRUE if m Adodc GetRecordset GetEof MessageBox 请选择要修改的订单 return 设置 ListItemManDlg 对话框中的变量 CListItemManDlg dlg dlg cRegId m Datagrid GetItem 0 打开 ListItemManDlg 对话框 if dlg DoModal IDOK RefreshData else RefreshData 13 删除订单 void CTicketsManDlg OnDelButton TODO Add your control notification handler code here UpdateData TRUE if m Adodc GetRecordset GetEof MessageBox 请选择要删除的订单 return if MessageBox 是否删除当前记录 请确认 MB YESNO MB ICONQUESTION IDYES CTickets reg reg SqlDelete m