软件工程课程设计
图书馆管理系统 软件工程课程设计说明书一份
《图书管理系统》系统设计报告
一、 引言
1. 摘要:中学图书馆管理系统
目的:方便图书馆对书籍借阅的管理
主要功能: —学生基本信息查询
—书籍借阅管理
—书籍管理
2. 背景:第十小组承担开发任务
3. 工作条件与限制:windows操作平台,Visual Basic6.0和SQL Sserver2000等软件为开发工具,利用上课时间和课外时间做成。由于现在图书管理系统已经比叫完善,所以我们暂时没有能做出比以前有先进技术的管理系统。
4. 参考和引用资料:《数据库系统概论》,VB应用
5. 专门术语定义:
二、系统总体技术方案
1. 计算机系统配置:windows平台,VB/SqlServer2000,WINNT SERVER操作系统, SQL server2000关系数据库管理系统 ,VB操作软件,局域网。
2. 模块设计:主要分为三个模块:即学生基本信息模块,书籍借阅模块,书籍管理模块
代码设计:读者信息查询
Public connStr As ADODB.Connection
Private Sub Command1_Click()
End Sub
Private Sub cmdAdd_Click()
If Trim(List1.Text) <> "" Then
List2.AddItem (List1.Text)
End If
End Sub
Private Sub cmdMove_Click()
If Trim(List2.Text) <> "" Then
List2.RemoveItem (List2.ListIndex)
End If
End Sub
Private Sub cmdSearch_Click()
Dim cmdstr As String
If List2.ListCount = 0 Then
MsgBox "请选择输出列!", vbOKOnly, "提示"
Exit Sub
End If
cmdstr = "select "
For i = 0 To List2.ListCount - 1
If Trim(List2.List(i)) = "图书证号" Then
cmdstr = cmdstr + "READER_DATA." + Trim(List2.List(i)) + ","
Else
If Trim(List2.List(i)) = "书号" Then
cmdstr = cmdstr + "MARC_DATA." + Trim(List2.List(i)) + ","
Else
cmdstr = cmdstr + Trim(List2.List(i)) + ","
End If
End If
Next
cmdstr = Left(cmdstr, Len(cmdstr) - 1)
If Opbook.Value = True Then
cmdstr = cmdstr + " from MARC_DATA where "
End If
If Opreader.Value = True Then
cmdstr = cmdstr + " from READER_DATA where "
End If
If Oplend.Value = True Then
cmdstr = cmdstr + " from MARC_DATA,READER_DATA,LEND_DATA " & " where MARC_DATA.书号=LEND_DATA. 书号 and " & " READER_DATA.图书证号=LEND_DATA.图书证号 and "
End If
If Trim(comKey.Text) = "" Then
MsgBox "请选择查询关键字!", vbOKOnly, "提示"
Exit Sub
End If
If Trim(txtKey.Text) = "" Then
MsgBox "请设置查询关键字的值!", vbOKOnly, "提示"
Exit Sub
End If
If ComType.Text = "精确匹配" Then
cmdstr = cmdstr + Trim(comKey.Text) + "='" + Trim(txtKey.Text) + "'"
Else
cmdstr = cmdstr + Trim(comKey.Text) + " like '" + Trim(txtKey.Text) + "%'"
End If
Adodc1.RecordSource = cmdstr
Adodc1.Refresh
DataGrid1.Refresh
End Sub
Private Sub Form_Load()
Set connStr = New ADODB.Connection
connStr.Open "driver={SQL Server}; Server=SYSLAB000;UID=jj138;PWD=;database=计教(1)班38号"
Adodc1.ConnectionString = connStr
ComType.AddItem ("精确匹配")
ComType.AddItem ("前方一致匹配")
End Sub
Private Sub Label3_Click()
End Sub
Private Sub List2_Click()
End Sub
Private Sub Opbook_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "MARC_DATA", connStr, adOpenKeyset, adLockReadOnly, adCmdTable
comKey.Clear
List1.Clear
For i = 0 To rs.Fields.Count - 1
comKey.AddItem (rs.Fields(i).Name)
List1.AddItem (rs.Fields(i).Name)
Next
rs.Close
List2.Clear
txtKey.Text = ""
End Sub
Private Sub Oplend_Click()
comKey.Clear
List1.Clear
comKey.AddItem ("图书证号")
comKey.AddItem ("姓名")
comKey.AddItem ("书号")
comKey.AddItem ("书名")
comKey.AddItem ("出版社")
comKey.AddItem ("借出日期")
comKey.AddItem ("还书日期")
List1.AddItem ("图书证号")
List1.AddItem ("姓名")
List1.AddItem ("书号")
List1.AddItem ("书名")
List1.AddItem ("出版社")
List1.AddItem ("借出日期")
List1.AddItem ("还书日期")
List2.Clear
txtKey.Text = ""
End Sub
Private Sub Opreader_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "READER_DATA", connStr, adOpenKeyset, adLockReadOnly, adCmdTable
comKey.Clear
List1.Clear
For i = 0 To rs.Fields.Count - 1
comKey.AddItem (rs.Fields(i).Name)
List1.AddItem (rs.Fields(i).Name)
Next
rs.Close
List2.Clear
txtKey.Text = ""
End Sub
借还书处理
Private Sub cmdLend_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
If Trim(txtBid.Text) = "" Or Trim(txtRid_1.Text) = "" Then
MsgBox "请输入图书证号和书号!", vbOKOnly, "提示信息"
Else
rs.Open "LEND_DATA", connStr, adOpenKeyset, adLockOptimistic, adCmdTable
rs.AddNew
rs("书号") = txtBid.Text
rs("借出日期") = Date
rs("图书证号") = txtRid.Text
rs.Update
Adodc1.Refresh
End If
End Sub
Private Sub cmdReturn_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
If Trim(txtBid.Text) = "" Or Trim(txtRid_1.Text) = "" Then
MsgBox "请输入图书证号和书号!", vbOKOnly, "提示信息"
Else
cmdstr = "update LEND_DATA set 还书日期='" _
& Date & "' where 书号='" & Trim(txtBid.Text) & "'"
rs.Open cmdstr, connStr, adOpenKeyset, adLockOptimistic, adCmdText
Adodc1.Refresh
End If
End Sub
Private Sub cmds_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
cmdstr = "select * from READER_DATA WHERE 图书证号 ='" & Trim(txtRid_1.Text) & "'"
rs.Open cmdstr, connStr, adOpenForwardOnly, adLockReadOnly, adCmdText
If Not rs.EOF Then
txtRid.Text = rs("图书证号")
txtName.Text = rs("姓名")
If Not IsNull(rs("性别")) Then
txtXb.Text = rs("性别")
End If
If Not IsNull(rs("系名")) Then
txtXm.Text = rs("系名")
End If
Else
MsgBox "未找到该读者信息!", vbOKOnly, "提示信息"
End If
cmdstr = "select 借出日期,还书日期,LEND_DATA.书号,书名,作者,出版社" & " from LEND_DATA,MARC_DATA " & "where LEND_DATA.书号=MARC_DATA.书号 and " & " 还书日期 is null and 图书证号='" & Trim(txtRid_1.Text) & "'"
Adodc1.RecordSource = cmdstr
Adodc1.Refresh
End Sub
Private Sub cmdSearch_Click()
cmdstr = "select 借出日期,还书日期,LEND_DATA.书号,书名,作者,出版社" & "from LEND_DATA,MARC_DATA " & "where LEND_DATA.书号=MARC_DATA.书号 and 图书证号='" & Trim(txtRid_1.Text) & "'"
Adodc1.RecordSource = cmdstr
Adodc1.Refresh
End Sub
Private Sub DataGrid1_Click()
If Not Adodc1.Recordset.BOF And Not Adodc1.Recordset.BOF Then
txtBid.Text = Adodc1.Recordset("书号")
End If
End Sub
Private Sub Form_Load()
Set connStr = New ADODB.Connection
connStr.Open "driver={SQL Server}; Server=SYSLAB000;UID=jj138;PWD=;database=计教(1)班38号"
Adodc1.ConnectionString = connStr
End Sub
图书馆详细信息
Private Sub txt_refresh()
If Not Adodc1.Recordset.EOF And Not Adodc1.Recordset.BOF Then
txtBid.Text = Adodc1.Recordset("书号")
txtBname.Text = Adodc1.Recordset("书名")
txtWrite.Text = Adodc1.Recordset("作者")
txtPublisher.Text = Adodc1.Recordset("出版社")
txtYear.Text = Adodc1.Recordset("出版时间")
txtGb.Text = Adodc1.Recordset("国别代码")
txtDate.Text = Adodc1.Recordset("进馆时间")
txtCallno.Text = Adodc1.Recordset("分类号")
End If
End Sub
Private Sub cmdDele_Click()
Dim deletxt As String
deletxt = "是否删除图书《" & Adodc1.Recordset("书名") & "》的记录?"
If Not Adodc1.Recordset.EOF And Not Adodc1.Recordset.BOF Then
If MsgBox(deletxt, vbOKCancel, "提示信息") = vbOK Then
Adodc1.Recordset.Delete
Adodc1.Refresh
End If
End If
End Sub
Private Sub cmdNew_Click()
If cmdNew.Caption = "新增" Then
txt_enable (2)
cmdNew.Caption = "保存"
txtBid.Text = ""
txtBname.Text = ""
txtWrite.Text = ""
txtPublisher.Text = ""
txtYear.Text = ""
txtGb.Text = ""
txtDate.Text = ""
txtCallno.Text = ""
Else
Adodc1.Recordset.AddNew
Adodc1.Recordset("书号") = Trim(txtBid.Text)
Adodc1.Recordset("书名") = Trim(txtBname.Text)
Adodc1.Recordset("作者") = Trim(txtWrite.Text)
Adodc1.Recordset("出版社") = Trim(txtPublisher.Text)
Adodc1.Recordset("出版时间") = Trim(txtYear.Text)
Adodc1.Recordset("国别代码") = Trim(txtGb.Text)
4
Adodc1.Recordset("进馆时间") = Trim(txtDate.Text)
Adodc1.Recordset("分类号") = Trim(txtCallno.Text)
Adodc1.Recordset.UpdateBatch
Adodc1.Refresh
txt_enable (1)
cmdNew.Caption = "新增"
Adodc1.Recordset.MoveFirst
txt_refresh
End If
Private Sub cmdNext_Click()
If Not Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveNext
txt_refresh
End If
End Sub
Private Sub cmdPre_Click()
If Not Adodc1.Recordset.BOF Then
Adodc1.Recordset.MovePrevious
txt_refresh 2
End If
End Sub
Private Sub cmdUpdate_Click()
If cmdUpdate.Caption = "修改" Then
txt_enable (2)
cmdUpdate.Caption = "保存"
Else
Adodc1.Recordset("书号") = Trim(txtBid.Text)
Adodc1.Recordset("书名") = Trim(txtBname.Text)
Adodc1.Recordset("作者") = Trim(txtWrite.Text)
Adodc1.Recordset("出版社") = Trim(txtPublisher.Text)
Adodc1.Recordset("出版时间") = Trim(txtYear.Text)
Adodc1.Recordset("国别代码") = Trim(txtGb.Text)
Adodc1.Recordset("进馆时间") = Trim(txtDate.Text)
Adodc1.Recordset("分类号") = Trim(txtCallno.Text)
Adodc1.Recordset.UpdateBatch
Adodc1.Refresh
txt_enable (1)
cmdUpdate.Caption = "修改"
End If
End Sub
Private Sub Form_Load()
txt_refresh
End Sub
Private Sub Text1_Change()
End Sub
Private Sub Text8_Change()
End Sub
Private Sub txtBname_Change()
End Sub
② 软件工程课程设计的一个题目,不明白
应该是用asp或者vb做前台,sql做后台的东西。
③ 软件工程课程设计图书管理系统
1目标
本系统通过强大的计算机技术给图书管理人员和读者借、还书带来便利。本系统除了图书馆内管理的一般功能还外,还包括网上在线查询图书信息、查询本人的借阅情况和续借等功能。目标还包括:
减少人力与管理费用;
提高信息准确度;
改进管理和服务;
建立高效的信息传输和服务平台,提高信息处理速度和利用率;
系统设计优良,界面设计精美、友好、快捷,人性化设计,后台管理功能强大、效率高;
更简便、信息化程度更高的图书管理流程;
2用户的特点
本软件的最终用户是面向管理员(图书管理员和其它管理人员)、读者(老师和同学等),他们都具有一定的计算机应用基础,可以比较熟练操作计算机。管理员和读者都是经常性用户。
系统维护人员为计算机专业人员,熟悉数据库、操作系统、网络维护工作。维护人员为间隔性用户。
3. 需求规定
在图书管理系统中,管理员要为每个读者建立借阅账户,并给读者发放不同类别的借阅卡(借阅卡可提供卡号、读者姓名),账户内存储读者的个人信息和借阅记录信息。持有借阅卡的读者可以通过管理员(作为读者的代理人与系统交互)借阅、归还图书,不同类别的读者可借阅图书的范围、数量和期限不同,可通过互联网或图书馆内查询终端查询图书信息和个人借阅情况,以及续借图书(系统审核符合续借条件)。
借阅图书时,先输入读者的借阅卡号,系统验证借阅卡的有效性和读者是否可继续借阅图书,无效则提示其原因,有效则显示读者的基本信息(包括照片),供管理员人工核对。然后输入要借阅的书号,系统查阅图书信息数据库,显示图书的基本信息,供管理员人工核对。最后提交借阅请求,若被系统接受则存储借阅纪录,并修改可借阅图书的数量。归还图书时,输入读者借阅卡号和图书号(或丢失标记号),系统验证是否有此借阅纪录以及是否超期借阅,无则提示,有则显示读者和图书的基本信息供管理员人工审核。如果有超期借阅或丢失情况,先转入过期罚款或图书丢失处理。然后提交还书请求,系统接受后删除借阅纪录,并登记并修改可借阅图书的数量。
图书管理员定期或不定期对图书信息进行入库、修改、删除等图书信息管理以及注销(不外借),包括图书类别和出版社管理。
为系统维护人员提供权限管理、数据备份等通用功能。
发到你网络信息里了
应该对你的论文有帮助
④ 急求软件工程的课程设计(包括详细的设计文档像可行性报告和需求分析等)
已经发给你了,望采纳
⑤ 高分跪求软件工程课程设计
还可以吧
⑥ 软件工程课程设计具体步骤
1.首先接受老师下发的任务
2.根据任务查找资料,上网啦,找学哥学姐要啊,各种途径
3.资料找好后上机调试
4.答辩
5.课程设计报告
⑦ 软件工程课程设计的图书目录
专家指导委员会
丛书序言
前言 1.1 项目选题
1.2 组建团队
1.3 团队工作方式
1.4 项目进度安排 2.1 项目管理的范围
2.2 利用Microsoft Project对项目进行时间管理 3.1 需求分析的基本概念
3.2 需求分析阶段的具体实施过程
3.2.1 确定项目的大体方向
3.2.2 详细获取需求
3.2.3 讨论并确认需求
3.2.4 以需求规格说明书为基点,将需求文档化
3.2.5 整合需求规格说明书
3.3 Kernel会议管理系统需求规格说明书 4.1 软件设计的基本概念
4.2 软件设计的具体实施过程
4.2.1 功能模块设计
4.2.2 系统数据设计
4.2.3 需求迭代
4.3 Kernel会议管理系统设计说明书 5.1 软件实现的基本概念
5.2 软件实现的具体实施过程
5.2.1 程序的注释
5.2.2 规范化的源代码布局和命名规范
5.2.3 挖掘IDE的强大功能
5.2.4 软件的目录划分
5.3 Kernel会议管理系统编码规范 6.1 软件测试的基本概念
6.2 软件测试的具体实施过程
6.2.1 第一阶段:测试准备阶段
6.2.2 第二阶段:单元测试阶段
6.2.3 第三阶段:集成和系统测试阶段
6.3 Kernel会议管理系统测试报告 7.1 一切从用户的角度出发
7.2 用户手册应该写些什么
7.3 编写用户手册的技巧
7.3.1 图文结合
7.3.2 操作截图
7.4 Kernel会议管理系统用户手册 8.1 配置管理的基本概念
8.2 为什么需要配置管理
8.3 配置管理的方式
8.3.1.一种原始的文件共享的方式
8.3.2 采用专业的软件配置管理工具
8.4 配置管理需要注意的问题
8.4.1 一天一个版本
8.4.2 日志和记录
8.4.3 上传操作文件之前一定要确保正确性 附录A 软件工程课程设计题目
附录B 软件工程课程设计的评价
……
⑧ 软件工程课程设计
小学小学阶段课程问题性普及性基础性和发展性。小学课程设置,要给回学生全面丰富的发展。留答有充足的时间和空间,有利于。学生的自主多样,排队,那个。持续的发展,中学课程设置。初中课程设置,初中阶段的课程应符合,普及性基础性和发展性。
⑨ 《软件工程》课程设计作业
没猜错的化你是想找一份完整的《软件设计开发文档》,最主要的是得做过项目,有实践经验的才能写出合格的文档,如果有难题可以私我