軟體工程課程設計

㈠ 求軟體工程課程設計一份

圖書館管理系統 軟體工程課程設計說明書一份

《圖書管理系統》系統設計報告

一、 引言
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

㈡ 期末要交作業，軟體工程課程設計，

ssss www.husjxx.com

㈢ 高分跪求軟體工程課程設計

還可以吧

㈣ 《軟體工程》課程設計作業

沒猜錯的化你是想找一份完整的《軟體設計開發文檔》，最主要的是得做過項目，有實踐經驗的才能寫出合格的文檔，如果有難題可以私我

㈤ 求一份軟體工程課程設計，用java編寫。

開個價；一般上班的都沒時間幫你寫

㈥ 軟體工程課程設計的圖書目錄

專家指導委員會
叢書序言
前言 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 軟體工程課程設計的評價
……

㈦ 軟體工程課程設計圖書管理系統

1目標

本系統通過強大的計算機技術給圖書管理人員和讀者借、還書帶來便利。本系統除了圖書館內管理的一般功能還外，還包括網上在線查詢圖書信息、查詢本人的借閱情況和續借等功能。目標還包括：

減少人力與管理費用；
提高信息准確度；
改進管理和服務；
建立高效的信息傳輸和服務平台，提高信息處理速度和利用率；
系統設計優良，界面設計精美、友好、快捷，人性化設計，後台管理功能強大、效率高；
更簡便、信息化程度更高的圖書管理流程；
2用戶的特點

本軟體的最終用戶是面向管理員（圖書管理員和其它管理人員）、讀者（老師和同學等），他們都具有一定的計算機應用基礎，可以比較熟練操作計算機。管理員和讀者都是經常性用戶。
系統維護人員為計算機專業人員，熟悉資料庫、操作系統、網路維護工作。維護人員為間隔性用戶。

3. 需求規定

在圖書管理系統中，管理員要為每個讀者建立借閱賬戶，並給讀者發放不同類別的借閱卡（借閱卡可提供卡號、讀者姓名），賬戶內存儲讀者的個人信息和借閱記錄信息。持有借閱卡的讀者可以通過管理員（作為讀者的代理人與系統交互）借閱、歸還圖書，不同類別的讀者可借閱圖書的范圍、數量和期限不同，可通過互聯網或圖書館內查詢終端查詢圖書信息和個人借閱情況，以及續借圖書（系統審核符合續借條件）。

借閱圖書時，先輸入讀者的借閱卡號，系統驗證借閱卡的有效性和讀者是否可繼續借閱圖書，無效則提示其原因，有效則顯示讀者的基本信息（包括照片），供管理員人工核對。然後輸入要借閱的書號，系統查閱圖書信息資料庫，顯示圖書的基本信息，供管理員人工核對。最後提交借閱請求，若被系統接受則存儲借閱紀錄，並修改可借閱圖書的數量。歸還圖書時，輸入讀者借閱卡號和圖書號（或丟失標記號），系統驗證是否有此借閱紀錄以及是否超期借閱，無則提示，有則顯示讀者和圖書的基本信息供管理員人工審核。如果有超期借閱或丟失情況，先轉入過期罰款或圖書丟失處理。然後提交還書請求，系統接受後刪除借閱紀錄，並登記並修改可借閱圖書的數量。

圖書管理員定期或不定期對圖書信息進行入庫、修改、刪除等圖書信息管理以及注銷（不外借），包括圖書類別和出版社管理。

為系統維護人員提供許可權管理、數據備份等通用功能。

發到你網路信息里了
應該對你的論文有幫助

㈧ 軟體工程課程設計

去網上搜軟體工程的畢業設計，一應俱全