學(xué)校教材訂購系統(tǒng)課程設(shè)計

軟件工程課程設(shè)計題目 學(xué)校教材訂購系統(tǒng) 學(xué)院 嘉興學(xué)院 專業(yè) 信息管理和信息系統(tǒng) 班級 信息N052 學(xué)號 01 07 15 學(xué)生姓名 顏幼幼徐晶俞麗 扌指導(dǎo)教師 張云 編寫日期 2009年2月21日 一、開發(fā)計劃：1、系統(tǒng)敘述在21世紀的今天，隨著計算機技術(shù)和計算機網(wǎng)絡(luò)的發(fā)展，人們逐漸開始步入信息時代。通過Internet網(wǎng)絡(luò)人們可以瀏覽各類信息，發(fā)送電子郵件，傳送文件，參與BBS，網(wǎng)上娛樂，遠程教育，遠程醫(yī)療。人們?nèi)粘９ぷ?，生活中的許多事情都已經(jīng)可以在網(wǎng)上輕松簡單的完成?；ヂ?lián)網(wǎng)因為它簡單的操作和強大的信息量，逐漸成為了人們工作中的好幫手和生活中不可缺少的重要組成部分。近年來，互聯(lián)網(wǎng)也開始涉及學(xué)校的教材訂購，教材訂購系統(tǒng)近幾年在各高校逐漸得到廣泛的應(yīng)用。但有些教材征訂系統(tǒng)，仍然存在著在教材管理和征訂方面半手工半信息化的狀況。所謂半手工半信息化是教材科有詳細的教材資料，并把他們存放在電子文檔中。每次需要信息時，在電腦中找到對應(yīng)文檔提取所需信息，把所需的信息打印或手抄出來。即教材信息沒有形成一個大型的整體的數(shù)據(jù)庫，而且還沒有對這些數(shù)據(jù)進行操作的網(wǎng)絡(luò)應(yīng)用程序。目前國內(nèi)大部分的學(xué)校都是這種情況。針對這一情況，我們研究和開發(fā)了“學(xué)校教材訂購系統(tǒng)”作為深入研究解決這一問題辦法的初步嘗試。2、 問題的提出及發(fā)展背景隨著教學(xué)數(shù)量的提高，對軟件質(zhì)量的要求也越來越高，因此，教師、學(xué)生對教材的訂購了越來越重視，希望獲取教材的過程簡單，方便，快速，因而，做一個好的訂購系統(tǒng)是十分重要的。訂購是指教師或?qū)W生向工作人員提供要采購的教材，經(jīng)工作人員審查后，發(fā)給教師或?qū)W生發(fā)票，然后去書庫去領(lǐng)取教材，但工作人員發(fā)現(xiàn)書庫中缺貨時，要及時的向采購部報告，采購部要及時的進貨，然后，工作人員來修改記錄。3、 目標系統(tǒng)敘述本系統(tǒng)主要解決通過ASP.NET程序制作WEB應(yīng)用程序，通過該應(yīng)用程序?qū)崿F(xiàn)對數(shù)據(jù)庫的整合以及對數(shù)據(jù)庫的操作。數(shù)據(jù)庫的整合就是把現(xiàn)在的零散的數(shù)據(jù)庫經(jīng)過分類，綜合整理成一個大型的數(shù)據(jù)庫。所需數(shù)據(jù)都可以從里面調(diào)用，數(shù)據(jù)庫操作主要指添加，刪除，查詢等數(shù)據(jù)庫基本操作。系統(tǒng)的設(shè)計首先著眼的是網(wǎng)絡(luò)，學(xué)生或教師可以通過本系統(tǒng)向教材訂購人員提交所需教材的詳細信息，教材訂購系統(tǒng)可以統(tǒng)計教材信息。因此本系統(tǒng)方便了學(xué)校教材訂購部門的工作，提高了工作效率。主要功能包括：1、收集數(shù)據(jù)。將學(xué)生教師的訂書單和缺書通知單單收集起來。2、打印報表。產(chǎn)生待購教材表、進庫表和出庫表等各種統(tǒng)計報表3、可行性分析及開發(fā)計劃在技術(shù)上的可行性分析，本系統(tǒng)可細化為兩個子系統(tǒng)：銷售系統(tǒng)和采購系統(tǒng)銷售系統(tǒng)的工作過程為：首先由教師或?qū)W生提交購書單，經(jīng)教材發(fā)行人員審核是有效購書單后，開發(fā)票、登記并返給教師或?qū)W生領(lǐng)書單，教師或?qū)W生即可去書庫領(lǐng)書。采購系統(tǒng)的主要工作過程為：若是脫銷教材，則登記缺書，發(fā)缺書單給書庫采購人員；一旦新書入庫后，即發(fā)進書通知給教材發(fā)行人員。當(dāng)書庫中的各種書籍?dāng)?shù)量發(fā)生變化（包括領(lǐng)書和進書時），都應(yīng)修改相關(guān)的書庫記錄，如庫存表或進/出庫表。在對現(xiàn)行系統(tǒng)的情況調(diào)查的基礎(chǔ)上，得出系統(tǒng)的邏輯模型。二、需求分析1、需求定義說明書此教材采購系統(tǒng)分為兩個模塊：采購系統(tǒng)和銷售系統(tǒng)。具體見下圖層次數(shù)據(jù)流圖。銷售系統(tǒng)模塊：提交購書單、審核購書單、開發(fā)票、登記購書紀錄、返回領(lǐng)書單、修改和維護數(shù)據(jù)庫中相應(yīng)的表。采購系統(tǒng)模塊：發(fā)缺書臺州單、登記缺書紀錄、擬訂待購書信息、發(fā)進書通知單、修改和維護數(shù)據(jù)庫中相應(yīng)的表。教材管理信息系統(tǒng)的服務(wù)對象為全校師生員工，系統(tǒng)的使用對象為教務(wù)處教材管理人員及書庫管理員。系統(tǒng)主要完成以下具體功能：（1）預(yù)定新書購書者購買書庫暫時沒有的書，可以進行預(yù)訂，由教務(wù)處工作人員進行采購。（2）購書購書者到財務(wù)室辦理繳費手續(xù)，然后憑此手續(xù)去書庫取書。（3）書出庫書從書庫領(lǐng)出，管理員修改書庫記錄。（4）書入庫采購人員把采購的書送入書庫，管理員修改書庫記錄。（5）書庫維護對現(xiàn)有的書分類、統(tǒng)計、增添新書目或刪除不存在的舊書目錄等，一般由書庫管理人員來完成。2、數(shù)據(jù)流圖將數(shù)據(jù)流圖模塊中的內(nèi)容進一步細化，便于理解與設(shè)計。學(xué)生信息包括：姓名、學(xué)號、購書日期、采購書籍名稱、書籍編碼、書籍?dāng)?shù)量、單價、聯(lián)系方式。老師信息包括：姓名、編號、購書日期、采購書籍名稱、書籍編碼、書籍?dāng)?shù)量、單價、聯(lián)系方式。書籍信息包括：書籍名稱、書籍編碼、價格、現(xiàn)有數(shù)量、出版社、作者。購書單信息包括：日期、書籍名稱、數(shù)量、學(xué)生（老師）姓名、購書人員編號缺書單信息包括：日期、書籍名稱、數(shù)量、學(xué)生（老師）姓名、發(fā)行人員編號發(fā)行人員信息包括：書籍名稱、數(shù)量、日期、發(fā)行人員編號、聯(lián)系方式。采購人員信息包括：書籍名稱、數(shù)量、日期、采購人員編號、聯(lián)系方式。將細化的數(shù)據(jù)流圖用圖形表示出來：如下圖領(lǐng)書單圖2-1教材訂購系統(tǒng)數(shù)據(jù)流程圖在數(shù)據(jù)流圖分解時，每個變動都可能引出新的問題。這些問題的回答可以到處數(shù)據(jù)字典的新條目，發(fā)現(xiàn)后及時更正。隨著分析過程的深入，通過不斷地提問和問答，把軟件系統(tǒng)定義得越來越準確詳細。最終就能對系統(tǒng)的功能要求有一個較全面的認識。應(yīng)當(dāng)高度重視：通過各層數(shù)據(jù)流圖和數(shù)據(jù)字典把對系統(tǒng)的完整認識描述出來，并作為正式文檔保存。三、概要設(shè)計（系統(tǒng)設(shè)計）：1、系統(tǒng)功能模塊結(jié)構(gòu)圖根據(jù)需求分析，學(xué)校教材訂購系統(tǒng)功能模塊結(jié)構(gòu)圖如下：

銷售子系統(tǒng)2、數(shù)據(jù)庫概要設(shè)計（E-R圖）學(xué)校教材訂購系統(tǒng)中，其主要的實體分別為用戶（教師和學(xué)生）、教材管理人員，經(jīng)分析后，得到主要E-R圖，如圖所示。書籍名編號庫存量出版社書籍

書籍名編號庫存量出版社書籍進一步對學(xué)校教材訂購系統(tǒng)的銷售過程和采購過程進行數(shù)據(jù)流程分析，本系統(tǒng)應(yīng)當(dāng)具有如下的數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)：開發(fā)過程中建立了名為book的數(shù)據(jù)庫，下設(shè)book07、book08、adminlist等表如圖3-1所示：蓉QL古;4±工口巳工Kxi-t^xr：pKr± ??比[11世聖*xrv1J|-IKI l^fl-ia'i 百石「0 T±±H商口世〉 YlfLlJiiH-i4fs[ee][?srf?i 送-■：7：S恥問也制就1蒔超臺根 SQLServersXSQLSer^?erftlX.(local)CVindowsHLJ羥制白根目務(wù)白? MiarosoftSQLSarvii's白OSQLServer組白龜CLo-zil：!CWind-^wsKT)卓o數(shù)握庫白…詡hookV去系ElElstTV r.;-i-HUI1咅稱 1所有者 1類型?]!s.dl.rninJ.ix-L d/b 口 用^^|~1bo.：.kO7 3b o 用戶| 1fa□aldJB db a 用戶_訂dtpi-op4i-ti db o 系主充"Tx^rxe口lumnEc tlb 口 .主帝圖3-1book數(shù)據(jù)庫圖表asminlist用于存放系統(tǒng)管理員和老師或?qū)W生的登陸用戶名和密碼，其中帳號為主碼，如圖3-2adminlist圖所示。植］表-ad>inlist"中腳數(shù)據(jù)，位置是"book"中帳號密碼klioooo^^^^H1234510001123451LI0LI21234510003123451LI0LI4123451000512345

圖3-2adminlist圖表book07用于存放過去兩個學(xué)期中計算機系所有已定教材的信息，其中書號為主碼，如圖3-3表book07圖所示。植］表"bookOT"中的軟據(jù)，位置是"book"中、-(local)"上甬呂 I書客 唯者 丨肝宗時間 |埶雖 —101高等數(shù)學(xué)7102法律7103710471057201VFP匚語言管理學(xué)統(tǒng)計學(xué)2UU72007200720072UU7ZUUi7203TZD4會計JAVA2007101高等數(shù)學(xué)7102法律7103710471057201VFP匚語言管理學(xué)統(tǒng)計學(xué)2UU72007200720072UU7ZUUi7203TZD4會計JAVA20072007ZOOT圖3-31 681 E81681 681 68U Gu8 E88 68a ba表book07圖表book08用于存放本學(xué)期需要征訂的教材，同樣，書號為主碼，如圖3-4表book08圖所示。謔］表abook08-中的數(shù)據(jù)，隹置是abook"中、-(local)"±書號書名 作者征定時間 數(shù)量書號書名 作者征定時間 數(shù)量p*Zinl高尊數(shù)學(xué)p*Zinl高尊數(shù)學(xué)7201銃計學(xué)8102網(wǎng)站逢設(shè)8103軻牛工程8702市場営銷SS,.TOC\o"1-5"\h\z2007-1 606 681 682008-1 682008-1 80圖3-4表book08圖四、詳細設(shè)計根據(jù)功能模塊用程序流程圖進行詳細設(shè)計和各模塊詳細設(shè)計說明書如下:銷售子系統(tǒng)模塊程序流程圖:

五、界面設(shè)計及主要代碼本系統(tǒng)主要有登陸界面load.aspx,顯示書目信息及功能模塊選擇頁面book.aspx,添加新記錄頁面new.aspx,添加歷史記錄頁面history.aspx和historyl.aspx,修改記錄update.aspx和updatel.aspx以及刪除記錄delete.aspx八個頁面組成?其中登陸與用datagrid兩大模塊的代碼編寫與設(shè)計.具體設(shè)計如下：5.1登陸界面當(dāng)單擊確定按鈕時，連接數(shù)據(jù)庫，確定輸入的帳號和密碼是否匹配，跳轉(zhuǎn)到書目的頁面，若不匹配,則彈出帳號錯誤或密碼錯誤的提示。如圖5-1所示■■=:==.-- —=■:—-=■=.1■_T-—. xamniHiirrTKi：I ■延txJLq,i ? 暑，也誹；“ ―- a■■V: Jim y=wlw、u歡迎使用學(xué)狡教財訂購寒統(tǒng)■W*l-iM書kn：圖5-1具體代碼如下：PrivateSubbuttonl_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)Handlesbuttonl.ClickDimstrAsStringDimpassstrAsStringpassstr=Trim(CStr(TextBox2.Text))str="'"&TextBox1.Text&"'"DimsqlAsString=""select*fromadminlistwhere帳號二"&Trim(str)'在數(shù)據(jù)庫中搜索帳號為textboxl.text的數(shù)據(jù)'DimconnstrAsString="server=localhost;uid=sa;pwd=;database=book"DimmyconnAsNewSqlClient.SqlConnection(connstr)DimdaAsNewSqlClient.SqlDataAdapter(sql,myconn)DimdsAsNewDataSetda.Fill(ds,"adminlist")DimdacommAsSqlClient.SqlCommandBuilder=NewSqlClient.SqlCommandBuilder(da)Ifds.Tables("adminlist").Rows.Count=lThen'判斷帳號密碼是否和數(shù)據(jù)庫匹配'Ifpassstr二Trim(ds.Tables(""adminlist"").Rows(0)("密碼""))ThenResponse.Redirect("book.aspx")ElseResponse.Write(""密碼錯誤！"")EndIfElseResponse.Write(""用戶名不存在!")EndIfEndSubEndClass5.2用datagrid顯示數(shù)據(jù)首先建立datagrid,通過連接數(shù)據(jù)庫，將數(shù)據(jù)顯示在datagrid中。如圖5-2所示

”⑴ UL>1<■詁OP；町丈；“ T乜?一』- 必歡迎使用學(xué)校教材訂購系統(tǒng)lid]HO7-E(0IBlid]HO7-E(0IBLlO2L冏時&哽期昭取潯工程2W3-LTffl3M-1?書號 fi* 惟電 誓建"H常EB? 匂?堅?it圖5-2書目頁面book.aspx具體代碼如下：PrivateSubPage_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Loadbinddata()EndSubSubbinddata()DimmyconnectionAsNewSqlConnection("initialcatalog=book;uid=sa;pwd=")ConststrsqlAsString="select*frombook08orderby書號"DimmycommandAsNewSqlCommand(strsql,myconnection)DimmydaAsNewSqlDataAdaptermyda.SelectCommand=mycommandDimmydsAsNewDataSetmyda.Fill(myds)DataGridl.DataSource=mydsDataGridl.DataBind()EndSub5.3添加歷史書目(1)history.aspx在登陸系統(tǒng)并選擇插入歷史書本后，進入添加歷史書目的頁面，決定

選擇哪條記錄進行添加。如圖5-3插入歷史書目圖所示￡■lliaft*rr-li-rE-axaf4Ivt-irnallap-b-Brnr丈pifi■由叩It t?■.電I THiff理陰v_￡JWH"1口八麗征足時臨T1KL王時20DT-1TIDE強一20DT-1T1K冊200T-1T1H：v_￡JWH"1口八麗征足時臨T1KL王時20DT-1TIDE強一20DT-1T1K冊200T-1T1H：ctfS李明200T-1T1K300T-1T3HL統(tǒng)卄半3QUT-ST3DS財靂晉理200T-ST2K1f.fi300T-8T204200T-?<>￡仝呂TnirdHiBt~if*h「3AjiL?y■?lcj圖5-3插入歷史書目圖在單擊左側(cè)的選擇后，自動跳轉(zhuǎn)到updatel.aspx,根據(jù)所選擇的書目，進行相應(yīng)的修改后添加到記錄中去。具體代碼如下：頁面登陸事件代碼：PrivateSubPage_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadIfNotPage.IsPostBackThenbinddata()EndIfEndSub連接數(shù)據(jù)庫：Subbinddata()DimmyconnectionAsNewSqlConnection(“initialcatalog二book;uid二sa;pwd二“)ConststrsqlAsString=“select*frombook07orderby書號"DimmycommandAsNewSqlCommand(strsql，myconnection)DimmydaAsNewSqlDataAdapter

Myda.SelectCommand=mycommandDimmydsAsNewDataSetMyda.Fill（myds）DataGrid1.DataSource=mydsDataGrid1.DataBind（）EndSub確定所選擇的行的數(shù)據(jù)，并把該行相應(yīng)的內(nèi)容分別通過session變量儲存下來。PrivateSubDataGrid1_ItemCommand（ByValsourceAsObject，ByValeAsSystem.Web.UI.WebControls.DataGridCommandEventArgs）HandlesDataGrid1.ItemCommandDimb_noAsTableCell=e.Item.Cells（1）Dimb_nameAsTableCell=e.Item.Cells（2）Dimb_aAsTableCell=Dimb_aAsTableCell=e.Item.Cells（3）Dimb_bAsTableCell=e.Item.Cells（4）Dimb_cAsTableCell=e.Item.Cells（5）=b_no.Text=b_no.Text=b_name.Text=b_a.Text=b_b.Text=b_c.TextSession（“b”）Session（“c”）Session（“d”）Session（“e”）Response.Redirect（“history1.aspx”）EndSubButton_click事件，重定向到book.aspx頁面PrivateSubButton1_Click（ByValsenderAsSystem.Object，ByValeAsSystem.EventArgs）HandlesButton1.ClickResponse。Redirect（“book.aspx"）EndSubEndclass(2)historyl.aspx頁面：通過上一個頁面的選擇后，該頁面進行修改并添加的操作。如圖4-4修改添加記錄圖所示：■-……丄西1EWQI■■斗 Eh"IJI^j0^-0簡迪戶■■由j鮎缶尋曲"口F' /Uh!iliLjriC-r4IBi!|4lAm!-?y|jlAfri*-b仁J：用；L!f4!I出-wik-■W-n-i- 1”-**-E-HESi3f弓1冬凹士審*EH圖5-4添加記錄圖該頁面中將征定時間和數(shù)量的值用textbox表示,是為了方便在插入歷史書目的時候修改它的時間和它的數(shù)量。當(dāng)管理員修改完成后，則可單擊確定添加操作，將數(shù)據(jù)添加到08年的數(shù)據(jù)庫中。具體代碼如下：頁面登陸代碼：PrivateSubPage_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadIfNotIsPostBackThenDimstrAsStringstr=“'“&Label6.Text&“'“DimsqlAsString二“select*frombook07where書號二“&Trim(Session(“a”))DimconnstrAsString=“server=localhost;uid二sa;pwd二；database二book”DimmyconnAsNewSqlClient.SqlConnection(connstr)DimdaAsNewSqlClient.SqlDataAdapter(sql，myconn)DimdsAsNewDataSetDa.Fill(ds,“book07”)DimdacommAsSqlClient.SqlCommandBuilder=NewSqlClient.SqlCommandBuilder(da)Label6.Text=ds.Tables(“book07”).Rows(0)(“書號”)Label7.Text=ds.Tables(“book07”).Rows(0)(“書名”)Label8.Text=ds.Tables(“book07”).Rows(0)(“作者”)TextBoxl.Text=ds.Tables(“book07”).Rows(0)(“征定時間”)TextBox2.Text=ds.Tables(“bookO7”).Rows(0)(“數(shù)量”)EndIfEndSub修改后添加到數(shù)據(jù)庫的代碼：PrivateSubButton1_Click(ByValsenderAsSystem.Object，ByValeAsSystem.EventArgs)HandlesButton1.ClickDimstrAsStringDimlitemAsListItemstr=“'“&Label6.Text&“'“DimsqlAsString=“select*frombook08where書號=“&Trim(str)DimconnstrAsString=“server=localhost;uid=sa;pwd=;database=book”DimmyconnAsNewSqlConnection(connstr)DimdaAsNewSqlDataAdapter(sql，myconn)DimdsAsNewDataSetda。Fill(ds，“book08”)DimmyrowAsDataRowDimdacommAsSqlClient.SqlCommandBuilder=NewSqlClient.SqlCommandBuilder(da)Ifds.Tables(“book08”).Rows.Count>=1ThenResponse.Write(“此書已存在”)EndIfmyrow=ds.Tables(“book08”).NewRowmyrow(“書號”)二Trim(Label6.Text)myrow(“書名”)二Trim(Label7.Text)

myrow(“作者”)=Trim(Label8.Text)myrow(“征定時間”)二Trim(TextBoxl.Text)myrow(“數(shù)量”)二Trim(TextBox2.Text)ds.Tables(“book08”).Rows.Add(myrow)da.UpdateCommand=dacomm.GetUpdateCommandda.Update(ds，“book08”)Response.Redirect(“book.aspx")EndSub單擊返回按鈕后，重定向到history.aspx的代碼：PrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton2.ClickResponse.Redirect(“history.aspx")EndSubEndClass5.4刪除記錄在登陸系統(tǒng)后點擊修改按鈕進入修改頁面delete.aspx，通過復(fù)選框的選擇，刪除數(shù)據(jù)。如下圖5-5刪除頁面所示:S'討■艙- InlrirmFInflagfl?-ffQ砂叩■■M-yO"-O'-X；'/■■ji.?'0■■■.<] ■片i處近〒打旳秋?丁了采7不刁d節(jié)號■AS0壬洋輩旳wr-eoE3.CQn昭■諛耳月:SBB-】口fl騙阪-I□BT1X2R懺W-3圖5-5刪除頁面該頁面通過復(fù)選框的操作刪除數(shù)據(jù)后，重定向回該頁面，以便顯示刪除后數(shù)據(jù)的更新。具體代碼如下：頁面登陸代碼：PrivateSubPage_Load（ByValsenderAsSystem.Object，ByValeAsSystem.EventArgs）HandlesMyBase.LoadIfNotPage.IsPostBackThen‘用來確認頁面是否第一次登陸'binddata（）EndIfEndSubSubbinddata（）‘連接到數(shù)據(jù)庫'DimmyconnectionAsNewSqlConnection（“initialcatalog=book;uid=sa;pwd=“）ConststrsqlAsString=“select*frombook08orderby書號”DimmycommandAsNewSqlCommand（strsql，myconnection）DimmydaAsNewSqlDataAdapterMyda.SelectCommand=mycommandDimmydsAsNewDataSetMyda.Fill（myds）DataGrid1.DataSource=mydsDataGrid1.DataBind（）'myda.Update（myds，“book08”）EndSubButton_click事件：PrivateSubButton1_Click（ByValsenderAsSystem.Object，ByValeAsSystem.EventArgs）HandlesButton1.ClickDimiAsIntegerDimxAsStringDimitemAsDataGridItemFori=0ToDataGridl.Items.Count-1item=DataGrid1.Items（i）DimbookcheckboxAsCheckBox=item.FindControl(“checkbox1”)Ifbookcheckbox.CheckedThen‘確認數(shù)據(jù)是否被點擊進行刪除'x=item.Cells(1).Text‘x為datagrid第二列的數(shù)據(jù)的內(nèi)容'deletedataset(x)EndIfNextbinddata()Response.Write(“刪除成功！”)EndSubSubdeletedataset(ByValyAsString)DimconAsNewSqlConnection(“initialcatalog=book;uid=sa;pwd=“)DimcmdAsSqlCommandDimqryAsStringCon.Open()qry=“deletebook08where書號='“&y&“'“cmd=NewSqlClient.SqlCommand(qry，con)cmd.ExecuteNonQuery()con.Close()EndSubButton_click的重定向事件PrivateSubButton2_Click(ByValsenderAsSystem。Object,ByValeAsSystem.EventArgs)HandlesButton2.ClickResponse.Redirect(“book.aspx”)EndsubEndclass添加新教材和修改記錄兩大模塊共三個頁面的代碼編寫與設(shè)計。具體設(shè)計如圖5-6所示：歡迎使用學(xué)校教材訂購系統(tǒng)圖5-6添記錄頁面new.Aspx(1)添加新教材。在登陸系統(tǒng)并選擇錄入新書后，進入添加新教材頁面。如3-6圖所示:對textbox1到textbox5添加RequiredFiledValidator控件，并設(shè)置相應(yīng)屬性使textbox中的文本不能為空。對textbox1添力口RegularExpressionValidator控件，設(shè)置ValidationExpression屬性為”\d[4]”，ErrorMessage為”書號的格式為0001”。對textbox1添加RangeValidator控件，設(shè)置MinimunValue為”0001”，MaxmumValue為”9999”。使書號的取值范圍為0001——9999。對textbox4添力口RegularExpressionValidator控件，設(shè)置ValidationExpression屬性為”\d{4}-\d{1,2}”,使時間格式為2008-1。對textbox5添加RangeValidator控件，設(shè)置MinimunValue為”1”，MaxmumValue為”99”，使訂閱的教材數(shù)量在1-99本之間。該頁面程序代碼如下：PageLoad事件代碼PrivateSubPage_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.LoadEndSubButtonClick事件代碼PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.ClickDimstrAsStringDimlitemAsListItemstr二"""&TextBoxl。Text&"""DimsqlAsString="select*frombook08where書號二"&Trim(str)DimconnstrAsString="server=localhost;uid=sa;pwd=;database=book"DimmyconnAsNewSqlConnection(connstr)DimdaAsNewSqlDataAdapter(sql,myconn)DimdsAsNewDataSetda。Fill(ds,"book08")DimmyrowAsDataRowDimdacommAsSqlClient.SqlCommandBuilder=NewSqlClient.SqlCommandBuilder(da)Ifds.Tables("book08").Rows.Count>=1ThenResponse.Redirect("new.aspx")Response.Write("書號重復(fù)，請重新輸入")EndIfmyrow=ds.Tables("book08").NewRowmyrow("書號")二Trim(TextBoxl.Text)myrow("書名")二Trim(TextBox2.Text)myrow("作者")二Trim(TextBox3.Text)myrow("征定時間")二Trim(TextBox4.Text)myrow("數(shù)量")二Trim(TextBox5.Text)ds.Tables("book08").Rows.Add(myrow)da.UpdateCommand=dacomm.GetUpdateCommandda.Update(ds,"book08")Response.Redirect("book.aspx")EndSub(2)修改記錄。在登陸系統(tǒng)后點擊修改按鈕進入修改頁面update.aspx。如圖5-7所示:

展層*f調(diào)filltlol?tttf2OT4圻卄AS聊沖A&n^iiA4JI蹄IS^IfiTH2tM6-t?4：SJ7iY>估星i*柯wwe-i]直用汝■嘔1 直用汝■嘔1 制■詁?Udi1會暹bd■Xi.€4■:.對Lir>mTidfaMMA.gLrZs?rt? —￡J襯歡迎使用芋校教材訂購系統(tǒng)圖5-7修改頁面update.Aspx在該頁面設(shè)計中添加SqlDataAdapter控件和DataSet控件，用于執(zhí)行ADO。NET數(shù)據(jù)庫訪問的相關(guān)操作。該頁中的數(shù)據(jù)通過DataGrid控件顯示，設(shè)置相應(yīng)屬性，將其綁定到表book08，使其顯示book08中的數(shù)據(jù)。在DataGrid控件中添加一個按鈕列，列名為選擇。當(dāng)用戶點擊該列的按鈕時自動獲取該行的相關(guān)值，將其賦值給Session變量并跳轉(zhuǎn)到updatel。aspxoupdate1。aspx如圖：5-8所示!**看埠1匚|!**看埠1匚|-liririutfribiiarwrZFCPM1JAITHmiEl71 ■*L>3刑?. “『，.護r?■?： -. - 心-hii■Tfi斗??MOifHHipF~圖5-8修改選擇后的記錄updatel.aspx頁面中textbox的文本來自與update.aspx中定義并賦值的Session變量。用戶通過修改其中的文本值并單擊確定完成修改。修改部分代碼如下：update.aspx中的PageLoad事件PrivateSubPage_Load(ByValsenderAsSystem.Object，ByValeAsSystem.EventArgs)HandlesMyBase.LoadIfNotPage.IsPostBackThenbinddata()EndIfEndSub用于加載頁面及確認是否第一次訪問。Update.aspx中的binddata事件privateSubbinddata()DimmyconnectionAsNewSqlConnection("initialcatalog=book;uid=sa;pwd=")ConststrsqlAsString=""select*frombook08orderby書號"Dimmycommand