【正文】 }/script () end if if len(pwd)6 or len(pwd)20 then script language=JavaScript{(39。loginamp。 代理 IP ip22 =(REMOTE_ADDR) if ip11 = then ipjg = ip22 else ipjg = ip11 end if jgpame=(HTTP_USER_AGENT) sql_jgdiary=select * from jg_login set rs_jgdiary=() sql_jgdiary,conn,1,2 rs_jgdiary(id)=id rs_jgdiary(login)=login rs_jgdiary(name)=name rs_jgdiary(logintime)=now rs_jgdiary(loginip)=ipjg rs_jgdiary(os)=jgpame set rs_jgdiary=nothing else admin_id=rs(admin_id) session(admin_id)=admin_id adminlogin=rs(adminlogin) adminname=rs(adminname) session(adminlogin)=adminlogin 39。 and adminpwd=39。這是很關(guān)鍵的一步，這里聲明的是 ole db 連接數(shù)據(jù)庫(kù)的方式，只看 data sourse 部分，他后面跟的是數(shù)據(jù)庫(kù)文件的路徑。各個(gè)部分相鏈接。系統(tǒng)管理與設(shè)置模塊是 對(duì)本系統(tǒng)進(jìn)行一些必要的設(shè)置。 教師部分 ? 教師自助注冊(cè)：檢查教師提供的信息并注冊(cè)用戶。 MovePrevious 在前一行定位記錄集。 BeginTrans 開(kāi)始一個(gè)關(guān)于連接的事務(wù)。 (4) 通過(guò) MoveFirst、 MoveLast、 MoveNext 和 MovePrevious 方法可以對(duì)記錄集的游標(biāo) 進(jìn)行移動(dòng)操作。 Connection 對(duì)象是 ADO 的基本對(duì)象之一，它獨(dú)立于所有其他的對(duì)象。 ADO 最早被用于Microsoft Inter In formation Server 中訪問(wèn)數(shù)據(jù)庫(kù)的接口，與一般的數(shù)據(jù)庫(kù)接口相比， ADO 可更好地用于網(wǎng)絡(luò)環(huán)境，通過(guò)優(yōu)化技術(shù)，它盡可能地降低網(wǎng)絡(luò)流量。它比其他的一些對(duì)象 模型如 DAO(Data Access Object)、 RDO(Remote Data bject)等具有更好的靈活性，使用更為方便，并且訪問(wèn)數(shù)據(jù)的效率更高。使用 ADO 編寫(xiě)的應(yīng)用程序可以通過(guò) OLE DB 提供者訪問(wèn)和操作數(shù)據(jù)庫(kù)服務(wù)器中的數(shù)據(jù)。現(xiàn)在我們利用 IIS+ASP 構(gòu)成三層式 Web結(jié)構(gòu)（如圖 所示）的中間一層，將客戶機(jī) /服務(wù)器結(jié)構(gòu)與 Web 密切結(jié)合，完成前后端兩者的集成輸出功能，使得 Web站點(diǎn)的開(kāi)發(fā)更方便，實(shí)現(xiàn)的功能更強(qiáng)大。 國(guó)內(nèi)第一家大規(guī)模、高標(biāo)準(zhǔn)的 ASP 企業(yè)應(yīng)該是世紀(jì)互聯(lián)（ ） ,目前它主要提供數(shù)據(jù)中心業(yè)務(wù)，在世紀(jì)互聯(lián)的數(shù)據(jù)中心，共存放著 600臺(tái)左右的服務(wù)器由其照管 ，其中的 30%為世紀(jì)互聯(lián)所有，以出租形式為網(wǎng)站服務(wù)，其余的 70%是網(wǎng)站自身?yè)碛械?，托管給世紀(jì)互聯(lián)。這些優(yōu)點(diǎn)能夠極大地提高教務(wù)信息管理的效率。 第三階段：（ 1970 年至今）管理信息系統(tǒng)階段。傳統(tǒng)的學(xué)校管理活動(dòng)中，把人、才、物作為學(xué)校的主要資源。 系統(tǒng)開(kāi)發(fā)采用 Microsoft 公司的 ASP，利用其強(qiáng)大功能及對(duì)數(shù)據(jù)庫(kù)的支持，先構(gòu)造一個(gè)原型，逐步增加功能，最終滿足需求。這是電子計(jì)算機(jī)在管理領(lǐng)域應(yīng)用的起步階段。它已經(jīng)被應(yīng)用于許多領(lǐng)域，計(jì)算機(jī)之所以如此流行的原因主要有以下幾個(gè)方面： 首先，計(jì)算機(jī)可以代替人工進(jìn)行許多繁雜的勞動(dòng)； 其次，計(jì)算機(jī)可以節(jié)省許多資源； 第三，計(jì)算機(jī)可以大大的提高人們的工作效率； 第四，計(jì)算機(jī)可以使敏感文檔更加安全，等等。 另一方面，隨著計(jì)算要的普及，開(kāi)發(fā)使用一套這樣的系統(tǒng)成本低、難度低，但卻有著極強(qiáng)的社會(huì)價(jià)值 第二章、 ASP 技術(shù)綜述 ASP 技術(shù) 的定義與特征 ASP 是英文 APPLICATION SERVICE PROVIDER 的縮寫(xiě)，通常中文譯為應(yīng)用服務(wù)提供商，它是指配置、租賃和管理應(yīng)用解決方案，為商業(yè)、個(gè)人提供服務(wù)的專業(yè)化服務(wù)公司。 Windows Advanced Server 按每個(gè)處理器月收費(fèi) 569 美元， SQL Server 按每個(gè)處理器月收費(fèi) 999 美元， Exchange 的 Knowledge Worker Pro 版按每個(gè)用戶月收費(fèi) 6美元 99美分等。 而 Session 對(duì)象僅屬于一位用戶，維持一個(gè)用戶端的信息，其他用戶無(wú)法訪問(wèn)，它創(chuàng)建于一個(gè)不具有 Session 的用戶向 Server 請(qǐng)求一個(gè) ASP 文件時(shí)，結(jié)束于該 Session 到期（即用戶端超過(guò)某時(shí)間段沒(méi)有向 Server 提出要求或刷新 Web 頁(yè)面）或 Abandon 語(yǔ)句的調(diào)用。 UDA 技術(shù)使得應(yīng)用通過(guò)一致的接口來(lái)訪問(wèn)各種各樣的數(shù)據(jù)，而不管數(shù)據(jù)駐留在何處，也不需要 進(jìn)行數(shù)據(jù)轉(zhuǎn)移或復(fù)制、轉(zhuǎn)換，在實(shí)現(xiàn)分布式的同時(shí)也帶來(lái)了高效率。 可以說(shuō)一致數(shù)據(jù)訪問(wèn)技術(shù)的核心是 OLE DB， OLE DB 建立了數(shù)據(jù)訪問(wèn)的標(biāo)準(zhǔn)接口，它把所有的數(shù)據(jù)源經(jīng)過(guò)抽象形成行集 (rowset)的概念。由于 OLE DB既可提供關(guān)系型數(shù)據(jù)源，也可以提供非關(guān)系型數(shù)據(jù)源，所以在非關(guān)系型數(shù)據(jù)源上使用傳統(tǒng)的 SQL 命令查詢數(shù)據(jù)有可 能無(wú)效，甚至 Command 命令對(duì)象也不能使用。 (2) 動(dòng)態(tài)游標(biāo) 允許各種移動(dòng)操作，包括前移、后移等等，并且其他用戶所做的操作也可以直接反映出來(lái)。這樣既使得 ADO很靈活，又提供了很好的擴(kuò)展性。 Close 關(guān)閉記錄集。根據(jù)客戶的需求總結(jié)系統(tǒng)主要完成的功能。 ? 如果用戶還不是會(huì)員可以進(jìn)入注冊(cè)界面模塊成為會(huì)員。查詢統(tǒng)計(jì)與打印模塊是方便管理員查詢教工信息。 首先要建立同數(shù)據(jù)源的連接，我們利用 ADO 的 Connection 來(lái)建立同數(shù)據(jù)庫(kù)的連接。對(duì)不起，帳號(hào)和密碼不能為空 !39。 amp。首先是 。報(bào)錯(cuò)：您的密碼不能為空 !39。39。(1)。(1)。 39。 登錄校驗(yàn)及登錄信息更新（ ） % dim loginname ,loginpwd,access loginname=replace(trim(request(loginname)),39。 該系統(tǒng)的實(shí)體有管理員信息實(shí)體、用戶信息實(shí)體 如圖 3 所示。 管理員 教工管理 查詢統(tǒng)計(jì)與打印 系統(tǒng)管理與設(shè)置 操作日記管理 退出 圖示 33 用戶部分系統(tǒng)流程 管理端設(shè)計(jì)和用戶端相似，首先判斷用戶是否有管理員權(quán)限，如果是管理員，則進(jìn)入管理員主界面，進(jìn)入管理員操作教工管理模塊是方便管理員對(duì)教師 進(jìn)行管理。 功能模塊部分 教師管理系統(tǒng)應(yīng)該有用戶注冊(cè)登錄、查看用戶信息、修改用戶資料、查看最近活動(dòng)。 UpdateBatch 向數(shù)據(jù)源提交在當(dāng)前批量更新中所作的任何變化。 CancelUpdate 取消對(duì)當(dāng)前行所做的任何變化。 上面 3 個(gè)對(duì)象都包含一個(gè) Property 對(duì)象集合的屬性 , 通過(guò) Property 對(duì)象可使ADO 動(dòng)態(tài)暴露出底層 OLE DB 提供者的性能。記錄集是 ADO 管理數(shù)據(jù)的基本對(duì)象，所有的 Recordset 對(duì)象都按照行列方式的表狀結(jié)構(gòu)進(jìn)行管理，每一行對(duì)應(yīng)一個(gè)記錄(Record)，每一列對(duì)應(yīng)一個(gè)域 (Field)。不同的數(shù)據(jù)源可以使用不同的命令語(yǔ)言，對(duì)于關(guān)系型數(shù)據(jù)庫(kù)，通常使用 SQL 作為命令語(yǔ)言。 從圖 1可以看出 ADO 是以 OLE DB 為基礎(chǔ)，它對(duì) OLE DB 進(jìn)行了封裝。這樣做雖然能夠按統(tǒng)一的方式對(duì)數(shù)據(jù)進(jìn)行各種操作，但這種間接訪問(wèn)方式也帶來(lái)了很多問(wèn)題，比如數(shù)據(jù)更新不及 時(shí)、空間資源的冗余和訪問(wèn)效率低等等。 前面已經(jīng)提到 Application和 Session這兩個(gè) ASP的內(nèi)部對(duì)象。 微軟也宣布了其 Office 2020 和 Windows 通過(guò) ASP 商租用的價(jià)格計(jì)劃。這樣誓必增加了教師的額處負(fù)擔(dān)。這又大大的推動(dòng)了學(xué)校的信息化進(jìn)程。從工業(yè)發(fā)達(dá)國(guó)家來(lái)看，管理信息系統(tǒng)的發(fā)展經(jīng)歷了以下幾個(gè)階段。 教師管理系統(tǒng)是典型的信息管理系統(tǒng) ,其開(kāi)發(fā)主要包括后臺(tái)數(shù)據(jù)庫(kù)的建立和維護(hù)以及前端應(yīng)用程序的開(kāi)發(fā)兩個(gè)方面 .對(duì)于前者要求建立數(shù)據(jù)一致性和完整性強(qiáng) ,數(shù)據(jù)安全性好 的數(shù)據(jù)庫(kù) .而對(duì)于后者則要求應(yīng)用程序功能完備 ,易使用等特點(diǎn)。 本世紀(jì)以來(lái)，由于社會(huì)生產(chǎn)力的迅速發(fā)展和科學(xué)技術(shù)的突飛猛進(jìn)，人們進(jìn)行信息交流的深度和廣度不斷增加，管理所需要的信息量急劇增長(zhǎng)，同時(shí)對(duì)信息的處理要求及時(shí)、準(zhǔn)確，這導(dǎo)致了傳統(tǒng)的信息處理方法和手段已不能適應(yīng)現(xiàn)代管理的需要；電 子計(jì)算機(jī)的誕生和在信息處理中的應(yīng)用，標(biāo)志著一個(gè)嶄新時(shí)代 —— “信息時(shí)代”的開(kāi)始，它使學(xué)校管理現(xiàn)代化成為可能。這個(gè)階段的處理方式是在數(shù)據(jù)庫(kù)和網(wǎng)絡(luò)基礎(chǔ)上組成分布式處理系統(tǒng)。 當(dāng)前，很多學(xué)校，還以手工的方式，處理學(xué)生學(xué)籍、教師信息、及學(xué)生成績(jī)信息。 在美國(guó)市場(chǎng)， ASP 是近年來(lái)最熱門的話題之一，幾乎每天都有關(guān)于一些軟件公司或系統(tǒng)集成商加入 ASP 領(lǐng)域的消息。這 6 個(gè)對(duì)象及其功能描述如表 所示。 ADO 在關(guān)鍵的應(yīng)用方案中使用最少的網(wǎng)絡(luò)流量，并且在前端和數(shù)據(jù)源之間使用最少的層數(shù)，所有這些都是為了提供輕量、高性能的接口。這組接口封裝了各種數(shù)據(jù)系統(tǒng)的訪問(wèn)操作，為數(shù)據(jù)使用方和數(shù)據(jù)提供方建立了標(biāo)準(zhǔn)。這兩個(gè)特性使得 ADO 必將取代 RDO 和 DAO，成 為最終的應(yīng)用層數(shù)據(jù)接口標(biāo)準(zhǔn)。使用 Execute 方法比較簡(jiǎn)便，但用 Command 對(duì)象可以保存命令的信息，以便多次查詢。 (5) ADO 提供了兩種記錄修改方式：立即修改和批修改。 RollbackTrans 重新進(jìn)行在當(dāng)前事務(wù)中所做的任何修改。 Open 用于直接打開(kāi)一個(gè)記錄集，而不是作為其它對(duì)象的方法的結(jié)果，如命令或連接。 ? 修改用戶資料：修改用戶個(gè)人 信息。操作 日記管理模塊 主 要 是 記 錄 教 工 和 管 理 員 登 錄 以 及 教 工 修 改 信 息 。 ? 管理員可以瀏覽、修改和刪除管理信息，包括教師信息、管理員信息。 在 7~9 行寫(xiě)了一個(gè)判斷錯(cuò)誤的信息，如果連接數(shù)據(jù)庫(kù)錯(cuò)誤，系統(tǒng)會(huì)給出一個(gè)錯(cuò)誤，這時(shí)候通過(guò) asp 的 err 對(duì)象判斷錯(cuò)誤的存在，首先將錯(cuò)誤信息從內(nèi)存清除，然后將 conn 對(duì)象從內(nèi)存中清除。 loginpwd amp。 39。 sql,conn,1,2 if not then set jgrs=nothing script language=JavaScript{(39。)。)。}/script () end if set jgrs=() sql=select login from jg where login=39。 if = 1 then if access=teacher then id = rs(id) login = rs(login) session(jg_id) = id session(jg_login) = login name=rs(name) session(jg_name) = name 39。 loginname amp。數(shù)據(jù)庫(kù)連接錯(cuò)誤 ..../font 10. 11. End If 12. Function CloseDatabase 13. 14. Set Conn = nothing 15. End Function % 第一行是容錯(cuò)語(yǔ)句，發(fā)生錯(cuò)誤后，繼續(xù)執(zhí)行下一句，接下來(lái)就用 dim 聲明了變量 rs,sql,Conn,Connstr,Db， connstr 這個(gè)變量是用來(lái)存儲(chǔ)連接數(shù)據(jù)庫(kù)的信息的，變量 db 聲明了數(shù)據(jù)庫(kù)文件所在的路 徑。合理地設(shè)計(jì)數(shù)據(jù)庫(kù)結(jié)構(gòu)可以提高數(shù)據(jù)庫(kù)存儲(chǔ)的效率，保證數(shù)據(jù)的完整和統(tǒng)一。分教工瀏覽與管理、添加記錄、新教工審核、教工登錄帳戶信息等。其次老師、教學(xué)秘書(shū)等人員分別擁有不同維護(hù)權(quán)限，系統(tǒng)日志更是詳細(xì)記錄了更相關(guān)人員的操作歷史。 MoveLast 把記錄集中的最后一行作為當(dāng)前行。 Close 用于關(guān)閉一個(gè)數(shù)據(jù)源連接和它們相關(guān)對(duì)象。 (3) Recordset 對(duì)象剛打開(kāi)時(shí)，當(dāng)前記錄被定位在首條記錄，并且 BOF 和 EOF標(biāo)志屬性為 False。利用 Connection 對(duì)象，我們可以完成以下一些基本設(shè)置操作： (1) 通過(guò) ConnectionString、 ConnectionTimeOut 和 Mode 屬性設(shè)置連接串、超時(shí)信息、訪問(wèn)模式； (2) 還可以設(shè)置 CursorLocation 屬性以便指定使用客戶端游標(biāo)，以便在客戶程序中使用批處理修改方式； (3) 設(shè)