【文章內容簡介】 息的函數 checkUser 代碼如下： 39。功能：驗證用戶信息是否正確 39。參數： username 用戶名， 39。 password 密碼 39。返回值：正確則返回 1，不正確返回 0 39。 設置 Cookies 用戶 ID（ UserID）和登錄狀態(tài) (Login) Function checkUser(userid,password) Dim dbc_Class Set dbc_Class = New DBConn 39。建立存儲過程的輸入參數 Set Cmd1 = () Set Param = (@ID,adVarChar,adParamInput,20,userid) Param Set Param=(@PassWord,adVarChar,adParamInput,20,password) Param 39。運行名為 sp_CheckUser 的存儲過程 Call (sp_CheckUser,Cmd1) If Then 39。失敗時的返回值 Session(UserType) = Session(UserID) = checkUser = 0 Else While Not 39。建立 Cookies 客戶端變量以識別 登錄的用戶 (UserName) = (Name) Session(UserID) = (ID) 第 10 頁 共 29 頁 Session(UserType) = (Type) Wend 39。成功時的返回值 checkUser = 1 End If Set Cmd1 = nothing () End Function 函數 checkUser 調用 的存儲過程代碼如下： CREATE PROCEDURE sp_CheckUser @ID varchar(20), @Password varchar(20) AS SELECT * FROM admin WHERE ID=@ID and Password=@Password GO 管理員和教師頁面 管理員頁面 擁有管理員權限的用戶登錄后即進入管理員頁面 ，頁面上 方將顯示登錄用戶的用戶名。用戶可以點擊左上方的“退出”鏈接退出系統(tǒng)，系統(tǒng)將轉到 頁面，清空 Cookies 集合和 Session 變量后返回到系統(tǒng)首頁。管理員可通過此頁面進入系統(tǒng)數據管理模塊，對系統(tǒng)數據進行管理操作，還可以進入成績查詢與分析模塊，對成績數據進行相應的查詢與分析操作，并返回查詢分析報表。系統(tǒng)管理員頁面效果如圖 42 所示。 第 11 頁 共 29 頁 圖 42 系統(tǒng)管理員頁 教師頁面 擁有非管理員權限的教師用戶登錄后即進入管理員頁面 ，頁面上方將顯示登錄用戶的用戶名。用戶可以點 擊左上方的“退出”鏈接退出系統(tǒng)，系統(tǒng)將轉到 頁面，清空 Cookies 集合和 Session 變量后返回到系統(tǒng)首頁。教師用戶可通過此頁面進入成績查詢與分析模塊，對成績數據進行相應的查詢與分析操作，并返回查詢分析報表。教師頁面效果如圖 43 所示。 圖 43 教師頁 第 12 頁 共 29 頁 系統(tǒng)數據管理模塊 系統(tǒng)數據管理模塊只有擁有管理員權限的用戶才能進入進行操作，通過此模塊可以對包括成績錄入等一系列的系統(tǒng)數據進行管理。此模塊又分為學生管理、課程管理、成績管理和用戶管理四個小模塊。 學生管理 學生管理模塊完 成了對學生信息進行添加、修改、刪除操作，以達到對學生信息管理的目的。此模塊的主頁面為 ，管理員可通過輸入需要管理的班級的班級號，查詢得到現有的學生信息列表，通過列表中相應的鏈接對學生信息進行修改和刪除操作。學生管理主頁面效果如圖 44所示。 圖 44學生管理主頁面 （ 1）修改學生數據信息： 管理員可通過點擊如圖 44 所示學生管理頁面的相應學生的操作列中的筆型按鈕，即可進入學生信息修改頁面 ，并將待修改學生的學號ID 同時傳遞到該頁面。在 頁面上，顯示有數據庫中記錄的待修改學生的全部信息，修改完該學生的信息點擊“提交”按鈕完成修改。提交修改后，系統(tǒng)會對提交的信息進行檢查，若修改過程中存在沒有填寫完整的項，系統(tǒng)會提示該項信息不能為空，然后返回學生管理 主頁面 ；若修改學生信息對數據庫操作失敗，系統(tǒng)將會提示“更新數據時失敗” ，并返回學生 管理 主頁面 。 學生信息修改頁面效果如圖 45所示。 第 13 頁 共 29 頁 圖 45 學生信息修改頁面 修改學生信息調用的存儲過程代碼如下： CREATE PROCEDURE sp_UpdateStudent 為要更新的變量聲明參數 @ID varchar(20), @Name varchar(20), @Gender int, @Grade varchar(20), @Class int AS 將待更新的變量更新為參數傳入的值 Update Student Set ID = @ID, Name = @Name, Gender = @Gender, Grade = @Grade, Class = @Class Where ID=@ID GO （ 2）刪除學生數據信息： 管理員可通過點擊如圖 44 所示學生管理頁面相應學生的操作列中的叉型按鈕，即可完成對該行對應學生的信息進行刪除，刪除成功后系統(tǒng)將返回學生管理 主頁面 。 刪除學生信息調用的存儲過程代碼如下： 第 14 頁 共 29 頁 CREATE PROCEDURE sp_DelStudent @ID varchar(20) AS 先刪除從表數據再刪主表數據 刪除該學生的成績數據 DELETE FROM Score WHERE StudentID = @ID 刪除學生基本數據 DELETE FROM Student WHERE = @ID GO （ 3）添加學生數據信息： 管理員可通過點擊 學生 管理 頁面 或 管理員頁面 下方 的“添 加學生” 按鈕，即 可進入添 加學生信 息頁面。在該頁面填寫完該學生的信息點擊“提交”按鈕完成對學生信息的添加。提交后，系統(tǒng)會對提交的信息進行檢查，若存在沒有填寫完整的項，系統(tǒng)會提 示該項信息不能為空，然后返回添加學生信息頁面 ；若添加學生信息時對數據庫操作失敗，系統(tǒng)將會提示“錄入數據時失敗” ，并返回 添加學生信息頁面 。 添加 學生信息調用的存儲過程如下： CREATE PROCEDURE sp_AddStudent 為要更新的字段聲明參數 @ID varchar(20), @Name varchar(20), @Gender int, @Grade varchar(20), @Class int AS 添 加將相應的字段的記錄為對應的輸入參數的值 Insert Into Student (ID,Name,Gender,Grade,Class) Values(@ID,@Name,@Gender,@Grade,@Class) GO 課程管理 課程管理模塊可以對課程信息進行添加、修改、刪除操作，以達到對課程開設進行管理的目的。此模塊的主頁面為 ，管理員可通過頁面中第 15 頁 共 29 頁 的下拉菜單選擇相應的課程，點擊“課程信息”按鈕后頁面會返回該課程的詳細信息，管理員可以通過列表中相應的鏈接對 課程信息進行修改和刪除操作。課程管理主頁面效果如圖 46所示。 圖 46課程管理頁面 （ 1）修改課程數據信息： 管理員可通過點擊如圖 46 所示的相應課程的操作列中的筆型按鈕，即可進入課程信息修改頁面 ，并將待修改課程 ID同時傳遞到該頁面。轉到 頁面后，頁面顯示有數據庫中記錄的待修改課程的全部信息，修改完該課程的信息點擊“提交”按鈕完成修改。提交修改后，系統(tǒng)會對提交的信息進行檢查，若修改過程中存在沒有填寫完整的項，系統(tǒng)會提示該項信息不能為空，然后返回課程 管理 頁面 ；若修改課程信息對數據庫操作失敗，系統(tǒng)將會提示“更新數據時失敗” ，并返回課程 管理 頁面。 修改課程信息調用的存儲過程代碼如下： CREATE PROCEDURE sp_UpdateCourse 為要修改的字段聲明參數 @ID varchar(20), @Name varchar(20), @TeacherID varchar(20), @Remark varchar(50), @Term int AS Update Course Set ID = @ID, Name = @Name, TeacherID = @TeacherID, Remark = @Remark, Term = @Term 第 16 頁 共 29 頁 Where ID=@ID GO （ 2）刪除課程數據信息： 管理員可通過點擊如圖 46 所示相應課程操作列中的叉型按鈕，即可完成對該課程信息的刪除，刪除成功后系統(tǒng)將返回課程管理 主頁面 。 刪除課程信息調用的存儲過程代碼如下： CREATE PROCEDURE sp_DelCourse @ID varchar(20) AS 應先刪除從表數據再刪主表數據 刪除該課程相關的成績數據 DELETE FROM Score WHERE CourseID = @ID 刪除課程基本數據 DELETE FROM Course WHERE = @ID GO （ 3）添加課程數據信息： 管理員可通過點擊 課程 管理 頁面 或 管理員頁面 下方 的“添 加課程” 按鈕，即 可進 入添 加課程信 息頁面。在該頁面填寫完該課程的信息點擊“提交”按鈕完成對課程信息的添加。提交后，系統(tǒng)會對提交的信息進行檢查，若存在沒有填寫完整的項，系統(tǒng)會提示該項信息不能為空，然后返回添加課程信息頁面 ；若添加課程信息時對數據庫操作失敗，系統(tǒng)將會提示“錄入數據時失敗” ，并返回 添加課程信息頁面 。 添加 課程信息調用的存儲過程如下： CREATE PROCEDURE sp_AddCourse @ID varchar(20), @Name varchar(20), @TeacherID varchar(20), @Term int AS Insert Into Course (ID,Name,TeacherID,Term) Values(@ID,@Name,@TeacherID,@Term) GO 第 17 頁 共 29 頁 成績管理 成績管理模塊完成了對成績信息進行添加、修改、刪除操作，以達到對成績信息進行管理的目的。此模塊的主頁面為 ，管理員通過輸入需要對成績進行管 理的班級的班級號，并從頁面的下來菜單中選擇相應的學期和課程，查詢得到某個班級某學期某門課程的成績信息列表，通過列表中相應的鏈接對成績信息進行修改和刪除操作。成績管理主頁面效果如圖 47 所示。 圖 47 成績管理頁面 （ 1）修改成績數據信息： 管理員可通過點擊如圖 47 所示的相應成績的操作列中的筆型按鈕，即可進入成績信息修改頁面 ，并將待修改成績對應的學號和課程 ID 同時傳遞到該頁面。瀏覽器轉到 頁面后，顯示有數據庫中記錄的待修改成績相關的全部信息，修改后點 擊“提交”按鈕完成修改。提交修改后，系統(tǒng)會對提交的信息進行檢查，若修改過程中存在沒有填寫完整的項，系統(tǒng)會提示該項信息不能為空，然后返回成績管理 頁面 ；若修改成績信息對數據庫操作失敗，系統(tǒng)將會提示“更新數據時失敗” ，并返回成績 管理 頁面 。 修改成績數據信息調用的存儲過程代碼如下： CREATE PROCEDURE sp_UpdateScore 為要修改的字段聲明參數 @StudentID varchar(20), 第 18 頁 共 29 頁 @CourseID varchar(20), @Score int, @Type int AS Update Score Set Score = @Score, Type = @Type Where StudentID=@StudentID and CourseID=@CourseID GO （ 2）刪除成績數據信息： 管理員可通過點擊如圖 47 所示成績管理頁面相應成績操作列中的叉型按鈕，即可完成對該成績信息的刪除，刪除成功后系統(tǒng)將返回課程成績管理 主頁面。 刪除成績 信息調用的存儲過程代碼如下： CREAT