張立新

摘 要:本文介紹了基于ASP技術(shù)的新疆旅游專題學(xué)習(xí)網(wǎng)站建設(shè)的背景、設(shè)計思路、功能模塊和部分模塊的實現(xiàn)方法。網(wǎng)站實現(xiàn)的功能主要包括課程信息、教學(xué)內(nèi)容、學(xué)習(xí)導(dǎo)航、學(xué)習(xí)交流、制作群體和引用說明等。網(wǎng)站基于Windows Server 2003+IIS6.0平臺,利用ASP技術(shù)編寫代碼,數(shù)據(jù)庫采用高性能的MS SQL Server 2000。靜態(tài)網(wǎng)頁使用HTML和JavaScript,動態(tài)網(wǎng)頁則使用ASP,在核心的數(shù)據(jù)庫使用部分,則使用ASP的ADO操作數(shù)據(jù)庫。其中,本文重點介紹了在線考試模塊的實現(xiàn)技術(shù)。

關(guān)鍵詞:新疆旅游 專題學(xué)習(xí)網(wǎng)站 ASP

中圖分類號: G434文獻標(biāo)識碼:B 文章編號:1673-8454(2009)17-0023-04

一、網(wǎng)站設(shè)計思路與開發(fā)背景

新疆旅游專題學(xué)習(xí)網(wǎng)站是我中心2007年承接的校內(nèi)課題,下面以它為例談?wù)剬ｎ}學(xué)習(xí)網(wǎng)站的設(shè)計思想和開發(fā)背景。

1.選題

“新疆旅游”是高校旅游專業(yè)學(xué)生的一門必修課,該課程是對旅游專業(yè)知識的有力補充,更是新疆旅游實訓(xùn)與實踐的基礎(chǔ)課程,因而在旅游專業(yè)教學(xué)中占有重要地位。該課題就目前我們所了解的情況來看,在新疆高校中尚屬首例。建設(shè)本專題學(xué)習(xí)網(wǎng)站的主要意義是以點帶面,以新疆旅游這門課程為試點,推動和促進學(xué)校的教學(xué)改革,實現(xiàn)信息技術(shù)與新疆旅游課程的整合。

2.適用對象

該學(xué)習(xí)網(wǎng)站適用于旅游管理專業(yè)、酒店管理專業(yè)大專生在教師的指導(dǎo)下進行課堂學(xué)習(xí),同時可滿足師生在課余時間進行交流和學(xué)生自學(xué)。

3.教學(xué)目標(biāo)

新疆旅游課程作為旅游管理專業(yè)的核心課程,要求學(xué)生掌握新疆地理、歷史、人文及旅游景點相關(guān)知識。同時,該課程還具有一層深遠的意義:讓每一個新世紀(jì)的大學(xué)生了解自己的家鄉(xiāng),激發(fā)熱愛家鄉(xiāng)、熱愛祖國的美好感情,培養(yǎng)學(xué)生的民族自豪感和榮譽感。在學(xué)習(xí)的過程中,逐漸熟悉自己的家鄉(xiāng),樹立扎根邊疆、振興新疆旅游事業(yè)的堅定信念。

4.開發(fā)背景

新疆旅游是一門主題式的教學(xué)課程,在教學(xué)過程中應(yīng)體現(xiàn)學(xué)生自主學(xué)習(xí)、協(xié)作學(xué)習(xí)和探究學(xué)習(xí)的過程,實現(xiàn)學(xué)生與學(xué)生、學(xué)生與教師、學(xué)生與課堂多元評價體系,但長期以來缺少這樣一個平臺來實現(xiàn)這一目標(biāo)。同時,在教學(xué)過程中我們發(fā)現(xiàn),由于學(xué)生人數(shù)多,不便于集中管理。除了課堂的面授教學(xué)外,存在師生見面機會較少、教學(xué)日常通知不能及時發(fā)布、學(xué)生在學(xué)習(xí)過程中有問題不能及時求教教師,教學(xué)資源不易共享等問題。

新疆旅游專題學(xué)習(xí)網(wǎng)站開發(fā)的目的是為給新疆旅游課程的教學(xué)提供一個輔助性的網(wǎng)絡(luò)教學(xué)平臺,以改變傳統(tǒng)的教學(xué)模式,提高新疆旅游課程的教學(xué)質(zhì)量。通過這一平臺,教師可以發(fā)布公告、提供學(xué)習(xí)資源,師生可以在BBS中就學(xué)習(xí)問題共同探討,學(xué)生還可以進行在線學(xué)習(xí)和測試,對自己的學(xué)習(xí)效果進行評價。

二、網(wǎng)站主要功能模塊和主要頁面設(shè)計

1.網(wǎng)站的主要功能模塊

考慮到實際教學(xué)過程中主要存在著教師授課、實踐教學(xué)、學(xué)生自學(xué)、師生交流等方面的需要,新疆旅游專題學(xué)習(xí)網(wǎng)站設(shè)計了六個主要的功能模塊,分別為課程信息、教學(xué)內(nèi)容、學(xué)習(xí)導(dǎo)航、學(xué)習(xí)交流、制作群體和引用說明。其中,為了方便師生交流和學(xué)習(xí)者在自我評價過程中進行身份識別,學(xué)習(xí)交流和教學(xué)內(nèi)容中的在線測試兩個子模塊需要對用戶進行身份驗證,其他模塊均為匿名訪問。專題學(xué)習(xí)網(wǎng)站的功能結(jié)構(gòu)如圖l所示。

(1)課程信息

從課程描述、課程計劃、課程大綱、教學(xué)對象和課程學(xué)時等五個方面展開,對新疆旅游課程進行了概述,學(xué)生可通過此模塊從總體上了解課程的教學(xué)目標(biāo)等概要信息。

(2)教學(xué)內(nèi)容

從網(wǎng)絡(luò)教材、電子教室、授課錄像、相關(guān)資源、圖像資源、在線測試和復(fù)習(xí)思考七個方面依據(jù)教學(xué)大綱要求對新疆旅游課程展開介紹,學(xué)習(xí)內(nèi)容圖文并茂,編排生動,突出重點,激發(fā)了學(xué)生的學(xué)習(xí)積極性。

(3)學(xué)習(xí)導(dǎo)航

給出了整個網(wǎng)站的結(jié)構(gòu),方便學(xué)生隨時進行網(wǎng)站導(dǎo)航和瀏覽。

(4)學(xué)習(xí)交流

我們通過開辟討論區(qū)來加強老師和學(xué)生的交流,可先讓老師當(dāng)版主來確定要討論的多個主題,對這部分有興趣的學(xué)生可以在此討論,學(xué)生可以利用所學(xué)知識,充分發(fā)表自己的觀點,遇到問題也可以通過提問討論,將一些課堂上沒有解決的問題放在這里來解決。論壇分為師生課程教學(xué)交流、教改研究與效果反饋、課程學(xué)習(xí)與心得交流、戶外郊游、疑難解答五個版面,所有的任課教師出任各個版面的版主,對帖子進行管理。

(5)制作群體

給出了網(wǎng)站制作團隊的名單。

(6)引用說明

給出了專題學(xué)習(xí)網(wǎng)站相關(guān)的資源鏈接,對本網(wǎng)站進行必要的外部資源補充。

2.主要頁面設(shè)計

網(wǎng)站主頁面采用上左右結(jié)構(gòu),上方為主要的菜單導(dǎo)航條,左側(cè)為次要菜單導(dǎo)航條,右側(cè)為內(nèi)容區(qū)。學(xué)生機房使用的計算機顯示器分辨率大多為800×600(單位:像素),除去瀏覽器邊框以后可視范圍為778×423,網(wǎng)站主要頁面都采用一個寬度為778像素的表格來控制頁面尺寸。

3.系統(tǒng)的開發(fā)工具及實現(xiàn)

(1)系統(tǒng)的開發(fā)工具

網(wǎng)站前臺采用ASP技術(shù),后臺數(shù)據(jù)庫使用MS SQL Server 2000。頁面相關(guān)部分使用Dreamweaver 2008設(shè)計,而網(wǎng)站與數(shù)據(jù)庫的連接使用ASP提供的ADO(ActiveX Data Objects)技術(shù)實現(xiàn)。ASP是Active Server Pages(活動服務(wù)器頁面)的簡稱,它是Microsoft推出的服務(wù)器端腳本編寫環(huán)境,使用它可以創(chuàng)建和運行動態(tài)、交互的Web服務(wù)器應(yīng)用程序。通過ODBC(Open Database Connectivity)接口,不僅可以訪問Access、FoxPro、SQL Server等數(shù)據(jù)庫,而且還可以使用提供了ODBC驅(qū)動程序的第三方產(chǎn)品。ADO是ASP內(nèi)置的Active X服務(wù)器組件,它提供高效連接ODBC數(shù)據(jù)庫或OLE(Object Linking and Embedding)DB數(shù)據(jù)源的功能,可以把它與ASP結(jié)合起來,建立提供數(shù)據(jù)庫信息的網(wǎng)頁內(nèi)容,對數(shù)據(jù)庫進行查詢、插入、更新和刪除。腳本語言則使用了VBScript(Visual Basic Script)。

(2)部分模塊的系統(tǒng)實現(xiàn)

由于篇幅有限,本文僅重點介紹教學(xué)內(nèi)容模塊中的在線測試子模塊的系統(tǒng)實現(xiàn)。在線測試子模塊實現(xiàn)在線考試的功能,在線考試是專題學(xué)習(xí)網(wǎng)站中必不可少的功能之一,其功能模塊主要包括注冊和登錄、在線考試、在線管理(包括用戶管理和試卷管理)和在線閱卷。這里主要介紹其中的“在線考試”模塊的設(shè)計。

1)數(shù)據(jù)庫設(shè)計

根據(jù)系統(tǒng)功能設(shè)計的要求,同時考慮到新疆旅游課程的老師自己已在以前的教學(xué)中用Microsoft Excel建設(shè)了單選、多選和判斷題題庫,為繼續(xù)方便老師的使用和維護,并使老師能及時更新題庫,我們以此Excel工作簿來作為在線考試系統(tǒng)的數(shù)據(jù)庫(這里起名為test.xls),主要包括四個工作表,即四個數(shù)據(jù)表:單選、多選、判斷和用戶表。其數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)如表1所示。

2)數(shù)據(jù)庫連接和數(shù)據(jù)庫操作

數(shù)據(jù)庫連接通過ADO對象模型中的Connection對象進行。首先建立一個Connection對象實例。

Set conn=Server.CreateObject (“ADODB.Connection”)

然后使用Connection對象的Open方法打開數(shù)據(jù)庫(這里是Excel工作簿):

Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False; Data Source=" & Server.MapPath(“test.xls”) & ";Extended Properties='Excel 8.0;HDR=Yes'"

如果打開的是Access 數(shù)據(jù)庫,則用如下語句打開數(shù)據(jù)庫:

Conn.Open “Driver={Microsoft Access Driver(*.mdb)};Dbq=” & Server.MapPath(“test.mdb”)

當(dāng)需要進行數(shù)據(jù)表(這里是Excel工作表)操作的時候,建立一個Recordset對象:

Set rs=Server.Createobject(“Adodb.Recordset”)

使用連接對象的Execute方法對數(shù)據(jù)表(Excel工作表)進行操作,其主要語法為:

Set rs=Conn.Execute(sql),使用SQL語句操作數(shù)據(jù)表,并將結(jié)果返回給一個Recordset對象rs。

操作結(jié)束后,關(guān)閉數(shù)據(jù)庫(Excel工作簿)和記錄集對象:

rs.Close

Set rs=Nothing

Conn.Close

Set Conn= Nothing

3)為方便用戶的使用,這里容許用戶隨意輸入班級和姓名進行登錄和測試。登錄進去后,用戶可選擇單選、多選和判斷題的題目數(shù)量,然后由系統(tǒng)進行隨機抽題后呈現(xiàn)給用戶指定數(shù)目的題型,用戶可在限定時間內(nèi)完成測試并提交,系統(tǒng)可立即進行評分,并給出評分結(jié)果,同時給出正確答案。

①生成試卷

對登錄進來的用戶,系統(tǒng)自動按各單選、多選和判斷題試題類型的默認(rèn)題目數(shù)量隨機生成試卷。用戶也可以重新指定各單選、多選和判斷題的題目生成數(shù)量。

在這里,可設(shè)計一個隨機抽取試題的函數(shù),傳入?yún)?shù)為試卷類型(單選、多選或判斷題)、隨機抽題的數(shù)目和抽取的字段名,返回值為一個逗號隔開的按指定數(shù)目從該題型中隨機抽取的不重復(fù)題號列表字符串(如:“,32,8,21,65,”)。其基本思路如下:

a. 根據(jù)傳入?yún)?shù)里的試卷類型和抽取的字段名確定從指定的工作表中提取指定字段的值,即生成相應(yīng)的select 查詢字符串;

b. 確定工作簿中的相關(guān)工作表類型中可供選擇的題目的數(shù)目(總記錄數(shù));

c. 后面要使用隨機變量,必須知道它的取值范圍,所以根據(jù)傳入?yún)?shù)確定隨機抽題的數(shù)目,如果大于總記錄數(shù),則隨機抽題的數(shù)目賦值為總記錄數(shù),如果小于等于0,則賦值為某個常數(shù)值(如5);

d. 按照上述步驟最終確定的隨機抽題數(shù)目,掃描工作表的題號字段,通過產(chǎn)生不重復(fù)隨機數(shù)的算法,從所有有效的題目中,生成一個逗號隔開的不重復(fù)題號列表字符串。

完整函數(shù)代碼如下:

Function GetRndNumberStr(mSheetName,mcnt1,mField)

‘變量聲明

Dim str,str1,cnt,cnt1,rndMax,RndNumber, recno

Dim SheetName,RsExcel,sqlExcel

‘1部分

SheetName=mSheetName

sqlExcel="select " & mField & " from [" & SheetName & "$] "

Set RsExcel = Server.CreateObject("ADODB.Recordset")

Set RsExcel.ActiveConnection = Conn_Excel

RsExcel.LockType = adLockOptimistic

RsExcel.CursorType = adOpenKeySet

RsExcel.Open sqlExcel, Conn_Excel

‘2部分

RsExcel.MoveLast

cnt = RsExcel.RecordCount

‘3部分

mcnt1=Clng(mcnt1)

cnt=Clng(cnt)

cnt1 = cnt

rndMax = cnt

recno = 0

if mcnt1>cnt then

mcnt1=cnt

end if

if mcnt1<=0 then

mcnt1=5

end if

cnt1=mcnt1

‘4部分

str = ","

str1 = ","

Do Until cnt1 = 0 or recno>cnt

‘產(chǎn)生隨機數(shù)

Randomize

RndNumber = Int(Rnd * rndMax)

‘保證產(chǎn)生的隨機數(shù)不重復(fù)

If (InStr(1,str1,"," & RndNumber & ",") = 0) Then

str1 = str1 & RndNumber & ","

cnt1 = cnt1 - 1

RsExcel.MoveFirst

RsExcel.MoveRndNumber

‘生成一個逗號隔開的按指定數(shù)目從該題型中隨機抽取的不重復(fù)題號列表字符串

str = str & Cstr(RsExcel(mField)) & ","

recno = recno + 1

End If

Loop

RsExcel.Close

Set RsExcel = Nothing

GetRndNumberStr=str

End Function

②接下來,可通過如下SQL語句調(diào)用該隨機抽題函數(shù),從指定試題庫(單選、多選和判斷題)中查找所有題號在返回的隨機抽取的題號字符串里的試題,并讀取試題內(nèi)容顯示在頁面上,生成指定題型和數(shù)目的試卷。

sqlExcel = "SELECT * FROM [試題庫$] WHERE ((InStr(1,′" & GetRndNumberStr("單選",30,"題號") & "′,(′,′ & [題號] & ′,′)))<>0)"

三、總結(jié)

新疆旅游專題學(xué)習(xí)網(wǎng)站投入使用后運行穩(wěn)定,響應(yīng)速度較快。使用此專題學(xué)習(xí)網(wǎng)站學(xué)生不僅可以瀏覽教學(xué)課件,

還可以進行課后練習(xí)和模擬測驗。由于模擬測驗是采用隨機抽題的方式組卷,因此其與靜態(tài)試卷表單相比,具有組卷方式靈活、試題更新方便等特點。另外,互動空間的各交流版面也為師生提供了一個課后交流的場所。學(xué)生在學(xué)習(xí)中遇到了問題可以及時獲得解答,大大提高了學(xué)生學(xué)習(xí)的興趣。

參考文獻:

[1]龐婭娟.ASP網(wǎng)絡(luò)編程自學(xué)手冊[M].北京:人民郵電出版社,2008.3.

[2]王晶. ASP網(wǎng)站建設(shè)技術(shù)[M].北京:機械工業(yè)出版社,2007.6.

[3]劉煬.ASP網(wǎng)絡(luò)程序設(shè)計[M].合肥:合肥工業(yè)大學(xué)出版社,2007.2.

[4]薛小龍.ASP典型系統(tǒng)實戰(zhàn)與解析[M].北京:電子工業(yè)出版社,2007.1.

[5]陶國榮.ASP動態(tài)商業(yè)網(wǎng)站建設(shè)案例[M].北京:人民郵電出版社,2006.12.