ASPを使用してオンライン試験システムを実装します

著者：Eve Cole 更新時間：2025-04-25 12:16:02

推奨：ASP 3.0高度なプログラミング（36）
第8章ADOの基本この本の最初の7章では、ASPのコンテンツとASPがWebサイトに動的コンテンツをどのようにもたらすかについてすでに説明しています。スクリプトプログラムにより、カスタムWebページが許可されているため、より強力なASPページを構築できるようになりました。今、ASPが研究されます

インターネットテクノロジーの開発により、オンライン教育は人々の再教育と生涯教育の主な形になります。オンラインスクールでは、人々は時間と空間で制限されることなく、どこでもどこでもコースを選択できます。オンライン学校の開発により、オンライン試験の開発に関する緊急の要件が提示されています。これは、ASPおよびアクセスデータベースを使用して実装したオンライン試験システムです。ユーザーがユーザー名とパスワードでログインすると、システムは最初にユーザーが試験を受けたかどうかを確認します。その場合、スコアクエリを実施します。それ以外の場合は、ユーザーが答えるための質問バンクからテストの質問を抽出します。ユーザーが回答シートを送信すると、システムは結果をデータベースにスコアリングして登録します。

1つ。データベース設計

まず、ユーザーとテストの2つのテーブルを含むデータベースExercise.mdbを作成します。ユーザーテーブルには3つのフィールドが含まれています。

フィールド名：ユーザー;フィールドタイプ：テキスト;フィールドサイズ：20。Storeユーザー名

フィールド名：passwd;フィールドタイプ：テキスト;フィールドサイズ：20。ユーザーパスワードを保存します

フィールド名：スコア;フィールドタイプ：番号;フィールドサイズ：整数。ユーザーの結果を保存します

テストテーブルには5つのフィールドがあります。

フィールド名：質問;フィールドタイプ：テキスト;フィールドサイズ：255。ストア試験の質問

フィールド名：A;フィールドタイプ：テキスト;フィールドサイズ：100。ストレージオプションAの回答

フィールド名：B;フィールドタイプ：テキスト;フィールドサイズ：100。ストレージオプションB回答

フィールド名：c;フィールドタイプ：テキスト;フィールドサイズ：100。ストレージオプションC回答

フィールド名：D;フィールドタイプ：テキスト;フィールドサイズ：100。ストレージオプションへの回答d

フィールド名：ans;フィールドタイプ：テキスト;フィールドサイズ：2。正解を保存します

二。元のプログラムコード

以下は、システム内の3つのコアオリジナルプログラムです。私は、同様のシステムを開発する読者の刺激的な役割を引き受けたいと思っています。また、読者は自分のシステムに適応するためにそれらを改善することもできます。

以下は引用されたコンテンツです。

'login.aspソースプログラム、ユーザーが合法かどうかを確認します

<％@言語= vbscript％>

<％

name = trim（request（name））

passwd = trim（request（passwd））

'ユーザーが情報を入力するかどうかを確認します

name <> and passwd <>の場合

conn = server.createObjectを設定します

（adodb.connection）

conn.open driver = {microsoftアクセス

ドライバー（*.mdb）}; dbq =＆

server.mappath（exercise.mdb）

rs = server.createObject（adodb.Recordset）を設定します

sql = select * fromユーザー= '＆name＆

'そしてpasswd ='＆passwd＆ '

'ユーザーの合法性を確認してください

rs = conn.execute（sql）を設定します

そうでない場合（rs.eof）

ユーザーが試験を受けたかどうかを確認してください。

もしそうなら、グレードクエリを行います

rs（score）<> 0の場合

respons.write rs（user）＆

テストスコアは＆rs（スコア）です

それ以外

セッション（パス）= 1

セッション（ユーザー）=名前

Response.redirect test.asp

ifを終了します

それ以外

Response.Write申し訳ありません、

ユーザーまたはパスワードが正しくありません！！！

ifを終了します

それ以外

ifを終了します

％>

<html>

<head>

<Meta name = generator

コンテンツ= Microsoft Visual Studio 6.0>

<title>ユーザーパスワードチェック</title>

< /head>

<body>

<form action = login.asp id = form1

method = post name = form1>

<p title = align = center> user：

<入力id = text1 name = name

style = height：22px;幅：103px> </p>

<p title = align = center>パスワード：

<入力id = password1 name = passwd

style = height：23px;幅：101px

type = password> </p>

<入力id = submit1 name = submit1

type = submit value = enter style = font-size：

中くらい;フォントスタイル：通常。

Font-Variant：正常; font-weight：

太字のタイトル=> </p>

< /p>

< /form>

< /body>

< /html>

'test.aspソースプログラム、回答のための質問バンクからテストの質問を抽出します

<％@言語= vbscript％>

<％

セッション（パス）<> 1の場合

Response.redirect login.asp

それ以外

ifを終了します

conn = server.createObject（adodb.connection）を設定します

conn.open driver = {microsoftアクセスドライバー

（*.mdb）}; dbq =＆

server.mappath（exercise.mdb）

'テストの質問を抽出します

sql = select * from test

rs = conn.execute（sql）を設定します

％>

'タイマー関数

<スクリプト言語= javascript>

var isn1 = null;

var isn2 = false;

今日= new date（）;

function stopit（）{

if（isn2）{

cleartimeout（isn1）;

}

ISN2 = false;

}

function startit（）{

やめて（）;

isnclock（）;

}

関数isnclock（）{

var now = new date（）;

var hrs = now.gethours（）;

var min = now.getMinutes（）;

var sec = now.getSeconds（）;

document.clckh.disp.value =（（hrs> 12）？

HRS-12：HRS）;

document.clckm.disp.value =（（min <10）？0：）min;

document.clcks.disp.value =（（sec <10）？0：）sec;

document.clck.disp.value =（hrs> = 12）？ PM：AM;

isn1 = setimeout（isnclock（）、1000）;

ISN2 = true;

}

< /script>

<html>

<head>

<Meta name = generator

コンテンツ= Microsoft Visual Studio 6.0>

< /head>

'タイミング関数を呼び出して時間を表示します

<テーブルボーダー= 2>

<tr>

<td>時間< /td> <td> hour < /td> <td> min

< /td> <td> sec < /td> <td> < /td>

< /tr>

<tr>

<入力タイプ=テキスト名= disp size = 2 value =>

< /form> < /td>

<入力タイプ=テキスト名= disp size = 2 value =>

< /form> < /td>

<入力タイプ=テキスト名= disp size = 2 value =>

< /form> < /td>

<td valign = top> <form name = clck

onsubmit = 0>

<入力型=テキスト名= disp size = 4 value =>

< /form> < /td> < /tr>

< /center>

'応答のためのテストの質問を表示します

<form action = result.asp id = form1

method = post name = form1>

<p>

<％

i = 1

rs.MoveFirst

rs.eof％>ではありません

<Table Align = Center Border = 1 CellPadding = 1

Cellspacing = 1

幅= 80％>

<tr>

<TDスタイル=幅：50％幅= 50％

<入力名= ans <％= i％> type =無線値= a>

<％= rs（a）％> < /td>

type =無線値= b>

<％= rs（b）％> < /td> < /tr>

<tr>

type =無線値= c>

<％= rs（c）％> < /td>

type =無線値= d>

<％= rs（d）％> < /td>

< /tr>

< /table>

<％

i = i 1

rs.movenext

ループ

％>

< /p>

<p align = center> <入力id = submit1 name = submit1

type =送信

value = submit> <入力id = reset1 name = reset1

type = reset value = reset> < /p> < /form>

< /body>

< /html>

共有：ASP Advanced：ASPを使用して、統計的なパイチャート、バーチャートなどを作成します。
私たちの作業では、データを容易にして直感的な分析を促進するために、データをバーチャート、パイチャートなどに変換する必要があります。ここでは、ASP：CSDRAWGRAPH、CSDGT.ZIPでパイチャートとバーチャートを作成するコンポーネントを紹介します。コンポーネントであるため、使用する前にREGSVを使用する必要があります。

2ページの前のページ12次のページ次のページ