用ASP開發一個在線考試程序（九）
數據庫的連接
為了運行這個應用程序我使用了global.asa 。運行global.asa 文件的細節在以前的文章- Using Global.asa Correctly 有詳細描述。
< SCRIPT LANGUAGE=VBScript RUNAT=Server >
Sub Application_OnStart
dbPath = "DBQ=" & Server.Mappath("onlinetest.mdb")
dbConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbPath
Set Application("Conn") = Server.CreateObject ("ADODB.Connection")
Application("Conn").Open dbConnectionString
End Sub
Sub Application_OnEnd
Application("Conn").Close
Set Application("Conn") = Nothing
End Sub
Sub Session_OnStart
End Sub
Sub Session_OnEnd
End Sub
< /SCRIPT >
結論
這個應用程序非常簡單，但是對于那些想要有在線考試的站點卻是非常有用的。那些在特殊領域有特殊用途的公司也可以使用它，參考者及他們的詳細信息可以從表格中恢復。讀者也許還想進一步探討以增強此應用程序的功能：
● 一次只顯示一個題目。
● 可以從難到易預先設定題目模式。
為了運行這個應用程序我使用了global.asa 。運行global.asa 文件的細節在以前的文章- Using Global.asa Correctly 有詳細描述。
< SCRIPT LANGUAGE=VBScript RUNAT=Server >
Sub Application_OnStart
dbPath = "DBQ=" & Server.Mappath("onlinetest.mdb")
dbConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbPath
Set Application("Conn") = Server.CreateObject ("ADODB.Connection")
Application("Conn").Open dbConnectionString
End Sub
Sub Application_OnEnd
Application("Conn").Close
Set Application("Conn") = Nothing
End Sub
Sub Session_OnStart
End Sub
Sub Session_OnEnd
End Sub
< /SCRIPT >
結論
這個應用程序非常簡單，但是對于那些想要有在線考試的站點卻是非常有用的。那些在特殊領域有特殊用途的公司也可以使用它，參考者及他們的詳細信息可以從表格中恢復。讀者也許還想進一步探討以增強此應用程序的功能：
● 一次只顯示一個題目。
● 可以從難到易預先設定題目模式。