【導(dǎo)讀】添加、修改學(xué)生信息(adds

　　

【正文】 sql = select top amp。 1 amp。 * from question Where subjectname=39。 amp。 Subject amp。 39。 AND type=39。單選題 39。and haveselect= 0 Randomize() count = SubjectInfo(Subject) temp = Fix(count * Rnd(100)) If (0). 0 Then GetRowInfo((0).Rows(temp)) Else = 暫時(shí)沒(méi)有 amp。 Subject amp。 的單選題 ! End If End Sub //統(tǒng)計(jì) 課程考題的數(shù)量 , 獲得 count 值 Function SubjectInfo(ByVal name As String) As Integer strsql = select * from question where subjectname=39。 amp。 name amp。 39。 AND type=39。單選題 39。and haveselect=0 Dim cmd As New SqlDataAdapter(strsql, appconn) 更多論文 第 22 頁(yè) 共 27 頁(yè) (Qds, Info) Return (Info). End Function 管理主頁(yè)面的實(shí)現(xiàn) 管理主頁(yè)面是管理員進(jìn)入后臺(tái)管理后所看到的第一個(gè)頁(yè)面，在該頁(yè)面上有Label 控件顯示了管理員名，登錄時(shí)間信息，一組超鏈接實(shí)現(xiàn)各個(gè)頁(yè)面之間的跳轉(zhuǎn)，以一個(gè)表格中加入超鏈接圖片也可以在不同頁(yè)面之間跳轉(zhuǎn)，該頁(yè)面主要是管理員歡迎界面，沒(méi)有什么關(guān)鍵代碼，只是超鏈接的使用。 學(xué)生信息管理頁(yè)面 (manstudentinfo/)的實(shí)現(xiàn) 該頁(yè)面用 DataGrid 控件顯示了學(xué)生信息，并實(shí)現(xiàn)了分頁(yè)顯示，同時(shí)以下拉列表事件來(lái)實(shí)現(xiàn)按班級(jí)查詢(xún)學(xué)生信 息，其中班級(jí)是從數(shù)據(jù)庫(kù)里查詢(xún)出來(lái)的不重復(fù)的班級(jí)，還以下拉列表提供了按序號(hào)、學(xué)號(hào)、姓名進(jìn)行的關(guān)鍵字查詢(xún)，以超鏈接實(shí)現(xiàn)了跳轉(zhuǎn)到添加、修改學(xué)生信息頁(yè)面。如圖 41 所示： 圖 41 學(xué)生信息管理頁(yè)面 關(guān)鍵代碼解釋?zhuān)? //定義數(shù)據(jù)庫(kù)連接字符串， 更多論文 第 23 頁(yè) 共 27 頁(yè) Dim conn As New SqlConnection((ConnectionString)) //使用 DISTINCT 關(guān)鍵字搜索出數(shù)據(jù)庫(kù)中的不同班級(jí)， class_name 為下拉列表控件 dstr2 = select DISTINCT class from student = (student1) () (0, New ListItem(全部 , 全部 )) //使第一項(xiàng)顯示為 “全部 ” = ((全部 )) //使用 可以將網(wǎng)頁(yè)轉(zhuǎn)移至另外的網(wǎng)頁(yè)上，使用的語(yǔ)法結(jié)構(gòu)是 : 網(wǎng)址，其中網(wǎng)址可以是相對(duì)地址或絕對(duì)地址，在此使用(addstudentinfo/)跳轉(zhuǎn)到修改學(xué)生信息頁(yè)面 Session (studentid) = (CInt()) //使用下拉列表控件的 SelectedIndexChanged 事件，實(shí)現(xiàn)下拉列表改變，自動(dòng)按不同班級(jí)查詢(xún)學(xué)生信息 Public Sub class_name_SelectedIndexChanged(ByVal sender As , ByVal e As ) Handles dblstr = (class_name) ifsub() End Sub //根據(jù)不同的查詢(xún)條件生成不同的查詢(xún)字符串 Sub ifsub() //使用 like 39。% amp。 key amp。 %39。實(shí)現(xiàn)按關(guān)鍵字查詢(xún)，以下輸入學(xué)號(hào)關(guān)鍵字為來(lái)實(shí)現(xiàn)查詢(xún) If skey = s_no Then dskey = where s_no like 39。% amp。 key amp。 %39。 dstr = select * from student amp。 dskey 更多論文 第 24 頁(yè) 共 27 頁(yè) End If Session(str) = dstr adp = New SqlDataAdapter(dstr, conn) ds = New DataSet (ds, student) = (student).DefaultView () End Sub 添加、修改學(xué)生信息 (addstudentinfo/updatestudentifo) 添加學(xué)生信息與修改學(xué)生信息共用一個(gè)頁(yè)面，在執(zhí)行不同操作時(shí)，傳遞不同的參數(shù) editstudent，當(dāng) editstudent 為空值時(shí)，顯示添加學(xué)生信息頁(yè)面，不為空顯示為修改學(xué)生信息，并根據(jù)參數(shù)綁定數(shù)據(jù)庫(kù)中的對(duì)應(yīng)的學(xué)生信息，顯示在相應(yīng)的文本框或下拉列表中。如圖 42 所示： 圖 42 添加、修改學(xué)生信息頁(yè)面 關(guān)鍵代碼解釋?zhuān)? //根據(jù)不同 editstudent 參數(shù)值顯示不同的頁(yè)面標(biāo)題，其中 editstudent 為學(xué)生 id %If editstudent = Then%添加學(xué)生信息 %Else%修改學(xué)生信息 %End If% //根據(jù)不同 editstudent 參數(shù)值顯示不同的按鈕文本 更多論文 第 25 頁(yè) 共 27 頁(yè) %If editstudent = Then%asp:Button ID=Button1 Text= 添加學(xué)生信息 OnClick=Enter_Click / %Else%asp:Button ID=Button2 runat=server Text=修改學(xué)生信息 OnClick=Button2_Click/asp:Button%End If% //該句的功能是把表單提交的變量 editstudent 的值賦給一個(gè) Session對(duì)象studentid。這個(gè)對(duì)象用來(lái)存儲(chǔ)學(xué)生 id，它在用戶(hù)對(duì) 每個(gè)頁(yè)面的訪問(wèn)中有效。 editstudent = Session(studentid) //點(diǎn)擊修改學(xué)生信息事件，使用 Request 對(duì)象的 Form獲得頁(yè)面上表單的內(nèi)容 nums = (num) names = (name) pwds = (pwd) grades = (grade) strA = update student set s_no=39。 amp。 nums amp。 39。,s_name=39。 amp。 names amp。 39。,s_pwd=39。 amp。 pwds amp。 39。,class=39。 amp。 grades amp。 39。 where id= amp。 editstudent 更多論文 第 26 頁(yè) 共 27 頁(yè) 致謝 在本次論文設(shè)計(jì)過(guò)程中，陳翠紅老師對(duì)該論文從選題，構(gòu)思到最后定稿的各個(gè)環(huán)節(jié)給予細(xì)心指引與教導(dǎo) ,使我得以最終完成畢業(yè)論文設(shè)計(jì)。在學(xué)習(xí)中 ,老師嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度、豐富淵博的知識(shí)、敏銳的學(xué)術(shù)思維、精益求精的工作態(tài)度以及侮人不倦的師者風(fēng)范是我終生學(xué)習(xí)的楷模，導(dǎo)師們的高深精湛的 造詣與嚴(yán)謹(jǐn)求實(shí)的治學(xué)精神，將永遠(yuǎn)激勵(lì)著我。這三年中還得到眾多老師的關(guān)心支持和幫助。在此，謹(jǐn)向老師們致以衷心的感謝和崇高的敬意！ 最后，我要向百忙之中抽時(shí)間對(duì)本文進(jìn)行審閱，評(píng)議和參與本人論文答辯的各位老師表示感謝。 更多論文 第 27 頁(yè) 共 27 頁(yè) 參 考文獻(xiàn) 1)李克東，謝幼如等編著．多媒體組合教學(xué)設(shè)計(jì) [M]．北京 :科學(xué)出版社． 1992(1)。 2） 徐玲，呂磊等編著．基于 B/S 結(jié)構(gòu)的高校教務(wù)辦公自動(dòng)化的設(shè)計(jì)與實(shí)現(xiàn) [J]．電腦信息技術(shù)． 2021 5(3) 1819。 3） 明日科技，蓋天宇，孫明麗，鄒天思等編著． ASP 數(shù)據(jù)庫(kù)系統(tǒng)開(kāi)發(fā)案例精選[M]．北京 :人民郵電出版社． 2021： 5689。 4） 韓朝軍，梁冰，劉瑩等編著． SQL Server 管理與開(kāi)發(fā)技術(shù)大全 [M]．北京：科學(xué)出版社 .2021