利用 ASP.NET 构建网上考试系统
本文以 ASP.net(C#)+SQL server 为例说明了开发网上考试系统的实现方法
随着计算机网络的普及,基于数据库的 B/S 网上考试系统得到广泛地应用,现以 ASP.net(C#)+SQL server( 或 ACCESS) 为例说明开发网上考试系统的实现方法。 一、数据库的设计 : 建立数据库 netexam, 在库中添加考生信息表 StuInfo ,分别建立以下字段:考号 ExamId(c)( 主键 ) 、考生姓名 Name(c) 、是否登录考试 LogYn(c) 、得分 Score(c) 、随机生成的试题答案 mca(c) ( 注 : 此处以多选题为例,单选题、判断题同理 ) 。添加多选题题库表 mc ,建立以下字段:题目 question(c) 、四个选 choice1(c) 、 choice2(c) 、 choice3(c) 、 choice4(c) 、答案 answer(c)( 注 : 多选题答案用 0 表示未选, 1 表示选择,如选择 ABD 就用 1101 表示 ) 。 二、考生登录: 在此处将考生信息插入表 StuInfo ,此处要防止考生重复登录!给指定唯一的考号,并将考号字段 ExamId(c) 设为主键,当重复登录时,用 Catch 捕获错误,给出相应提示,部分代码如下 (login.aspx) :
private void ButOk_Click(object sender, System.EventArgs e) { ... SqlConnection StuConn=new SqlConnection("Data Source=localhost;Integrated Security=SSPI; Initial Catalog=netexam"); SqlCommand LoginCmd=StuConn.CreateCommand(); // 可根据不同情况选择不同的数据库连接 ... LoginCmd.CommandText="Insert into StuInfo(ExamId,Name) values('"+TxtId.Text.Trim()+"','"+TxtName.Text.Trim()+"')"; // 将考号、姓名插入相应字段 , 其中 TxtId,TxtName 分别是输入考号和姓名的文本框 try { ... Session["Id"]=TxtId.Text.Trim(); StuConn.Open(); LoginCmd.ExecuteReader(); Response.Redirect("test.aspx"); } catch(Exception) // 捕获相应错误 { Response.Write("<script language=/"javascript/">"+"/n"); Response.Write("alert(/" 不能重复登录,或考号、姓名、密码是否有误! /")"+"/n</script>"); } ... }
三、试题生成: 1 、防止考生刷新页面: 由于加载试题页面时将从数据库中随机抽取试题,所以应防止考生刷新面页 ( 刷新页面会重新生成新的试题 ) 。方法是将表 StuInfo 中的 LogYn 字段默认值设为 0 ,加载试题后设为 1 ,交卷评分后设为 2 ,加载试题页面时进行相应检查,以防止页面的刷新,代码如下 (test.aspx):
private void Page_Load(object sender, System.EventArgs e) { if(!IsPostBack) { ... QuestCmd.CommandText="select LogYn from StuInfo where ExamId= '"+ Session["Id"].ToString()+"'"; QuestConn.Open(); SqlDataReader QuestRd=QuestCmd.ExecuteReader(); QuestRd.Read(); if(QuestRd["LogYn"].ToString().Trim().Equals("1")||QuestRd["LogYn"].ToString().Trim().Equals("2")) // 判断是否已加载试题或是否已评分 { ... Response.Write("<script language=/"javascript/">"+"/n"); Response.Write("alert(/" 不能刷新!请与管理员联系,重新登录。 /")"+"/n</script>"); ... } else { ... QuestCmd.CommandText="update StuInfo set LogYn='1'"; // 已成功加载试题 QuestCmd.ExecuteReader(); ... } } ... }
2 、随机生成试题: 网上考试系统的关键是试题的随机生成,即对于不同的计算机访问系统时将从题库中随机地抽取不同的试题。 在此我们可使用 SQL 语句 "select top n * from mc order by newid()" 从题库中随机抽取 n 条记录 , 其中 newid() 生成 uniqueidentifier 值 ( 若是 ACCESS 数据库则用 "select top n * from mc order by rnd(id)" ,其中 id 为自动编号字段 ) 。 在 test.aspx 页面上放置一个 Panel 容器控件,以便动态生成绑定到试题的控件,并将从表 mc 中随机生成的试题答案写入表 StuInfo 表中的 mca 字段,代码如下 (test.aspx):
private void Page_Load(object sender, System.EventArgs e) { if(!IsPostBack) { ... QuestCmd.CommandText="select top 10 * from mc order by newid()";// 以随机生成 10 道题为例 QuestConn.Open(); QuestRd=QuestCmd.ExecuteReader(); while(QuestRd.Read()) { Literal LitTxt=new Literal(); Literal LitBl=new Literal(); CheckBoxList ChkMc=new CheckBoxList(); ChkMc.ID="ChkMc"+i.ToString(); LitTxt.Text=i.ToString()+" 、 "+Server.HtmlEncode(QuestRd["Question"].ToString())+"<BR><Blockquote>"; LitBl.Text="</Blockquote>"; ChkMc.Font.Size=11; for(int j=1;j<=4;j++) { ChkMc.Items.Add(Server.HtmlEncode(QuestRd["Choice"+j.ToString()].ToString())); ChkMc.Items[j-1].Value=j.ToString(); } mcStr+=QuestRd["Answer"].ToString().Trim(); //mcStr 是存储随机生成试题答案的字符串变量 MyPanel.Controls.Add(LitTxt); MyPanel.Controls.Add(ChkMc); MyPanel.Controls.Add(LitBl); i++; } ... QuestCmd.CommandText="update StuInfo set Mca='"+mcStr+"' where ExamId= '" +Session["Id"].ToString()+"'"; // 将随机生成试题答案写入数据表 QuestConn.Open(); QuestRd=QuestCmd.ExecuteReader(); ... } ... }
四、交卷评分: 当用户点击交卷按钮后,应将用户的答题结果与试题答案进行比对,并给出相应的分值写入数据表,最后将表 StuInfo 中的 LogYn 字段设置为 2 ,显示考试得分,代码如下 (test.aspx):
private void ButSend_Click(object sender, System.EventArgs e) { ... for(int i=1;i<=10;i++) // 由于随机生成了 10 道题,所以循环 10 次 { for(int j=0;j<4;j++) if(Request.Form["ChkMc"+i.ToString()+":"+j.ToString()]!=null) mcs+="1"; //mcs 是存储考生所选答案的字符串变量,已选用 "1" 表示,未选用 "0" 表示 else mcs+="0"; } ... QuestCmd.CommandText="select mca from StuInfo where ExamId= '" +Session["Id"].ToString()+"'"; QuestConn.Open(); SqlDataReader QuestRd=QuestCmd.ExecuteReader(); QuestRd.Read(); int StuScore=0; // 存储得分的变量 for(i=0;i<10;i+=4) { if(QuestRd["mca"].ToString().Substring(i,4).Equals(mcs.Substring(i,4))) StuScore+=2; // 从字段 mca 和 mcs 中每次取四个字符进行比对,如相等则加上 2 分 } ... QuestCmd.CommandText="update StuInfo set score="+StuScore.ToString()+",LogYn='2' where ExamId= '" + Session["Id"].ToString()+"'and LogYn='1'"; // 设置已评分标志 QuestRd=QuestCmd.ExecuteReader(); ... Response.Redirect("score.aspx"); // 显示考试得分页面 ... }
限于篇幅,在此只列出了实现网上考试系统的几个要点,读者可根据自已的需要进一步完善相应的数据验证、后台管理及界面设计。