login.asp<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />
' 考生驗證.
<％@ language=vbscript％>
<％
name=trim(request("name"))
passwd=trim(request("passwd"))
if name<>"" and passwd<>"" then
' 檢查考生是否輸入使用者名稱和密碼.
set conn = server.createobject("adodb.connection")
conn.open "driver=;
dbq="＆ server.mappat("exercise.mdb")
set rs= server.createobject("adodb.recordset")
sql= "select ＊ from user where user=
'" ＆name＆"' and passwd='" ＆ passwd ＆"'"
set rs= conn.execute(sql)
' 驗證考生合法性.
if not(rs.eof) then
if rs("score")<>0 then
' 檢查考生是否已參加過考試,若是則進行成績查詢.
response.write rs("user")＆"的考試成績是"＆rs("score")
else
session("pass")=1
session("user")=name
response.redirect "test.asp"
end if
else
response.write "噢,您輸入的使用者名稱或密碼不正確!"
end if
else
end if
％>
撼雪噴雲之考生登入
＆nbsp;
＆nbsp;
考生:密碼:
程式設計客棧" type=password>
進入 " style="font－size: medium; font－style: normal程式設計客棧; font－variant:normal; font－weight: bold" title="">
test.asp
' 從題庫中取題考試.
<％@ language=vbscript ％>
<％
if session("pass")<>1 then
response.redirect "login.asp"
else
end if
set conn = server.createobject("adodb.connection")
conn.open "driver=;
dbq="＆ server.mappath("exercise.mdb")
sql="select ＊ from test"
set rs = conn.execute( sql )
' 提取試題.
％>
' 以上是乙個計時函式.
' 呼叫計時函式顯示時間.
timehourminsec
' 顯示試題.
＆nbsp;
<％
i=1rs.movefirst
do while not rs.eof％>
＆nbsp;＆nbsp; <％=rs("question")％>
％">
網上員工考試培訓系統
設計目的及任務 1 實現設計內容的全部功能模組 2 查閱相關參考文獻，熟悉設計內容，掌握設計方法 3 開發出乙個完整的專案系統 4 按照 撰寫格式完成畢業 並參加 答辯 5 答辯進行系統執行演示。設計思路 參考查閱的資料，掌握ssh框架的基本原理及考試培訓系統的功能及流程，初步設計資料模型，參考已經...
如何網上炒股
首先憑身份證到當地的 登記公司 有的券商也代辦 辦理乙個滬深交易所的股東賬戶卡，選擇一家 營業部開戶，簽訂乙份合同，領取資金賬戶卡，存入一定現金 支票 如何買賣 買賣 時必須指明買進或賣出，買賣 的名稱 或 數量 並且這一委託只在下達委託的當日有效。委託的內容包括你要買賣 的簡稱 數量及買進或賣出 ...
如何在網上找工作
網際網路確實是乙個不錯的工具，利用網際網路你可以找到獵頭公司 招聘資訊 單位資料等等，然而它也很容易讓你迷失方向，成為資訊過載的受害者。你也許花了大量時間在網上衝浪，可到頭來連個頭緒都理不出來。所以 上網之前 三思 在尋找東西之前先要知道找的是什麼，找工作也一樣，必須先知道自己想要的工作是什麼！所以...