數(shù)據(jù)庫說明書

1、小小小小小小小小小小小小小小小小實踐教學小小小小小小小小小小小小小小小小小蘭州理工大學2011年春季學期數(shù)據(jù)庫課程設計高校學生成績管理系統(tǒng)計算機科學與技術（5）高校學生成績管理系統(tǒng)計算機科學與技術（5）*J*J*J*J*J*J*J*J個個個個個個個個 參考文獻1張海藩，軟件工程導論M清華大學出版社2薩師煊，王珊，數(shù)據(jù)庫系統(tǒng)概論M3完全掌握SQLServer2000美,機械工業(yè)出版社PowerBuilder9數(shù)據(jù)庫項目案例導航清華大學出版社數(shù)據(jù)庫管理系統(tǒng)美,清華大學出版社致謝我能夠在短短的兩周的時間內(nèi)完成數(shù)據(jù)庫的課程設計，單靠我一個人的力量顯然是不夠的，有太多的人給予了我不同形式的幫助,在這里我

2、要感謝的人很多。首先，我要感謝所有給過我?guī)椭耐瑢W，包括小組成員的幫助，感謝機房老師和學校給我們提供了上機環(huán)境，更要感謝我的任課老師還有我的指導老師，是他們的耐心指導和督促讓我比較順利地完成了本次數(shù)據(jù)庫的課程設計，本次課程設計不僅讓我通過本次課程設計鞏固了學過的知識,還讓我學到了一些新的東西。在我收獲得背后除了這些人,還有那些默默給我?guī)椭椭С值娜?也感謝他們！附件I部分原程序代碼一.(4)主程序：SETTALKOFFSETECHOOFFSETDOHISTORYOFFSETEXACTONSETDELETEONSETDATETOANSILONGSETEXCLOFFCLOSEDATABASESET

3、SYSMENUAUTOSETSYSMENUTOSETSYSMENUOFFSETSTATUSOFFSETSTATUSBAROFFSETSAFEOFFSETCENTON_SCREEN.VISIBLE=.F.*_SCREEN.WINDOWSTATE=2*_SCREEN.PICTURE=PICTUREBACKGROUND.BMP*_SCREEN.ICON=PICTUERNetworkNeighbourhood.ico*cCaption=學生檔案管理信息系統(tǒng)程序：寇宏偉*DECLAREINTEGERFindWindowINwin32apiSTRINGcClass,STRINGcCaption*IFFin

4、dWindow(0,cCaption)#0*_SCREEN.CAPTION=cCaption*二MESSAGEBOX(程序已經(jīng)運行，請注意任務欄！“，16,程序：AYongSoft:QUITRETURN.F.*ENDIF*_SCREEN.CAPTION=cCaptionDOFORM身份驗證READEVENTS二.成績管理表單的程序代碼：(1)顯示名次：IFTHISFORM.COMMAND1.CAPTION:”顯示名次(T)”THISFORM.COMMAND1.CAPTION:”隱藏名次(H)”IFLEN(ALLT(THISFORM.CD1.VALUE)#0LCMSG=正在生成數(shù)據(jù)，請稍候.WA

5、ITWINDOWLCMSGNOCLEARNOWAITATSROW()/2,(SCOLS()-LEN(LCMSG)/2SELE*FROM成績表WHEREALLT(成績表.課程代碼):二*“INTOTABLETMPLS1SELELSCJB.*,LS1.成績AS總成績，LS1.成績AS名次FROMLSCJBLEFTOUTERJOINLS1;ONLSCJB.考號二LS1.考號INTOTABLETMPLS2&目的是在LS2表中加上總成績和名次兩個字段REPLALL總成績WITH0,名次WITH0&將所有NULL值記錄賦值0SELELS1USESELELS2M_ZDS=FCOUNT()&記錄字段數(shù)SCAN

6、M_SUM=0&M_SUM用于存放當前學生考試成績之和FORi=3TOM_ZDS-2M_Field=Field(i)M_SUM=M_SUM+&M_FieldENDFORREPL總成績WITHM_SUMENDSCANSELE*FROMLS2ORDERBY總成績DESCINTOTABLETMPLS3SELELS2USESELELS3REPLALL名次WITHRECN()M_MC=1M_CJ二總成績SCANIF總成績二M_CJREPL名次WITHM_MCELSEM_MC;名次M_CJ二總成績REPL名次WITHM_MCENDIFENDSCANTHISFORM.GRID1.RECORDSOURCE=L

7、S3SELELSCJBUSESELE*FROMLS3ORDERBY名次INTOTABLETMPLSCJBSELELS3ENDIFELSETHISFORM.CD1.VALIDENDIFTHISFORM.REFRESH(2)退出：RELETHISFORM三.成績錄入表單中的代碼：(1)成績錄入：SETSAFEOFFTHISFORM.CD3.ENABLED=.F.IFLEN(ALLT(THISFORM.CD1.VALUE)#0ANDLEN(ALLT(THISFORM.CD3.VALUE)#0&如果此前已錄入或修改過考試成績，則將新成績保存到成績表中。LCMSG:正在保存數(shù)據(jù).WAITWINDOWLC

8、MSGNOCLEARNOWAITATSROW()/2,(SCOLS()-LEN(LCMSG)/2SELE成績表DELEFORSUBST(考號,1,8)=ALLT(THISFORM.CD1.VALUE)ANDALLT(課程代碼)=ALLT(THISFORM.CD3.VALUE)PACKSELE臨時成績表SCANM_KH;ALLT(考號)M_KCDM=ALLT(THISFORM.CD3.VALUE)M_CJ二成績SELEAPPESELEAPPEREPLSELEBLANK考號WITHM_KH,課程代碼WITHM_KCDM,成績WITHM_CJ臨時成績表ENDSCANWAITCLEAENDIFTHISFORM.GRID1.RECORDSOURCE二課程表”&置空GRID1,并將界面中各控件賦初值SELE臨時成績表ZAPGOTOPTHISFORM.GRID1.COLUMNCOUNT=3THISFORM.GRID1.RECORDSOURCE=”臨時成績表”THISFORM.GRID1.COLUMN1.CONTROLSOURCE=”臨時成績表.考號”THISFORM.GRID1.COLUMN2.CONTROLSOURCE=”臨時成績表.姓名“THISFORM.GRID1.COLUMN3.CONTROLSOURCE=”臨時成績表.成績”THISFORM.CD1.VALUE