ASP[]ASPWeb,[]ASPADO0Web,BöS(BrowseröServerö)CöS(ClientöServerö),ASP(ActiveServerPages),BöS,,,,ASPBöS,Web,WebBöSASP1ASP1.1ASPASP(ActiveServerPages)IISWeb(InternetInformationServerWeb),,ActiveXASPHTMLVBScriptJavascriptASP,HTMLASP,,Web,(VBScriptJavaScript),,ActiveX,,Web,HTML,ASPHTML,,,,,,HTML,ASP,HTMLASP(%%),.asp,HTML,ASP1.2Web,ADO(ActiveXDataObjectActiveX)WebWeb,Web,ODBC(OpenDatabaseConnectivity),Web,ODBCWeb,WebASP,ADO,::ODBC,ADODSN(DateSourceName)ODBC,Web:Web(),ODBC,DSN(),,,MicrosoftAccessDriver(3.mdb),stuscore,score:,ADOConnectionODBCConnection,,,ConnectionConnection,:Setdb=Server.CreateObject(ADODB.Connection)Conn.Openstuscore:ConnectionSQLConnectionExecute,(SQl:StructureQueryLanguage)SQL,:strsql=Select3fromstuscorewherestudentid=&stuidand&studentpasswd=&pwd&db.Execute(sql):Recordset,ADORecordset,Recordset,,,Recordset,:Setrs=Server.CreateObject(ADODB.Recordset)Setrs=db.Execute(sql):conn.close()Setrs=NothingSetdb=Nothing22.1,MicrosoftAccess2003SQL,,Ac2cess2003,,,,Admin(),,Access,score.mdb,,:(Admin)(Student)(Course)015(Exam),1AdminAdminname12Adminpwd152StudentStudentname12Studentid15Studentpwd18Studentmemo503CourseCoursename30Courseid10Coursememo504ExamExamstudent12,Examcourse10,Examscore4Exammemo502.2:,,2.2.1:1):,,,,;2):,,;3):,,2.2.2:1):,,,,;2):,;3):;4):;5):3Scorequery.aspRequest.Form(),Select,:%Studentid=trim(Request.Form(Studentid))Studentpasswd=trim(Request.Form(Studentpasswd))setconn=server.CreateObject(ADODB.connection)setrs=server.CreateObject(ADODB.recordset)conn.Openstuscorestrsql=select3fromexamwhereStudentid=&Studentid&and&Studentpwd=&Studentpwd&setrs=conn.Execute(strsql)ifrs.EOFthenResponse.Write,,!Response.Redirectloginst.aspelse%Response.Writetd&rs(Studentname)&ötdResponse.Writetd&rs(Studentid)&ötdDowhilenotrs.EOFResponse.WritetrResponse.Writetd&rs(ExamCourse)&ötdResponse.Writetd&rs(ExamScore)&ötdResponse.Writeötrrs.MoveNextloop%4ASPWeb,,,,,,,,[1],.Web[J].,2000,20[2],.ASPWeb,,2000,4[3],,.ASP,,20033[4],.[J].,2005,72115