pb數(shù)據(jù)庫(kù)應(yīng)用課程設(shè)計(jì)——學(xué)生信息管理系統(tǒng)(編輯修改稿)
2025-02-14 12:09 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 tIDChar(10)學(xué)院編號(hào)DepatmentNameVarchar(50)學(xué)院名字departmentHeadChar(10)院主任在應(yīng)用程序?qū)ο蟮腛pen 事件中輸入如下代碼：//從配置參數(shù)文件中讀取連接數(shù)據(jù)庫(kù)所需的參數(shù)// Profile SMSstudent = MSS Microsoft SQL Server = SMSstudent = 88888888 = GPC = sa = False = //連接數(shù)據(jù)庫(kù)Connect Using SQLCA。If 0 THEN messagebox(數(shù)據(jù)庫(kù)連接出錯(cuò),)else open(w_login) end if，定義全局變量string gs_username,gs_usertype,gs_mypassword用于應(yīng)用程序不同對(duì)象間參數(shù)的傳遞。為了系統(tǒng)的安全，在進(jìn)入系統(tǒng)之前首先會(huì)出現(xiàn)一個(gè)登錄模塊，用戶只有在輸入正確的用戶名和正確的密碼之后，才能進(jìn)入系統(tǒng)。用戶登錄頁(yè)面用來(lái)輸入用戶名和密碼。圖23用戶登陸窗口判斷身份查找數(shù)據(jù)庫(kù)中對(duì)應(yīng)的記錄成功YN錯(cuò)誤提示登錄主界面圖24登陸頁(yè)面流程圖用戶登錄系統(tǒng)窗口的是用戶和管理員進(jìn)入系統(tǒng)的唯一通道，它是進(jìn)入應(yīng)用系統(tǒng)的喉舌，在安全保密、系統(tǒng)維護(hù)中占有重要的地位，登錄系統(tǒng)在外觀界面上一定要美觀、友好，登錄系統(tǒng)就是要驗(yàn)證當(dāng)前的用戶名是否與該用戶密碼一致，保留登錄痕跡等工作。保留登錄痕跡：根據(jù)操作局部性原理，一般情況下用戶上次登錄之后還會(huì)繼續(xù)登錄，因此在程序中可以依照人機(jī)交互界面友好性原則保留用戶登錄時(shí)的用戶名，控件sle_1用來(lái)顯示用戶名，profilestring是一個(gè)函數(shù)，用來(lái)讀取profile文件中一組參數(shù)，核心代碼如下:=profilestring(,user,username,)if trim() then ()end if學(xué)生管理模塊可以查看學(xué)生的學(xué)號(hào)、姓名、性別、出生日期、電話等學(xué)生的基本信息，并能進(jìn)行添加、修改和刪除。在新增狀態(tài)可以添加新的學(xué)生基本信息。設(shè)計(jì)時(shí)我盡可能設(shè)想各種邊界條件，如記錄為空，輸入為空，輸入出錯(cuò)等，當(dāng)輸入的信息滿足這些邊界條件時(shí)，將會(huì)彈出一個(gè)提示框提醒用戶，以便用戶能及時(shí)地做出修改。添加的信息將全部存儲(chǔ)到數(shù)據(jù)庫(kù)中。圖25學(xué)生信息窗口（1）顯示數(shù)據(jù)窗口選中的數(shù)據(jù)到相應(yīng)的編輯框由于數(shù)據(jù)窗口是不允許數(shù)據(jù)進(jìn)行直接修改，因此首先選中數(shù)據(jù)雙擊鼠標(biāo)到相應(yīng)的編輯框，再進(jìn)行修改。核心代碼如下if row0 then =[row] …… =修改end if(2) 數(shù)據(jù)庫(kù)插入、修改及刪除數(shù)據(jù)運(yùn)用數(shù)據(jù)庫(kù)的INSERT、UPDATE及DELETE子句進(jìn)行操作。、 。核心代碼如下：select studentID into :li_id from student where studentID=:li_id。if =新增 then if =0 then messagebox(提示,學(xué)號(hào)重復(fù)) end if INSERT INTO student( studentID, ……) VALUES ( :, …… ) 。 else// 修改信息 lyesno=messagebox(39。提示39。,39。是否修改當(dāng)前信息？39。,question!,yesno!) if lyesno=2 then return li_id=trim()。 UPDATE student SET studentName=:, ……, WHERE studentID=:li_id。// 刪除信息
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號(hào)-1