【正文】 顯示器 . 5 一個(gè) CDROM驅(qū)動(dòng)器 6 鼠標(biāo)或其它定點(diǎn)設(shè)備 二 、 軟件要求 1 操作系統(tǒng)應(yīng)使用 Microsoft Windows95及以上版本 ,或者使用 Microsoft Windows 或者更高版本 . 2 安裝有 . 第二章 開發(fā)語言介紹 本管理系統(tǒng)采用的數(shù)據(jù)庫是 SQL Server 2021 數(shù)據(jù)庫，開發(fā)語言為 Microsoft Visual Basic (簡稱 )。自從微軟推出 VB后，便成為了程序開發(fā)人員的首選工具。以適用人員來分，可有以下三個(gè)版本： 1. 標(biāo)準(zhǔn)版 針對一般程序設(shè)計(jì)人員 ,適合普通應(yīng)用系統(tǒng)的開發(fā)。 可視化編程的一個(gè)突出特點(diǎn)就是其開發(fā)環(huán)境就像一個(gè)百寶箱，很多功能都集成在其之中，這就是 IDE（ Integrated Development Environment），即集成開發(fā)環(huán)境。 從簡單的文本文件到各種復(fù)雜的關(guān)系型數(shù)據(jù)庫，數(shù)據(jù)庫應(yīng)用程序需要面對各種各樣的數(shù)據(jù)源。 ADO 是基于 OLEDB之上的技術(shù)，因此 ADO通過其內(nèi)部的屬性和方法提供統(tǒng)一的數(shù)據(jù)訪問接口方法。它與以前 Visual Basic 的DAO、 RDO 相比有了很大的提高。 RDO是 ODBC API的一個(gè)淺層界面接口，是專為訪問遠(yuǎn)程 ODBC關(guān)系數(shù)據(jù)源而設(shè)計(jì)的。 OLE DB 是一種底層編程接口，用來訪問許多不同類型的數(shù)據(jù)源，其中包括消息、文件系統(tǒng)以及其他一些非傳統(tǒng)的數(shù)據(jù)源。對象模型使用 Connection對象使連接概念得以具體 。也可以使用 AddNew和 Update方法將值的數(shù)組作為參數(shù)傳遞，同時(shí)更新記錄的若干字段。使用 Field對象的 Value屬性可設(shè)置或返回當(dāng)前記錄的數(shù)據(jù) 。 Open方法 (ADO Recordset)： 打開記錄集。 不但如此，在 ACCESS 2021 推出以后，我們發(fā)現(xiàn)數(shù)據(jù)庫的建立更加的快速，但是功能卻更加強(qiáng)大，用戶不用再去記憶那一大堆的文件名稱，或是為數(shù)據(jù)庫的文件管理大費(fèi)周章，通過 ACCESS 的人性化管理接口把數(shù)據(jù)庫的管理整理，便于維護(hù)；此外，在報(bào)表的制作上也是相當(dāng)容易的，完全的視覺開發(fā)向?qū)?設(shè)計(jì)，讓人使用起來很舒服。 ? 窗體設(shè)計(jì)對象 可以設(shè)計(jì)用戶接口，用來輸入并處理數(shù)據(jù)。 第二節(jié) SQL 語言 SQL(Structured Query Language，結(jié)構(gòu)查詢語言 )是一個(gè)功能強(qiáng)大的數(shù)據(jù)庫語言。使用 SQL的常見關(guān)系數(shù)據(jù)庫管理系統(tǒng)有： Oracle、 Sybase、 Microsoft SQL Server、 Access 等等。 SQL語言有著非常突出的優(yōu)點(diǎn)， SQL語言 是非過程化 的 語言 、 統(tǒng)一的語言 、 是所有關(guān)系數(shù)據(jù)庫的公共語言 。 統(tǒng)一的語言 ： SQL可用于所有用戶的 DB活動(dòng)模型，包括系統(tǒng)管理員、數(shù)據(jù)庫管理員、 應(yīng)用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。 SQL功能強(qiáng)大，是一種完備的數(shù)據(jù)處理語言，不僅用于數(shù)據(jù)庫查詢，而且用于數(shù)據(jù)庫中的數(shù)據(jù)修改和更新，概括起來，它可以分成以下幾組： DML（ Data Manipulation Language，數(shù)據(jù)操作語言）：用于檢索或者修改數(shù)據(jù) ； DDL（ Data Definition Language，數(shù)據(jù)定義語言）： 用于定義數(shù)據(jù)的結(jié)構(gòu)，比如 創(chuàng)建、修改或者刪除數(shù)據(jù)庫對象； DCL（ Data Control Language，數(shù)據(jù)控制語言）：用于定義數(shù)據(jù)庫用戶的權(quán)限。 下面是一個(gè)簡單 SQL語句的例子： 我們使用 SQL語句來從 user_info中檢索 ‘ 用戶 ID’ 為 ‘000001’ 的 用戶 姓名： SELECT 姓名 FROM user_info WHERE用戶 ID = ‘000001’ 數(shù)據(jù)定義語言 DDL：它是用來創(chuàng)建和修改數(shù)據(jù)庫結(jié)構(gòu)的一種語句，包括 Create、 Alter和 Drop 語句。數(shù)據(jù)庫管理系統(tǒng)必須在更改期內(nèi)保護(hù)所存儲(chǔ)的數(shù)據(jù)的一致性，確保有效的數(shù)據(jù)進(jìn)入數(shù)據(jù)庫，數(shù)據(jù)庫必須保持一致性， DBMS 還必須協(xié)調(diào)多用戶的并行更新，以確保用戶和它們的更改不至于影響其它用戶的作業(yè)。多行 Insert 語句為拷貝數(shù)據(jù)提供了一種緊湊而高效的方法 。 標(biāo)準(zhǔn)語法： UPDATE table_name SET columnname1 = value1 [, columname2 = value2]... WHERE search_condition Delete 語句標(biāo)準(zhǔn)語法： DELETE FROM tablename WHERE condition 在信息管理系統(tǒng)中，我們往往會(huì)遇到歸類、匯總、映射、索引、子查詢等復(fù)雜操作，相應(yīng)的支持與實(shí)現(xiàn)如下： GROUP BY 方法 ： GROUP BY子句語法為： SELECT column1, SUM(column2) FROM listoftables GROUP BY columnlist。 第四章 系統(tǒng)設(shè)計(jì) 隨著科學(xué)技術(shù)的不斷提高 ,計(jì)算機(jī)科學(xué)日漸成熟 ,其強(qiáng)大的功能已為人們深刻 認(rèn)識 ,它已進(jìn)入人類社會(huì)的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。 第一節(jié) 系統(tǒng)功能設(shè)計(jì) 房地產(chǎn)銷售系統(tǒng) 是為了對 房地產(chǎn)銷售企業(yè) 實(shí)行計(jì)算機(jī)化的管理，以提高工作效率，方便用戶。 用戶權(quán)限 主要任務(wù)是提高系統(tǒng)安全性和 使用性，為 系統(tǒng)提供良好的維護(hù)，如用戶 管理 可以為用戶提供權(quán)限服務(wù)。 背景設(shè)置管理模塊包括：界面的顏色和圖片的自定義設(shè)置。 員工信息 模塊包括：顯示添加修改刪除查詢。 樓房類型模塊 包括：顯示添加修改刪除查詢。 樓房信息模塊包括：對新樓房添加，和現(xiàn)有的樓房信息修改查詢。 檢索信息 管理主要包括： 員工信息 包括： 所有字段的查詢，也包括模糊查詢（ like）和 Excel輸出。 第二節(jié) 系統(tǒng)結(jié)構(gòu)設(shè)計(jì) 登錄 模塊結(jié)構(gòu)流程圖：如圖 41。數(shù)據(jù)庫設(shè)計(jì)時(shí)需要綜合企業(yè)各個(gè)部門的存檔數(shù)據(jù)和數(shù)據(jù)需求，分析各個(gè)數(shù)據(jù)之間的關(guān)系，按照 DBMS 提供的功能和描述工具，設(shè)計(jì)出規(guī)模適當(dāng)、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型。關(guān)系型數(shù)據(jù)庫要盡量 按關(guān)系規(guī)范化要求進(jìn)行數(shù)據(jù)庫設(shè)計(jì)，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來決定。 數(shù)據(jù)字典設(shè)計(jì)：用數(shù)據(jù)字典描述數(shù)據(jù)庫的設(shè)計(jì)，便于維護(hù)和修改。部分表結(jié)構(gòu)如下： 房屋信息表結(jié)構(gòu)如圖：圖 46 圖 46房屋信息表 房型信息表 結(jié)構(gòu)如下：圖 47 圖 47 房型信息表 公司基本信息表：圖 48 圖 48公司基本信息表 客戶信息表：圖 49 圖 49 客戶信息表 樓房信息表：圖 410 圖 410 樓房信息表 樓盤信息表：圖 411 圖 411 樓盤信息表 銷售信息表：圖 412 圖 412 銷售信息表 員工信息表 :圖 413 圖 413員工信息表 用戶信息表：圖 414 圖 414 用戶信息表 其他的表請參考數(shù)據(jù)庫，表名如下：圖 415 圖 415表名 第五章 系統(tǒng)開發(fā)實(shí)現(xiàn) 應(yīng)用程序是用 VB 開發(fā)的，界面設(shè)計(jì)的簡單明了。 圖 51 登錄界面 根據(jù)登錄模塊的功能，管理員和普通用戶界面統(tǒng)一在一起。 數(shù)據(jù)庫的連接采用的是 ADO 對象。 \。在系統(tǒng)功能設(shè)計(jì)中，系統(tǒng)維護(hù)功能主要有添加用戶，刪除用戶，和管理員密碼修改，如圖 53 所示。管理員密碼數(shù)據(jù)庫的用戶信息表項(xiàng)里。如果系統(tǒng)已經(jīng)添加的該用戶，系統(tǒng)自動(dòng)提示，重新添加。 圖 54 用戶密碼修改 修改密碼：在舊密碼輸入你的登錄密碼，在新密碼中輸入新密碼，在新密碼核實(shí)中再輸入一次新密碼。這樣下一次再進(jìn)入本系統(tǒng)時(shí)本用戶的密碼就改為新密碼。也是本次開發(fā)的重點(diǎn)。 各按鈕的功能：（所有管理界面） ：移動(dòng)到第一條記錄。 添加：是添加一新的記錄。 修改：移動(dòng)到要修改的記錄，點(diǎn)修改，修改完后，點(diǎn)保存后就修改完畢。 圖 55 員工信息輸入界面 圖 56 信息瀏覽 第五節(jié) 查詢 查詢打印模塊包括 客戶信息 、 員工信息 、 銷售信息表，客戶報(bào)表的打印 ，查詢以客戶信息表為例，如圖 57所示。在查詢完后，可以在如圖 57 中輸出 Excel報(bào)表。 代碼實(shí)現(xiàn)請參考附錄程序源代碼。 內(nèi)存： 32MB以 上。 第二節(jié) 系統(tǒng)的維護(hù) 系統(tǒng)維護(hù)的目的是保證管理信息系統(tǒng)正常而可靠地運(yùn)行，并能使系統(tǒng)不斷得到改 善和提高，以充分發(fā)揮作用。 （ 2）適應(yīng)性維護(hù) 使系統(tǒng)適用環(huán)境的變化而進(jìn)行的維護(hù)。 本系統(tǒng)的維護(hù)模 塊 本系統(tǒng)的維護(hù)功能主要是為保證系統(tǒng)能夠正常的運(yùn)行。這些都有待進(jìn)一步改善。 1 ．本次的課題設(shè)計(jì)首先分析了管理系統(tǒng)目前在國內(nèi)外的發(fā)展?fàn)顩r及需求分析。 首先便是調(diào)研的不充分。 然后，會(huì)用了兩種軟件，如何把它們連接在一起還真是一件困難的事：選擇連接的方法就很重要，通過各方面的比較，我選擇了 ADO，通過 ADO控件與數(shù)據(jù)庫中各表進(jìn)行連接，同時(shí)也用到少數(shù)編程實(shí)現(xiàn) VB和 ACCESS數(shù)據(jù)庫的連接。 最后就是從一而終的問題了，在開發(fā)過程中我遇到了許許多多的問題，很多地方都不明白，經(jīng)常有打退堂鼓的想法，我經(jīng)常的請教同學(xué)和老師，最后的成果雖然不很完美，但我盡力了，并有所收獲。他無論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到不少的提高，即使在百忙中，抽出了很多時(shí)間對我的論文進(jìn)行的批改和修正。 給予我很大的幫助，不僅幫我解答了不少的難點(diǎn)，還給我提出了許多建議，我會(huì)以他們?yōu)榘駱樱玫嘏?。同時(shí)感謝同組成員 ,我們在一起互相討論 ,學(xué)習(xí) ,解決了不少的難題。39。密碼修改 On Error GoTo Err If Trim() And Trim() And Trim() Then If Trim() Trim() Then MsgBox 新密碼不對 !, , 提示 Exit Sub Else Dim rs1 As New If Then select * from 用戶信息表 where 用戶名稱 =39。, CN, adOpenStatic, adLockOptimistic If Not Then If Not IsNull((1)) Then If Trim() Trim((1)) Then MsgBox 用戶舊密碼不對 !, , 提示 Exit Sub Else (1).Value = Trim() MsgBox 操作已成功 !, , 提示 = = = Unload Me End If End If End If End If End If Exit Sub Err: MsgBox End Sub Private Sub Form_Load() = = = End Sub Private Sub cmdOK_Click() Unload Me End Sub Private Sub Form_Load() (1).Text = 系統(tǒng)關(guān)于 End Sub Private Sub Command1_Click() 39。 DateChange(Date) amp。退出程序 End End Sub Private Sub cmdOK_Click() 39。判斷用戶名是否為空 MsgBox 請輸入帳號！ , vbOKOnly + vbExclamation, 警告 Exit Sub End If If Trim() = Then 39。 amp。39。39。39。39。Data Source= amp。 strLook amp。 39。設(shè)置 On Error GoTo Err If = True Then = BMP 文件 |*.bmp|J