《信息系統(tǒng)開發(fā)》實(shí)驗(yàn)報(bào)告

《《信息系統(tǒng)開發(fā)》實(shí)驗(yàn)報(bào)告》由會(huì)員分享，可在線閱讀，更多相關(guān)《《信息系統(tǒng)開發(fā)》實(shí)驗(yàn)報(bào)告（15頁珍藏版）》請(qǐng)?jiān)谘b配圖網(wǎng)上搜索。

1、主考教師： 信息系統(tǒng)開發(fā)實(shí)驗(yàn)報(bào)告成績： 報(bào)考專業(yè)：計(jì)算機(jī)信息管理（獨(dú)立本科段）準(zhǔn)考證號(hào)： * 考生姓名： * 考核地點(diǎn)：河北省* 河北省自考“計(jì)算機(jī)信息管理（獨(dú)立本科段）”專業(yè)實(shí)驗(yàn)報(bào)告 市 考核單位（蓋章） 成 績指導(dǎo)教師姓名： * 準(zhǔn)考證號(hào)： * 實(shí)驗(yàn)地點(diǎn)： * 實(shí)驗(yàn)課程： 信息系統(tǒng)開發(fā) 實(shí)驗(yàn)名稱： 信息系統(tǒng)的開發(fā)（設(shè)備管理系統(tǒng)） 實(shí)驗(yàn)?zāi)康模和ㄟ^實(shí)際建立一個(gè)完整的信息系統(tǒng)來加深對(duì)信息系統(tǒng)開發(fā)理論知識(shí)的理解與認(rèn)識(shí)，掌握和解決信息系統(tǒng)規(guī)劃、分析、設(shè)計(jì)、實(shí)施、運(yùn)行與測(cè)試等實(shí)際問題的能力。 實(shí)驗(yàn)設(shè)備：一、 軟件環(huán)境：中文Windows XP，PowerBuilder9.0，SQL Anywhere二

2、、 硬件環(huán)境：586以上的PC系列機(jī)，內(nèi)存512M，硬盤空閑空間大于1G實(shí)驗(yàn)內(nèi)容、步驟、圖形與結(jié)論（答題不要超過裝訂線，可另附白紙書寫）：實(shí)驗(yàn)內(nèi)容為某企業(yè)設(shè)計(jì)一個(gè)設(shè)備管理系統(tǒng)問題描述：請(qǐng)為某企業(yè)設(shè)計(jì)一個(gè)設(shè)備管理系統(tǒng)。手式管理用的記錄表有： 設(shè)備信息表，內(nèi)容包括：設(shè)備編號(hào)、設(shè)備名稱、設(shè)備類型、規(guī)格型號(hào)、數(shù)量、總價(jià)值、產(chǎn)地。 設(shè)備類型表，內(nèi)容包括：設(shè)備類型編號(hào)、設(shè)備類型。功能需求：設(shè)備信息的瀏覽、添加、刪除、保存操作。設(shè)備類型的瀏覽、添加、刪除、保存操作。按設(shè)備編號(hào)進(jìn)行查詢。按設(shè)備類型進(jìn)行設(shè)備數(shù)量統(tǒng)計(jì)。對(duì)于各種數(shù)據(jù)進(jìn)行升序和降序的排序操作。折舊率計(jì)算。上機(jī)考試要求：1根據(jù)問題描述，設(shè)計(jì)出設(shè)備信息表

3、SBXX和設(shè)備類型表SBLX的表結(jié)構(gòu)，并定義它們的主鍵和外鍵。解：根據(jù)設(shè)備管理系統(tǒng)問題分析描述，并結(jié)合系統(tǒng)所要滿足的功能需求，借助E-R圖等工具設(shè)計(jì)出設(shè)備管理系統(tǒng)的數(shù)據(jù)庫表結(jié)構(gòu)。 根據(jù)設(shè)備信息表所給出的信息，設(shè)計(jì)出設(shè)備信息表SBXX，表結(jié)構(gòu)如下所示：表1 設(shè)備信息表SBXX列標(biāo)題列名數(shù)據(jù)類型寬度小數(shù)位數(shù)是否空值缺省值主/外鍵設(shè)備編輯SbbhChar4NoP設(shè)備名稱SbmcChar20No類型編號(hào)LxbhChar4NoF規(guī)格型號(hào)GgxhChar20Yes數(shù)量SlIntegerYes總價(jià)值ZjzNumber102Yes產(chǎn)地CdChar10Yes 根據(jù)設(shè)備類型表所給出的信息，設(shè)計(jì)出設(shè)備類型表SBLX

4、，表結(jié)構(gòu)如下所示：表2 設(shè)備類型表SBLX列標(biāo)題列名數(shù)據(jù)類型寬度小數(shù)位數(shù)是否空缺省值主/外鍵類型編號(hào)LxbhChar4NoP類型名稱LxmcChar20No2在D盤的考核目錄下創(chuàng)建名為Sbgl的數(shù)據(jù)庫。在庫中創(chuàng)建設(shè)備信息表sbxx和設(shè)備類型sblx，并設(shè)置其主鍵和外鍵。解：n 創(chuàng)建名為Sbgl的數(shù)據(jù)庫：（1） 開始程序SybasePowerBuilder 9.0 PowerBuilder 9.0打開主窗口。（2） 單擊工具欄的Database按鈕（打開數(shù)據(jù)庫畫板）打開ODB ODBC再打開Utilities雙擊Create ASA Database，在打開的對(duì)話框中的“Database Nam

5、e”編輯框中輸入數(shù)據(jù)庫名，并通過“”按鈕輸入數(shù)據(jù)的全路徑（D:考核Sbgl.db），其他可保持默認(rèn)；最后，單擊“OK”按鈕，系統(tǒng)將成功創(chuàng)建數(shù)據(jù)庫Sbgl。運(yùn)行結(jié)果如下圖（1）所示：圖（1）n 在庫中創(chuàng)建設(shè)備信息表sbxx和設(shè)備類型sblx，并設(shè)置其主鍵和外鍵（1） 在Sbgl數(shù)據(jù)庫中建立設(shè)備信息表Sbxx：右擊數(shù)據(jù)庫畫板的table文件夾New Table出現(xiàn)創(chuàng)建表結(jié)構(gòu)的界面根據(jù)表1添加并定義字段Exit(Save change to?)是(Y)輸入表名SbxxOK。（2） 用同樣的方法，在Sbgl數(shù)據(jù)庫中建立設(shè)備類型表Sblx（3） 為數(shù)據(jù)表指定主鍵： 在表Sbxx中設(shè)置主鍵Sbbh：選中數(shù)

6、據(jù)表Sbxx，右擊鼠標(biāo)并在彈出的快捷菜單中左擊Add to layout；在打開的畫板中，右擊表結(jié)構(gòu)Sbxx的標(biāo)題欄并在彈出的快捷菜單中左擊NewPrimary Key，在彈出的列表框中選擇字段Sbbh作為主鍵。 用同樣的方法，為表Sblx指定主鍵lxbh（4） 為數(shù)據(jù)表Sbxx指定外鍵：在表Sbxx的結(jié)構(gòu)中，右擊標(biāo)題欄并在彈出的快捷菜單中左擊NewForeign Key，在彈出的對(duì)話框的General選項(xiàng)卡中，在Foreign Key右側(cè)輸入外鍵名Lxbh，并在下方的列表框中選擇字段Lxbh作為外鍵字段。在Primary Key選項(xiàng)卡中，在Table右側(cè)指定參照的表名為Sblx，保存所做設(shè)置

7、。得到的表結(jié)構(gòu)如圖（2）所示：圖（2）3創(chuàng)建一個(gè)名為exam的應(yīng)用程序?qū)ο?，其?yīng)用程序文件名為exam.pbl。解：(1) 先建一個(gè)工作空間Sbgl.pbw：在工具欄中單擊New按鈕Workspace選項(xiàng)卡WorkspaceOK選擇路徑D:/考核，并在“文件名”右側(cè)輸入文件名Sbgl，然后保存。(2) 再建應(yīng)用程序?qū)ο骵xam.pbl：在工具欄中單擊New按鈕Target選項(xiàng)卡Application圖標(biāo)OK在“Application Name”中輸入“exam”；在“Library:”中選擇路徑為：D:/考核，得到圖（3）的形式，再單擊Finish按鈕。圖（3）4在該應(yīng)用中創(chuàng)建一個(gè)菜單m_ma

8、in，其結(jié)構(gòu)如下：升序降序 設(shè)備管理系統(tǒng)系統(tǒng) 編輯 操作設(shè)備管理設(shè)備瀏覽設(shè)備類型退出 添加刪除保存 設(shè)備編輯查詢?cè)O(shè)備類型統(tǒng)計(jì)排序折舊計(jì)算并為“添加”、“刪除”、“保存”、“設(shè)備編號(hào)查詢”、“設(shè)備類型統(tǒng)計(jì)”、“退出”分配圖標(biāo)，形成如下所示的工具欄。解：n 在工具欄中單擊New按鈕PB Object選項(xiàng)卡 Menu圖標(biāo)OK在彈出的菜單設(shè)計(jì)區(qū)域設(shè)置菜單項(xiàng)：（1） 設(shè)置主菜單項(xiàng)“系統(tǒng)”“編輯”“操作” ： 在左窗格中右擊“Untitled0”在彈出的快捷菜單中選擇“Insert Submenu Item”在編輯框中輸入一級(jí)菜單項(xiàng)“系統(tǒng)” 用同樣的方法，設(shè)置其他主菜單項(xiàng)“編輯”、“操作”。（2） 設(shè)置下

9、拉菜單：A. 設(shè)置主菜單項(xiàng)“系統(tǒng)”下的下拉菜單： 右擊菜單項(xiàng)“系統(tǒng)”在彈出的快捷菜單中選擇“Insert Submenu Item”在編輯框中輸入“設(shè)備管理” 用同樣的方法，設(shè)置其他子菜單項(xiàng)“設(shè)備瀏覽”、“設(shè)備類型”、“-”“退出”?！?”為分隔線的設(shè)置方法B用同樣的方法，設(shè)置主菜單項(xiàng)“編輯”、“操作”下的下拉菜單。（3） 設(shè)置主菜單“操作”的下拉菜單中的菜單項(xiàng)“排序”的子菜單： 右擊“排序”在彈出的快捷菜單中選擇“Insert Submenu Item” 在編輯框中輸入子菜單項(xiàng)“升序” 用同樣的方法，設(shè)置子菜單項(xiàng)“降序”。n 為“添加”、“刪除”、“保存”、“設(shè)備編號(hào)查詢”、“設(shè)備類型統(tǒng)計(jì)”

10、、“退出”分配圖標(biāo)，形成相應(yīng)的工具欄。 單擊選中“添加”在右側(cè)的菜單描繪器中選擇TooBar選項(xiàng)卡設(shè)置ToolbaritemName屬性的屬性值，在右側(cè)的下拉列表框中找到相應(yīng)的圖標(biāo)，即可生成工具欄中一個(gè)圖標(biāo)。 用同樣的方法分別設(shè)置工具欄的其他項(xiàng)。n 在右側(cè)的菜單描繪器中選擇TooBar選項(xiàng)卡設(shè)置其ToolBarItemSpace和ToolBarItemOrder項(xiàng)來分組，并確定在工具欄中的先后順序。（3） 單擊菜單File 選擇“Save”在彈出的對(duì)話框中為所建菜單取名為“m_main”O(jiān)K。生成的菜單結(jié)構(gòu)如圖（4）所示：圖（4）5在該應(yīng)用中創(chuàng)建一個(gè)MDI主窗口w_main，標(biāo)題為“設(shè)備管理系

11、統(tǒng)”。解：（1）在工具欄中單擊New按鈕PB Object選項(xiàng)卡 Window圖標(biāo)OK在彈出的窗口設(shè)計(jì)區(qū)域右側(cè)的屬性欄中設(shè)置以下幾項(xiàng)屬性（在General選項(xiàng)卡中）：（1） Title：設(shè)備管理系統(tǒng)（2） Window type：mdi!（3） 單擊File菜單Save在彈出的對(duì)話框中為所建MDI主窗口取名為“w_main”O(jiān)K。6建立MDI主窗口w_main與菜單m_main的關(guān)聯(lián)。解：在窗口設(shè)計(jì)區(qū)域右側(cè)的屬性欄中，在General選項(xiàng)卡中，設(shè)置Menuname屬性單擊右側(cè)的“”按鈕在彈出的對(duì)話框中選擇上題中所建菜單“m_main”。7請(qǐng)創(chuàng)建一個(gè)新窗體w_sb，設(shè)置窗口標(biāo)題為“設(shè)備信息”。解

12、：在工具欄中單擊New按鈕PB Object選項(xiàng)卡 Window圖標(biāo)OK在彈出的窗口設(shè)計(jì)區(qū)域右側(cè)的屬性欄中設(shè)置新窗體的Title屬性（在General選項(xiàng)卡中）為：設(shè)備信息。單擊File菜單Save在彈出的對(duì)話框中為所建MDI主窗口取名為“w_sb”O(jiān)K。8向窗口w_sb內(nèi)添加一個(gè)數(shù)據(jù)窗口控件dw_1。解：單擊工具欄中的StaticText圖標(biāo)右側(cè)向下的黑色三角按鈕在彈出的面板中選擇“Create DataWindow Control”在窗體中單擊，可看到添加數(shù)據(jù)窗口控件成功，并且默認(rèn)名字為dw_1拖動(dòng)鼠標(biāo)，將數(shù)據(jù)窗口控件調(diào)整為合適大小，保存并退出。9創(chuàng)建一個(gè)數(shù)據(jù)窗口對(duì)象d_sbxx，其顯示風(fēng)

13、格是Grid，數(shù)據(jù)源選取數(shù)據(jù)表sbxx的全部列。解：(1) 在工具欄中單擊New按鈕DataWindow選項(xiàng)卡 Grid圖標(biāo)OK(2) 在選擇數(shù)據(jù)源對(duì)話框中選擇Quick Select類型的數(shù)據(jù)源，再按Next按鈕，選擇表sbxx中的所有字段，按Add AllOKNextFinish。即可看到數(shù)據(jù)窗口的模樣。(3) 退出時(shí)，為數(shù)據(jù)窗口對(duì)象命名為d_sbxx。10將窗口w_sb的數(shù)據(jù)窗口控件dw_1與數(shù)據(jù)窗口對(duì)象d_sbxx相關(guān)聯(lián)。解：打開窗口w_sb單擊選中窗口中的數(shù)據(jù)窗口控件dw_1在右側(cè)的屬性欄中選擇General選項(xiàng)卡設(shè)置其DataObject屬性：單擊右側(cè)的“”按鈕在彈出的對(duì)話框中選擇

14、數(shù)據(jù)窗口對(duì)象d_sbxxOK。至此，已將窗口w_sb的數(shù)據(jù)窗口控件dw_1與數(shù)據(jù)窗口對(duì)象d_sbxx相關(guān)聯(lián)。11編寫代碼，使得單擊菜單“設(shè)備管理”時(shí)，以工作表方式（MDI子窗口）打開w_sb。解：(1) 打開應(yīng)用程序?qū)ο骵xam.pbl，在應(yīng)用程序?qū)ο骵xam.pbl的Open事件中加入如下代碼：SQLCA.DBMS=ODBC /設(shè)置事務(wù)對(duì)象SQLCA屬性SQLCA.AutoCommit=False /定義程序是手工提交事務(wù)SQLCA.DBParm=Connectstring=DSN=sbgl /DBMS所需的額外信息CONNECT USING SQLCA; /連接數(shù)據(jù)庫If SQLCA.SQ

15、LCode0 Then /判斷是否連接成功MessageBox(數(shù)據(jù)庫連接失??！,SQLCA.SQLErrText,StopSign!,OK!)ELSEOPEN(w_main)END IF 所加代碼窗口如圖（5）所示：圖（5）(2) 在應(yīng)用程序?qū)ο骵xam.pbl的Close事件中加入如下代碼：DISCONNECT USING SQLCA; /斷開與數(shù)據(jù)庫的連接IF SQLCA.SQLCode0 Then /判斷斷開是否成功MessageBox(數(shù)據(jù)庫斷開失??！,SQLCA.SQLErrText,StopSign!,OK!)End If所加代碼窗口如圖（6）所示：圖（6）(3) 打開菜單對(duì)象m

16、_main，在“設(shè)備管理”菜單項(xiàng)上單擊畫板工具欄上的Script圖標(biāo)，打開代碼編輯器，為其Clicked事件加入如下代碼：OpenSheet(w_sb,w_main,2,cascaded!) /以工作表的方式打開窗口w_sb所加代碼如圖（7）所示：圖（7）(4) 打開窗口w_sb，在窗口w_sb的Open事件中寫腳本：dw_1.settransobject(sqlca) /給數(shù)據(jù)窗口控件DW_1設(shè)置通訊區(qū)域sqlcadw_1.retrieve() /從數(shù)據(jù)庫的SBXX表中檢索全部數(shù)據(jù)單擊工具欄上的Run圖標(biāo)運(yùn)行程序在彈出的“設(shè)備管理系統(tǒng)”窗口中單擊 “系統(tǒng)”菜單單擊菜單項(xiàng)“設(shè)備管理”，則以工作

17、表方式打開窗口w_sb。運(yùn)行情況如下圖（8）所示：圖（8）12編寫代碼，使得在打開“設(shè)備管理”窗口后，單擊菜單項(xiàng)“添加”、“刪除”和“保存”，在當(dāng)前活動(dòng)窗體（w_sb）內(nèi)的數(shù)據(jù)窗口dw_1實(shí)現(xiàn)數(shù)據(jù)的“添加”、“刪除” 和“保存”功能。解：(1) 打開菜單對(duì)象m_main，在“編輯”主菜單下單擊選中“添加”菜單項(xiàng)，單擊畫板工具欄上的Script圖標(biāo)，打開代碼編輯器，為其Clicked事件加入如下代碼：window actsheet actsheet=w_main.GetActiveSheet() /取得當(dāng)前活動(dòng)窗口if isvalid(actsheet) thenactsheet.trigger

18、event(ue_add) /存在活動(dòng)窗口時(shí),觸發(fā)活動(dòng)窗口的ue_add事件else /不存在活動(dòng)窗口時(shí)messagebox(警告,請(qǐng)先打開一個(gè)管理窗口!)end if所加代碼窗口如圖（9）所示：圖（9）（2）打開菜單對(duì)象m_main，在“編輯”主菜單下單擊選中“刪除”菜單項(xiàng)，單擊畫板工具欄上的Script圖標(biāo)，打開代碼編輯器，為其Clicked事件加入如下代碼：window actsheetactsheet=w_main.getactivesheet() /取得當(dāng)前活動(dòng)窗口if isvalid(actsheet) thenactsheet.triggerevent(ue_del) /存在活動(dòng)

19、窗口時(shí),觸發(fā)活動(dòng)窗口的ue_del事件else /不存在活動(dòng)窗口時(shí)messagebox(警告,請(qǐng)先打開一個(gè)活動(dòng)窗口!)end if所加代碼窗口如圖（10）所示：圖（10）（3）打開菜單對(duì)象m_main，在“編輯”主菜單下單擊選中“保存”菜單項(xiàng)，單擊畫板工具欄上的Script圖標(biāo)，打開代碼編輯器，為其Clicked事件加入如下代碼：window actsheetactsheet=w_main.Getactivesheet() /取得當(dāng)前活動(dòng)窗口if isvalid(actsheet) thenactsheet.triggerevent(ue_save) /觸發(fā)活動(dòng)窗口的ue_save事件else

20、 /不存在活動(dòng)窗口時(shí)messagebox(警告,請(qǐng)先打開一個(gè)管理窗口!)end if所加代碼窗口如圖（11）所示：圖（11）(4) 打開設(shè)備信息窗口w_sb，自定義一個(gè)用戶事件ue_add，設(shè)置Event Name為“ue_add”，設(shè)置Event ID為空。打開設(shè)備信息窗口w_sb的代碼編輯器，選擇用戶事件ue_add，加入如下代碼：dw_1.retrieve() /從數(shù)據(jù)庫的SBXX表中檢索全部數(shù)據(jù)long therow therow=dw_1.insertrow(0) /在SBXX表的尾部插入一行dw_1.scrolltorow(dw_1.rowcount() /在指定行設(shè)置為當(dāng)前行dw

21、_1.setfocus() /將焦點(diǎn)設(shè)置到控件DW_1所加代碼窗口如圖（12）所示：圖（12）(5) 打開設(shè)備信息窗口w_sb，自定義一個(gè)用戶事件ue_del，設(shè)置Event Name為“ue_del”，設(shè)置Event ID為空。打開設(shè)備信息窗口w_sb的代碼編輯器，選擇用戶事件ue_del，加入如下代碼：integer ii=messagebox(提示信息,確認(rèn)要?jiǎng)h除行?,exclamation!,yesnocancel!)if i=1 then dw_1.deleterow(0) /刪除當(dāng)前行end if if dw_1.update()=1 thencommit;elserollback

22、;messagebox(錯(cuò)誤,數(shù)據(jù)庫內(nèi)容刪除失敗)end if dw_1.retrieve() /刷新顯示所加代碼窗口如圖（13）所示：圖（13）(6) 打開設(shè)備信息窗口w_sb，自定義一個(gè)用戶事件ue_save，設(shè)置Event Name為“ue_save”，設(shè)置Event ID為空。打開設(shè)備信息窗口w_sb的代碼編輯器，選擇用戶事件ue_save，加入如下代碼：if dw_1.update()=1 then /實(shí)現(xiàn)保存功能commit;elserollback;messagebox(錯(cuò)誤,數(shù)據(jù)庫內(nèi)容更新失敗)end ifdw_1.retrieve() /刷新顯示所加代碼窗口如圖（14）所示：圖（14）（7）單擊工具欄上的Run圖標(biāo)運(yùn)行程序在彈出的“設(shè)備管理系統(tǒng)”窗口中單擊 “系統(tǒng)”菜單單擊菜單項(xiàng)“設(shè)備管理”單擊“編輯”菜單中的“添加”添加一條記錄單擊“編輯”菜單中的“保存”保存新加記錄。系統(tǒng)運(yùn)行情況如下圖（15）所示：圖（15）添加一條記錄（8）刪除新加記錄：單擊“編輯”菜單中的“刪除”系統(tǒng)運(yùn)行情況如下圖（16）所示：圖（16）14