国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

用ASP開發一個在線考試程序(六)

2019-11-18 22:16:14
字體:
來源:轉載
供稿:網友
測驗代碼
  Exam.asp 提供一系列的題目和以單選按鈕為格式的選項。為了使測驗更具挑戰性,還要有時間限制。我設置了一個裝
載時自動啟動的時鐘,將其時間設為20秒。剩余的時間在屏幕底部的狀態窗口中顯示。時間因素同題目個數一樣可以改
變。為了在每次會員想要參加考試時,都從數據庫中選擇不同的題目,我使用了隨機函數。在數據庫中,題目的個數固定為
10個,每次會員回答5個問題。所有的題目都一起顯示出來,然后開始計時。以下代碼是計時器的函數:
< script language="javaScript" >
var ck=0;
var tf=0;
var timeUp=0;
var timeLeft=0;
var tcount=0;
TimerFunc();
function TimerFunc() {
tf=window.setTimeout("TimerFunc();",1000);
tcount++;
timeLeft=20 - tcount;
window.status = timeLeft + " Seconds remaining";
}
< /script >
  要注意,沒有時間限制的測驗是沒有樂趣的。
這頁的查詢是這樣的:
id = Request.QueryString ("section")
session("id") = id
sql_tblname = "select tbl_name from paper where id="&id
Set RS_tblname = application("Conn").Execute(sql_tblname)
subject= RS_tblname(0)
MyString = Split(subject,"tbl",-1,1)
  查詢字符串存儲在一個 session("id")中, 按順序啟動查詢。這個SQL聲明的目的是從試卷表格中找到表格名。使用
split 函數的目的是從結果中去掉tbl。(我使用了表格名前加tbl前綴的命名慣例)。一旦找到了表格名,就開始了向指
定表格的查詢。為了使應用程序更有意思,我使用了隨機函數,生成從1到10之間的任意數字。這些數字用來從指定的科目
表格中選取id:
sql_details = "select a.id, a.question, a.choice1, a.choice2,a.choice3, " &_
" a.choice4 from " & subject & " a where a.id="&MyArray(Counter)
  在這個查詢中,id,question、 choice1、 choice2、 choice3、 choice4 都是科目表格中的域名。
MyArray(Counter) 是已經生成的隨機數字。

  測驗結束后,結果被存儲起來并被增加到數據庫的細節表格中。這樣會員就能看到測驗的結果了。(在本例中,我只
保留了科目的一個記錄和百分制的分數。還可以有一個時間-日期標志。)



發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 揭西县| 花垣县| 堆龙德庆县| 元朗区| 滨海县| 宜黄县| 改则县| 泾川县| 广德县| 页游| 蒙自县| 镶黄旗| 宜宾市| 屯留县| 项城市| 广元市| 个旧市| 屯昌县| 余庆县| 无棣县| 合阳县| 岳普湖县| 道孚县| 光泽县| 大洼县| 金平| 永善县| 沾化县| 岢岚县| 甘肃省| 汝南县| 长治市| 祁东县| 彰武县| 清新县| 大城县| 手游| 丘北县| 南昌县| 乌兰察布市| 中牟县|