通訊錄管理系統設計畢業論文-免費閱讀

　　

【正文】 ORDER BY 優先級 Set ms = SelectSQL(SQL, msg) If 0 Then 39。清空TreeView Do Until 39。設置日志ID、錄入人員在DataGrid中不可見 (0).Visible = False (7).Visible = False If = 0 Then 39。裝載數據 Call ShowData 39。保存父節點的文本Dim C_key As String 39。顯示數據End SubPrivate Sub TreeView1_NodeClick(ByVal Node As )39。返回False Exit Function End If CheckData = True 39。重新裝載數據 Call ShowData 39。錯誤處理 If Not CheckData Then Exit Sub 39。清空控件 Call LoadData 39。修改操作 If 0 Then 39。如果存在記錄 (0).Text = (提醒主題) = (提醒時間) 39。 Left(F_key, 2) amp。構造樹操作 Dim rst As Dim ms As Set rst = Nothing Set ms = Nothing SQL = select * from 群組信息表 ORDER BY 優先級 Set rst = SelectSQL(SQL, msg) If = 0 Then 39。 ORDER BY 提醒時間 Desc ElseIf Trim((用戶類別)) = 管理人員 Then SQL = SELECT * FROM 提醒信息表 ORDER BY 提醒時間 Desc End If Set rs = Nothing 39。判斷當前用戶類別,因為一般用戶只能看到和自己相關的提醒信息，管理人員可以看到所有的提醒信息 SQL = Select * from 用戶信息表 where 用戶ID=39。 (姓名)) 39。定義Node對象Dim nod2 As Node 39。 Trim() 39。如果傳真被選中 If = 1 Then strConnectWay = strConnectWay amp。 , amp。保存要顯示的聯系方式 SQL = Select 聯系人ID,群組ID,姓名 amp。如果工作單位被選中 If = 1 Then strWhere = strWhere amp。 39。% amp。 39。學無止境。對老師的感激之情是無法用言語表達的。這些都有待進一步改善。對于系統的需求要明確，這樣才能做到有的放矢。其功能基本符合用戶需求，能夠完成資料管理、借、還書的管理。（2）窗體布局“還書“窗體主要負責讀者還書。 a) 2個ComboBox控件，顯示查詢條件和預約處理標志。□ 群組設置： 負責管理聯系人的群組信息。（1）實現目標 用戶登錄系統后，單擊【通訊管理】 【目錄查詢】【目錄查詢】對話框。調入重新登錄 End SelectEnd SubPrivate Sub 目錄查詢_Click() Enabled = FalseEnd SubPrivate Sub 通訊提醒_Click() Enabled = FalseEnd SubPrivate Sub 通訊日志_Click() Enabled = FalseEnd SubPrivate Sub 群組設置_Click() Enabled = FalseEnd SubPrivate Sub 聯系人設置_Click() Enabled = FalseEnd SubPrivate Sub 優先級設置_Click() Enabled = FalseEnd SubPrivate Sub 查詢打印_Click() Enabled = FalseEnd SubPrivate Sub 聯系人統計_Click() Enabled = FalseEnd SubPrivate Sub 提醒統計_Click() Enabled = FalseEnd SubPrivate Sub 日志分析_Click() Enabled = FalseEnd SubPrivate Sub 用戶管理_Click() Enabled = FalseEnd SubPrivate Sub 密碼維護_Click() Enabled = FalseEnd SubPrivate Sub 重新登錄_Click() Unload MeEnd SubPrivate Sub 初始化_Click() Enabled = FalseEnd Sub通訊錄管理系統 系統管理 通訊管理聯系人管理 統計分析 “通訊錄管理系統”總體模塊圖2. 分層模塊圖（圖1到圖5）目錄查詢索群組設置聯系人設置通訊管理通訊提醒聯系人管理 通訊日志優先級設置圖1“通訊管理”功能模塊 圖2“聯系人管理”功能模塊日志分析聯系人統計提醒統計統計分析用戶管理系統管理重新登錄 密碼維護 圖3 “統計分析”功能模塊 圖4系統管理”功能模塊 “通訊管理”模塊 “通訊管理“模塊主要包括以下功能模塊。保存模塊的權限 Qu_rights = Trim((群組權限)) 39。在項目的【屬性】面板中將項目的“Name”屬性值改為”圖書管理系統”。用戶可以使用光盤中的SQL腳本“源程序/03/創建數據庫/”來創建數據庫對象,完成數據庫設計。SQL Server 2000是為迅速提供可伸縮性電子商務、企業及數據倉庫解決方案而開發的完整數據庫與分析軟件產品。（2）開放性、標準化 從發展的眼光看，一個綜合的計算機管理系統要實現市場、決策、管理、設計、制造等各環節的信息共享，完成不同制造廠商的設備和計算機軟硬件資源的數據交換。用于負責用戶權限管理，包括用戶管理、密碼維護、重新登錄。只有弄清楚客戶的需求，才能真正開發出滿足客戶需要的信息系統，也才能夠真正讓整個系統發揮其相應的作用。技術可行性研究過程中，系統分析員應采集系統性能、可靠性、可維護性和可生產性方面的信息；分析實現系統功能和性能所需要的各種設備、技術、方法和過程；分析項目開發在技術方面可能擔負的風險以及技術問題對開發成本的影響。需求分析是介于系統分析和軟件設計階段之間的重要橋梁。如果能實現通訊錄管理的自動化，無疑將給通訊錄管理部門帶來很大的方便。山西煤炭管理干部學院畢業論文通訊錄管理系統設計畢業論文1. 引 言通訊錄管理系統設計畢業論文可以說是一項瑣碎、繁雜而又必須十分細致的工作，是通訊錄管理的一項重要內容，是不能允許發生差錯的。最初的通訊錄管理是靠人工完成的，當通訊錄規模較小的時候，人力可以完成，隨著通訊規模的逐漸增大，聯系的人數越來越多，依然維持著人力進行的通訊錄管理，必然回造成工作效率低，工作錯誤增高的問題。一方面，需求分析以系統規格說明和項目規劃作為分析活動的基本出發點，并從軟件角度對它們進行檢查與調整；另一方面，需求規格說明又是軟件設計、實現測試直至維護的主要基礎。開發一個中小型人事管理系統，涉及到的技術問題不會太多，主要用到的技術就是數據庫和一門可視化開發的編程語言。針對不同企業的營業規模及機構編制的差異，許多更加實用方便的軟件系統應運而生，現在不少企業的規模比較大,業務比較復雜。3. 總體設計軟件設計的主要任務是根據需求規格說明導出系統的實現方案。建立一個由開放式，標準化的異構式網絡系統，開放式標準化的異構式數據庫組成的平臺來滿足當前的需求，同時又能適應今后新技術的引進、開發和推廣。開 發 工 具： + SQL Server2000 3．SQL SERVER 2000定位于Internet背景下的數據庫應用，它為用戶的Web應用提供了一款完善的數據管理和數據分析解決方案。（3） 使用數據庫備份文件還原數據庫。 創建了工程項目后,需要創建系統主窗體、主窗體的菜單,并在主窗體中添加窗體代碼.1. 主窗體界面在項目資源管理器中為項目添加一個MDI窗體作為系統主窗體，將其“Name“和”Caption“屬性改為”通訊錄管理系統“。保存群組的權限 39。□目錄查詢： 負責提供高校的通訊目錄查詢功能。用戶可以選擇并填寫查詢條件，選擇所要顯示的聯系方式，然后單擊【查詢】按鈕來查詢通訊目錄。□ 聯系人設置：負責設置聯系人信息。b) 3個TextBox控件。為了實現這些功能，需要如下控件。以及各類相關圖書的管理。特別是對于系統中數據的存儲和重要算法的設計，設計的不好會出現大量的冗余，不僅浪費存儲空間，還影響查詢效率。 各位領導：在本次畢業設計中，我們使用了VB語言。因此，本論文的完成，離不開她的悉心指導和孜孜不倦地教誨。明天，將是我終身學習另一天的開始！在論文即將完成之際，我的心情無法平靜，從開始進入課題到論文的順利完成，有多少可敬的師長、同學、朋友給了我無言的幫助，在這里請接受我誠摯的謝意!參考文獻[1] Visual Basic數據庫開發關鍵技術與實例應用 牛春風 人民郵電出版社 2004年5月[2]Visual Basic程序設計與應用案例 劉鋼 高等教育出版社 2003年7月 [3] Visual Basic數據庫開發實例解析 王永生 機械工業出版社 2003年8月 [4] Visual FoxPro數據庫開發實例解析 韓敏 電子工業出版社 2002年6月[5]SQL Server數據庫開發實例解析 周曉杰、高鑒偉 機械工業出版社 2006年1月[6] SQL Server2000基礎教程 程克明、張丹 清華大學出版社 2005年5月[7] 《信息系統分析與設計》 鐘友坤 科學出版社 2005年5月附錄A1.“目錄查詢”模塊程序代碼Option ExplicitDim rs As Dim SQL As StringDim msg As StringDim strConnectWay As String 39。 Set rs = SelectSQL(SQL, msg) rightsQID = (群組權限) Set rs = Nothing 39。 Trim() amp。 End If 39。 and 工作單位 like 39。 strConnectWay amp。 Trim() 39。 , amp。如果被選中 If = 1 Then strConnectWay = strConnectWay amp。定義Node對象Dim F_key As String