實(shí)驗(yàn)五開(kāi)發(fā)一個(gè)學(xué)生信息管理系統(tǒng)

1、實(shí)驗(yàn)五開(kāi)發(fā)一個(gè)小型管理程序進(jìn)行數(shù)據(jù)庫(kù)的管理操作-例學(xué)生信息管理系統(tǒng)SQL語(yǔ)言的能力，結(jié)合前面所學(xué)的SQL語(yǔ)言的相關(guān)知識(shí)，在-學(xué)生信息管理系統(tǒng)：一. 實(shí)驗(yàn)?zāi)康模?考察學(xué)生綜合運(yùn)用C+BUILDER環(huán)境下開(kāi)發(fā)一小型的管理系統(tǒng)二. 實(shí)驗(yàn)內(nèi)容：1. 熟悉使用C+BUILDER的表單設(shè)計(jì)及嵌入式 SQL語(yǔ)言的使用。2. 開(kāi)發(fā)一個(gè)學(xué)生信息管理系統(tǒng)負(fù)責(zé)驗(yàn)證學(xué)生登錄的賬戶名，密碼設(shè)計(jì)一個(gè)登錄窗口，年齡、籍貫等）學(xué)生信息錄入系統(tǒng)主要完成學(xué)生信息的錄入（學(xué)號(hào)、姓名、性別、力口至U STUDENT表中。學(xué)生信息查詢，主要完成可以通過(guò)學(xué)號(hào)、姓名等查證到學(xué)生的相關(guān)信息（提高點(diǎn)， 也可以查詢學(xué)生成績(jī)）學(xué)生信息修改：可以修

2、改已錄入的學(xué)生相關(guān)信息。學(xué)生信息刪除：可以按學(xué)號(hào)刪除學(xué)生相關(guān)信息（提高點(diǎn)，同時(shí)刪除其它表中該學(xué)生 相關(guān)信息。參考：一.登錄窗口的完成登錄窗口圖1登錄窗口M.t &Ln CpnponcnlposHcl? |典WfiJ"三| 電£ %F 13 IP會(huì)引3網(wǎng)3叫 3血"1 丨曲 I 匸 Mu CeIe Uqt1 日DE I ADJ | IrtciSoKl Internet Deeper CubiQ 戸雪耳L典'阿I IB 屋 區(qū)圜屢 3 窪匚至1TobolLdbdL TLdLw了an:舊石舉】岸號(hào)7圖2工具設(shè)置分別用標(biāo)簽，文本，按紐來(lái)設(shè)計(jì)，文字更改用見(jiàn)圖

3、Cttjprt TnEp<rlnr部分功能提示:1.表單調(diào)用部分:提示：調(diào)用下一表單命令Form2->Show();Form1->Hide();隱藏當(dāng)前表單命令注意要先用in elude # un it2.h包含2. 提示提示窗口 ： ShowMessage();3. 文本框取值： Form1->Edit1->Text變量取值：+變量名+ ”4. 識(shí)別為空的情況lf(Edit1->Text= ”Edit2->Text= ” ShowMessage(”用戶名或密碼不得為空 "); return;AlienalNoriAAlianirieril,

4、 laLelUustifuE 4nc也rs ,: akL曰tgkTop話衛(wèi)u匕 二3>_Bi' bdLgHrlnBjght<CaptionColor'E Cor stramt?Cursor UraoLursof LifaaMnd Dragkiode EndUtiiJ rLhcusCui ihulHfrIpCoHfrHtHlpTyp* Hinr Lasiout LHlNamePorontOiDiWod rofontColor PjrontFort PirenShewHir PfifiL ipMi=niiSHinwiAncPrirhAll ohowrI磴杲宙!二I I

5、i-lBttf xs (rSizeCenttrair 亡心dmuK crUrao dklJraa dmM anual hue(rrortt)tllop132LaLstl true true huo trueiriJR圖3屬性設(shè)置5.設(shè)置密碼屬性 能I ldpLaM _p1Il IcipTiSchtC&*bMlllnkSdcciiDnIkHintImcModcrnDairiCncImcHinc472川ih _DN-diic_EJ12OEMCQiivtIdtbPffcnfCNoJ IrjsParnCnh-fIderPapn£：ll3t)Ir1 iPacnTorVIrRkn耶卯H

6、r Ikfe臚uidCh廳 E-八'-nfii 枷IrtiknT .bn.J.Idr1登入窗口用戶名密碼圖4密碼屬性退出6.數(shù)據(jù)庫(kù)的連接：(1) 建數(shù)據(jù)連接:(2) 建數(shù)據(jù)源：ADO ->ADOQuery1-> connctionstringDataaccess->datasource->dataset =ADOquery1 見(jiàn)圖 4|<Nlone>Run Comparer t Database Tools Window Help舌 越呂斛曲d| Additional I Win321 Sustom | Access | Controls) Data

7、Snac) BDEI I B UriiUs l&Formlm iz 4 re? ra tu zzze zIlliII P-aienLDiOrf*登錄窗口Run Component Database Tools Wiidcyj 匕elppNne>e遭錄窗口鼻1PJ l£1 耳IG Ff £Kj ££ata Cortrols： 1 DafSrao 1 BDE ADOStandard 1 Additiorial | Wri32) Susten /Da自2 胡暑靈L-UL Ul U TIVT l_IV PVL TJ i 'JM 屮-.W*

8、TVinvyPl H I 0 I 1 iJ j：馥Stondoid Addtorl WrJ2 I 以曲 血汕© 咖訂 D 如二arHohl DataCnol DDE | iDO | HeriOE|L#rjjl bifi iGii'i PiaptrfieE j| Evenb目 glj fppLTCOUIc.in* ICIO t'UtT'Rs Comporent Datebase loot Wndcw Het I |<Hore>1 Fi.i riif IA?livaIsbfrA_il口匚3上Fifitk rrue hcZSire1CatTTiflrid

9、rirrrei 3D UariftKtja*!Cinftsctonbtiif置錄旨nCjitarLocMio elJ?«C(#nfil-nriin L - AIXlIjLiPt 1 ( annprnrwi*tt tliifir Safce of 匚 cnnertiDn廠 Jse UaU Ltik fikIrw Ts琨苗(£l牙HXiT屮門曰弓 QQZ 卯 froTir HaJi'aSatQ.PgflirpiLIB lLS IS rzD-ridiir 牡雖厶占屯蠱OLE IE七f尺 dac Csr cUtt SWiiJ処kUa-H+Oi-f+ DLI HE Frtxv

10、idMf Far U at-a. Lliri 111. 6o£-I. OJ_1 !£ Pir<xvi tr for J攔h；嗎 ole BS Ptuvidu fuj InMllmI 陽(yáng)曲口們 mjFfnvir邱 for OlBC RriLI F V J-uw lS* ni k TiTi Pl- ATJ-I J- «/ -f A- fl" 1.口 C BPHiCiViufC4 0 DL£ ID咄己剪玄文件按默認(rèn)文件名，選一個(gè)新目錄保存，如圖10(3)從數(shù)據(jù)庫(kù)中讀密碼語(yǔ)句An siStri ng an 1="select * fro

11、m mm"/定義SQL查詢語(yǔ)句an 1+=" where user1='"+ Edit1->Text+"”'an 1+=" and password1=”'+Edit2->Text+"”'ADOQuery1->SQL->Add(an1);將 SQL 語(yǔ)句加入到緩沖區(qū)ADOQuery1->Open();/執(zhí)行 SQL 語(yǔ)句if (ADOQuery1->RecordCou nt=O)/識(shí)別是用戶名及密碼是否正確 ShowMessage(”非法用戶名或密碼 ”)；Retur

12、n;7.文件存盤如圖9點(diǎn)文件菜單 save project asOmci ii i hOpon Project.-.R_uci penStandard Ai h lilianal | V/m：F已&C>qiiJ I 蚓 l*T Br'JL-'4：邛 IrormlCCrl-H-l 1主日"Sr匚(1view Pfoj&ct a.un io proponent與 工poleW二隔I； 7F- Pr-n* EM*r Include Unfc l-lc±-. . . Alt-h Fl 1Print,.S B orderlconeriL-B or

13、derSryleR i-ir i-|rA?iHrlnn圖9金脛 Prajectl AtD2Ac«n-L<Ei壽iX岡上鄰雋促存類型;I 再 £)I農(nóng)泊 I曙勒??！ I4圖10.綜合窗口 菜單的設(shè)計(jì)urni,:I:規(guī)入瞇菽 a詢眾入學(xué)生息杲入迎才昱ttjft禾入諧遅樣JOJHJfe 継滬迫出ZhpC IrupefTnn.子汪I聲啟堆予紋rv WI J LJ-U - U J 士 !_ I I II l_P_* _/ K* " I .513砒arxJ ftdAorc11 Wi321 Swt” 1 Doiocctj 1 Dcto Cwihob | DniaSnoj

14、| DDE I A?0 I Intwl Li if' A kJ 5f 匡 3-| 二 I矗1I汁r HCp'km hF=t*d 匸Pl總" Enabled GioLilridav keCortevI hfl 2低 F dolam 匚帕咁LiF曰諮'.Iriitaa*1 tji % (Nnnp|-hE ；，.-r- Ay:.耳-r"' Forms xidiuMchui杲人字主fS© 錄人訝世信JB 錄入選課fseX1 K XB 2i山專pNjlrw卑 T書(shū) "吐k*tiie三.信息錄入臟 ForrnS-|c x|學(xué)生信息錄入

15、.學(xué)號(hào).；：姓名性別系別清詵擇丟:I佶解:出生R期議扎判斷學(xué)號(hào)是否存在:void _fastcall TForm3:Edit1Exit(TObject *Se nder)An siStri ng an 仁"select * from stude nt where "an 1+=" sno='"+Edit1->Text+"”'龜 與 堰 市上X口-ex080qE00-_(=龜與堰帀丄X_la-寸x080qE00-_= 龜 與 堰 帀丄X_LA&x080qE00M宀Lnl2-(=鉗張龜與堰回0及=)gesslAIMOq

16、©(=張龜與堰市丄X口丄XOHOqEOOM 宀Lnl2= 矽滅睦0®囹帑申猗超0及=)gesslAIMOLI© (=H上X口-里P山-_=H上X_LL七SM _qx-b6UES一SUV 宀宀 Lnl2 -osnoo匕SA匸S -(= <緯痛刪堰申：菸3虻逾衛(wèi)超W.M=)gsslAIMOq© (Luulunoop。t alaj noodvM -Ou doA 丄 Aj noochz MLUe)pp/A-1osLenooch/ 0S_OA-1OS L 巴 nooQW'=(-=+b+_ k =±x _LLX080qE00+一 =-+qx+

17、一 =±x 口-里 SA-elwozl+一 =±x 一匸 SA-elwozl+一整呂雲(yún)=) 6ess lAIMOUS M) so_oa1laj nooch/ -OIOS。X山 alaj nooQW MLUe)pp/A-1osLAJenooch/ F+LueF+Lue F+LueF+LueF+Lue 廠)sen-ra> -upn-s olu一 tesu一-PLUTO 6u三s一suy宀廠W =Hqx)S-=球=Hqx) (LH"pe>p£0A1LU0=n80_PEtAgE0dM px 一寸x080qE00+=J+lx J_Agx080qE00+

18、=J+lx J_2xo8oqEOO"b宀Lnl2關(guān) Fcrm-1學(xué)生信息查詢篤一爭(zhēng)- 上一爭(zhēng)查詢代碼An siStri ng xb,a n1;an 1=" select * from stude nt"if(Edit1->Text!="")an 1+=" where sno='"+Edit1->Text+AD0Query1->SQL->Clear();AD0Query1->SQ L-> Add(a n1);AD0Query1-> 0pen();if (ADOQuery1-&g

19、t;RecordCou nt=O ) ShowMessage(”對(duì)不起，查無(wú)此人請(qǐng)重試！");return;第一條ADOQuery1->First();上一條AD0Query1-> Prior();下一條AD0Query1->Next(); 最后一條AD0Query1->Last();五. 學(xué)生信息修改C+- Forab學(xué)生信息修改.姓名遮回修改中查詢代碼:An siStri ng an1;if(Edit1->Text="") ShowMessage("對(duì)不起，學(xué)號(hào)不得為空”)；return;an仁"select

20、* from stude nt where sno='"+Edit1->Text+"”'ADOQuery1->SQL->Clear();ADOQuery1->SQ L-> Add(a n1);ADOQuery1-> Open();if (ADOQuery1->RecordCou nt=O ) ShowMessage("對(duì)不起，學(xué)號(hào)不正確，請(qǐng)重輸入");return;Edit2->Text=ADOQuery1->FieldValues"s name"ComboBox1

21、->Text=ADOQuery1->FieldValues"sde pt"修改代碼:if(Edit2->Text="”) ShowMessage(”對(duì)不起，姓名不得為空 ”); return;if(ComboBox1->Text="請(qǐng)選擇") ShowMessage(”對(duì)不起，選擇系部”)；return;stude ntsetAn siStri ngan 1="up datesn ame='"+Edit2->Text+"' ,sdept=”'+ComboBox1

22、->Text+"”'an1+= " where sno='"+Edit1->Text+"'"ADOQuery1->SQL->Clear();ADOQuery1->SQ L-> Add(a n1);ADOQuery1->ExecSQL();ShowMessage("修改成功！ ”)；六. 信息刪除f vn41學(xué)生信息刪除慵吏詞粧A學(xué)號(hào)查詢近回刪除查詢代碼:An siStri ng an1;if(Edit1->Text="”) ShowMessage(”對(duì)不

23、起，學(xué)號(hào)不得為空”)；return;an 1=" select * from stude nt where sno='"+Edit1->Text+""' ADOQuery1->SQL->Clear();ADOQuery1->SQ L-> Add(a n1);ADOQuery1-> Open();if (ADOQuery1->RecordCou nt=O ) ShowMessage("對(duì)不起，學(xué)號(hào)不正確，請(qǐng)重輸入");return;刪除代碼int aa;aa=MessageBox

24、(NULL,"真的要?jiǎng)h除嗎","刪除窗口 ",4);if(aa=6)An siStri ng an 1=" delete from stude nt where sno="'+Edit1->Text+"'"ADOQuery1->SQL->Clear();ADOQuery1->SQ L-> Add(a n1);ADOQuery1->ExecSQL();ShowMessage("刪除成功！ ”)；elsereturn;七. 統(tǒng)計(jì):FlilmT學(xué)生信息統(tǒng)計(jì)統(tǒng)計(jì)

25、代碼:An siStri ng an1;an 1=" select count(*) as 學(xué)生人數(shù)，avg(2014-year(csrq) as 平均年齡 from student "ADOQuery1->SQL->Clear();ADOQuery1->SQ L-> Add(a n1);ADOQuery1-> Open();if (ADOQuery1->RecordCou nt=O ) ShowMessage(”對(duì)不起，目前沒(méi)有學(xué)生 ”)；return;八.修改密碼:fforab: 匚 -八:密碼設(shè)置二:*用戶帳號(hào)；I 二 0*新岔碼：

26、:if(Edit1->Text="" |Form6->Edit2->Text="”)")；修改密碼代碼： ShowMessage(”對(duì)不起，用戶名或密碼不得為空 return;ifEdit3->Text="" |Form6->Edit4->Text="")”); ShowMessage(”對(duì)不起，輸入新密碼也不能為空 return; if(Edit3->Text!=Form6->Edit4->Text) ShowMessage("兩次密碼不一致”)； return;ADOQuery1->SQ L->Clear();An siStri ng an 仁"select * from mm"an 1+=" where user1-&quo