需要源码请点赞关注收藏后评论区留言私信~~~
在线考试系统中的考试模块主要包括阅读考试规则,选择考试科目,随机抽取试题,答题计时器以及自动交卷并评分等功能
在开发考试系统过程中,需要考虑的一点是如何将试题显示在页面上,如何将试题从数据库中读取出来,比较合理的做法是将所有试题信息存储在数据库中,然后随机抽取若干试题,动态的显示在页面中

在线考试系统和普通考试的流程是一样的,考生答卷完毕后要对考生的答案评分,根据实际的需要,在线考试系统加入了自动评分模块,当考生答题完毕提交试卷后,系统会根据考生选择的答案与正确答案进行比较,最后进行评分

在随机抽取试题之前,考生要选择考试的科目,然后根据选择的科目随机从数据库中抽取试题给考生

程序首先根据考生选择的科目对数据库进行检索,查看数据库中是否有相关的试题,如果存在试题则随机抽取试题,否则提示考生选择的考试科目在数据库中没有试题,开始考试按钮的Click事件代码如下
protected void Button2_Click(object sender, EventArgs e)
{
string StuID = Session["ID"].ToString(); //考生的编号
string StuKC = ddlKm.SelectedItem.Text; //选择的考试科目
SqlConnection conn = BaseClass.DBCon(); //连接数据库
conn.Open(); //打开连接
SqlCommand cmd = new SqlCommand("select count(*) from tb_score where StudentID='" + StuID
+ "' and LessonName='" + StuKC + "'", conn); //执行SQL语句
int i = Convert.ToInt32(cmd.ExecuteScalar()); //获取返回值
if (i > 0) //如果返回值大于0
{
MessageBox.Show("你已经参加过此科目的考试了");
}
else
{
cmd = new SqlCommand("select count(*) from tb_test where testCourse='" + StuKC + "'",
conn);
int N = Convert.ToInt32(cmd.ExecuteScalar()); //获取返回值
if (N > 0) //如果返回值大于0
{
//执行SQL语句
cmd = new SqlCommand("insert into tb_score(StudentID,LessonName,StudentName)
values('" + StuID + "','" + StuKC + "','" + lblName.Text + "')", conn);
cmd.ExecuteNonQuery();
conn.Close(); //关闭连接
Session["KM"] = StuKC;
Response.Write("<script>window.open('StartExam.aspx','newwindow','status=1,scrollbars=1,re
sizable=1')</script>");
Response.Write("<script>window.opener=null;window.close();</script>");
}
else
{
MessageBox.Show("此科目没有考试题"); //弹出提示信息
return;
}
}
}
新建一个网页作为考试页面,它的主要控件如下

当开始考试页面加载时,根据考生选择的科目在数据库中随机抽取试题,并显示在Panel控件中
public string Ans = null; //建立存储正确答案的公共变量
public int tNUM; //记录考题数量
protected void Page_Load(object sender, EventArgs e)
{
lblEndtime.Text = "考试时间为10分钟,每小题5分,考试已用时:"; //显示考试提示
lblStuNum.Text = Session["ID"].ToString(); //显示考生编号
lblStuName.Text = Session["name"].ToString(); //显示考生姓名
lblStuSex.Text = Session["sex"].ToString(); //显示考生性别
lblStuKM.Text = "[" + Session["KM"].ToString() + "]" + "考试试题"; //显示考试科目
int i = 1; //初始化变量
SqlConnection conn = BaseClass.DBCon(); //连接数据库
conn.Open(); //打开连接
SqlCommand cmd = new SqlCommand("select top 10 * from tb_test where testCourse='" +
Session["KM"].ToString() + "' order by newid()", conn);
SqlDataReader sdr = cmd.ExecuteReader(); //创建记录集
while (sdr.Read())
{
Literal littxt = new Literal(); //创建Literal控件
Literal litti = new Literal(); //创建Literal控件
RadioButtonList cbk = new RadioButtonList(); //创建RadioButtonList控件
cbk.ID = "cbk" + i.ToString();
littxt.Text = i.ToString() + "、" + Server.HtmlEncode(sdr["testContent"].ToString())
+ "<br>ckquote>";
litti.Text = "</Blockquote>";
cbk.Items.Add("A. " + Server.HtmlEncode(sdr["testAns1"].ToString())); //添加选项A
cbk.Items.Add("B. " + Server.HtmlEncode(sdr["testAns2"].ToString())); //添加选项B
cbk.Items.Add("C. " + Server.HtmlEncode(sdr["testAns3"].ToString())); //添加选项C
cbk.Items.Add("D. " + Server.HtmlEncode(sdr["testAns4"].ToString())); //添加选项D
cbk.Font.Size = 11; //设置文字大小
for (int j = 1; j <= 4; j++)
{
cbk.Items[j - 1].Value = j.ToString();
}
Ans += sdr[6].ToString(); //获取试题的正确答案
if (Session["a"] == null) //判断是否第一次加载
{
//如果第一次加载则将正确答案赋值给Session["Ans"]
Session["Ans"] = Ans;
}
Panel1.Controls.Add(littxt); //将控件添加到Panel中
Panel1.Controls.Add(cbk); //将控件添加到Panel中
Panel1.Controls.Add(litti); //将控件添加到Panel中
i++; //使i递增
tNUM++; //使tNUM递增
}
sdr.Close();
conn.Close(); //关闭连接
Session["a"] = 1;
}
在考试页面中具有考试计时的功能,该功能是通过JavaScript脚本实现的
<script language="javascript">
var sec = 0;
var min = 0;
var hou = 0;
flag = 0;
idt = window.setTimeout("countDown();", 1000);
function countDown() {
sec++;
if (sec == 60) { sec = 0; min += 1; }
if (min == 60) { min = 0; hou += 1; }
document.getElementById("lbltime").innerText = min + "分 " + sec + " 秒";
idt = window.setTimeout("countDown();", 1000);
if (min == 10) {
document.getElementById("btnsubmit").click();
}
}
</script>
考生在规定的时间内进行考试,当考生答题完毕后,单击交卷功能,提交试卷,此时系统会将该考生的答题结果提交给自动评分模块,交卷按钮的Click事件代码如下
protected void btnsubmit_Click(object sender, EventArgs e)
{
string msc = ""; //建立变量msc存储考生答案
for (int i = 1; i <= 10; i++)
{
RadioButtonList list = (RadioButtonList)Panel1.FindControl("cbk" + i.ToString());
if (list != null)
{
if (list.SelectedValue.ToString() != "")
msc += list.SelectedValue.ToString(); //存储考生答案
else
msc += "0"; //如果没有选择则为0
}
}
Session["Sans"] = msc; //考生答案
string sql = "update tb_score set RigthAns='" + Ans + "',StudentAns='" + msc + "' where
StudentID='" + lblStuNum.Text + "'"; //更新考试结果数据表
BaseClass.OperateData(sql);
Response.Redirect("result.aspx?BInt=" + tNUM.ToString());
}
考生将试题提交到自动评分模块,该模块对考生答案进行评分,并将考生的成绩添加到数据表中
protected void Page_Load(object sender, EventArgs e)
{
string Rans = Session["Ans"].ToString(); //获取正确答案
int j = Convert.ToInt32(Request.QueryString["BInt"]); //获取试题数量
string Sans = Session["Sans"].ToString(); //获取考生答案
int StuScore = 0; //将考试成绩初始化为0
for (int i = 0; i < j; i++)
{
if (Rans.Substring(i, 1).Equals(Sans.Substring(i, 1))) //将考生答案与正确答案作比较
{
StuScore += 5; //如果答案正确加5分
}
}
this.lblResult.Text = StuScore.ToString(); //显示考试成绩
this.lblkm.Text = Session["KM"].ToString(); //显示考试科目
this.lblnum.Text = Session["ID"].ToString(); //显示考生编号
this.lblname.Text = Session["name"].ToString(); //显示考生姓名
//更新考试结果数据表
string strsql = "update tb_score set score='" + StuScore.ToString() + "' where StudentID='"
+ Session["ID"].ToString() + "' and LessonName='" + Session["KM"].ToString() + "'";
BaseClass.OperateData(strsql);
}
创作不易 觉得有帮助请点赞关注收藏~~~
假设我做了一个模块如下:m=Module.newdoclassCendend三个问题:除了对m的引用之外,还有什么方法可以访问C和m中的其他内容?我可以在创建匿名模块后为其命名吗(就像我输入“module...”一样)?如何在使用完匿名模块后将其删除,使其定义的常量不再存在? 最佳答案 三个答案:是的,使用ObjectSpace.此代码使c引用你的类(class)C不引用m:c=nilObjectSpace.each_object{|obj|c=objif(Class===objandobj.name=~/::C$/)}当然这取决于
作为我的Rails应用程序的一部分,我编写了一个小导入程序,它从我们的LDAP系统中吸取数据并将其塞入一个用户表中。不幸的是,与LDAP相关的代码在遍历我们的32K用户时泄漏了大量内存,我一直无法弄清楚如何解决这个问题。这个问题似乎在某种程度上与LDAP库有关,因为当我删除对LDAP内容的调用时,内存使用情况会很好地稳定下来。此外,不断增加的对象是Net::BER::BerIdentifiedString和Net::BER::BerIdentifiedArray,它们都是LDAP库的一部分。当我运行导入时,内存使用量最终达到超过1GB的峰值。如果问题存在,我需要找到一些方法来更正我的代
我有一个包含模块的模型。我想在模块中覆盖模型的访问器方法。例如:classBlah这显然行不通。有什么想法可以实现吗? 最佳答案 您的代码看起来是正确的。我们正在毫无困难地使用这个确切的模式。如果我没记错的话,Rails使用#method_missing作为属性setter,因此您的模块将优先,阻止ActiveRecord的setter。如果您正在使用ActiveSupport::Concern(参见thisblogpost),那么您的实例方法需要进入一个特殊的模块:classBlah
我有一个用户工厂。我希望默认情况下确认用户。但是鉴于unconfirmed特征,我不希望它们被确认。虽然我有一个基于实现细节而不是抽象的工作实现,但我想知道如何正确地做到这一点。factory:userdoafter(:create)do|user,evaluator|#unwantedimplementationdetailshereunlessFactoryGirl.factories[:user].defined_traits.map(&:name).include?(:unconfirmed)user.confirm!endendtrait:unconfirmeddoenden
我刚刚被困在这个问题上一段时间了。以这个基地为例:moduleTopclassTestendmoduleFooendend稍后,我可以通过这样做在Foo中定义扩展Test的类:moduleTopmoduleFooclassSomeTest但是,如果我尝试通过使用::指定模块来最小化缩进:moduleTop::FooclassFailure这失败了:NameError:uninitializedconstantTop::Foo::Test这是一个错误,还是仅仅是Ruby解析变量名的方式的逻辑结果? 最佳答案 Isthisabug,or
我想获取模块中定义的所有常量的值:moduleLettersA='apple'.freezeB='boy'.freezeendconstants给了我常量的名字:Letters.constants(false)#=>[:A,:B]如何获取它们的值的数组,即["apple","boy"]? 最佳答案 为了做到这一点,请使用mapLetters.constants(false).map&Letters.method(:const_get)这将返回["a","b"]第二种方式:Letters.constants(false).map{|c
我的假设是moduleAmoduleBendend和moduleA::Bend是一样的。我能够从thisblog找到解决方案,thisSOthread和andthisSOthread.为什么以及什么时候应该更喜欢紧凑语法A::B而不是另一个,因为它显然有一个缺点?我有一种直觉,它可能与性能有关,因为在更多命名空间中查找常量需要更多计算。但是我无法通过对普通类进行基准测试来验证这一点。 最佳答案 这两种写作方法经常被混淆。首先要说的是,据我所知,没有可衡量的性能差异。(在下面的书面示例中不断查找)最明显的区别,可能也是最著名的,是你的
如何在ruby中调用C#dll? 最佳答案 我能想到几种可能性:为您的DLL编写(或找人编写)一个COM包装器,如果它还没有,则使用Ruby的WIN32OLE库来调用它;看看RubyCLR,其中一位作者是JohnLam,他继续在Microsoft从事IronRuby方面的工作。(估计不会再维护了,可能不支持.Net2.0以上的版本);正如其他地方已经提到的,看看使用IronRuby,如果这是您的技术选择。有一个主题是here.请注意,最后一篇文章实际上来自JohnLam(看起来像是2009年3月),他似乎很自在地断言RubyCL
我一直致力于让我们的Rails2.3.8应用程序在JRuby下正确运行。一切正常,直到我启用config.threadsafe!以实现JRuby提供的并发性。这导致lib/中的模块和类不再自动加载。使用config.threadsafe!启用:$rubyscript/runner-eproduction'pSim::Sim200Provisioner'/Users/amchale/.rvm/gems/jruby-1.5.1@web-services/gems/activesupport-2.3.8/lib/active_support/dependencies.rb:105:in`co
我正在尝试在Ruby中复制Convert.ToBase64String()行为。这是我的C#代码:varsha1=newSHA1CryptoServiceProvider();varpasswordBytes=Encoding.UTF8.GetBytes("password");varpasswordHash=sha1.ComputeHash(passwordBytes);returnConvert.ToBase64String(passwordHash);//returns"W6ph5Mm5Pz8GgiULbPgzG37mj9g="当我在Ruby中尝试同样的事情时,我得到了相同sha