综合管理系统 代码的设计.docVIP

PAGE 毕业设计 (论文) 用纸PAGE PAGE 49学生成绩：htmlheadmeta http-equiv=Content-Type content=text/html; charset=gb2312meta name=GENERATOR content=Microsoft FrontPage 4.0meta name=ProgId content=FrontPage.Editor.DocumenttitleNew Page 1/title/head% page=request.querystring(page) if len(page)0 and isnumeric(page) then page=int(page) else page=1 end if%%set conn=server.createobject(adodb.connection)set rs=server.createobject(adodb.recordset)conn.open driver={Microsoft Access Driver (*.mdb)}; DBQ= server.mappath(db1.mdb)sql=select 课题名称,学号,学生姓名,专业名称,指导教师 from ktxz where 最终结果=1 order by 专业名称rs.open sql,conn,3,3%body background=bk.gif%pagesize=5 rs.pagesize=pagesize rs.absolutepage=page pagesize1=1num=1% p align=centerfont size=5b毕业设计综合管理系统/b/font/p p align=centerfont size=2结果公布/font/p div align=center center table border=1 width=90% cellspacing=0 cellpadding=0 tr td width=8% p align=centerfont size=3编号/font/p /td td width=12% p align=center姓名/p /td td width=13% p align=center学号/p /td td width=33% p align=center课题名称/p /td td width=17% p align=center指导教师/p /td td width=17% p align=center专业方向/p /td /tr /table /center /div div align=center%do while not rs.eof and pagesize15% center table border=1 width=90% cellspacing=0 cellpadding=0 tr td width=8%%=num%　/td td width=12%%=rs(学生姓名)%　/td td width=13%%=rs(学号)%　/td td width=33%%=rs(课题名称)%　/td td width=17%%=rs(指导教师)%　/td td width=17%%=rs(专业名称)%　/td /tr /table /center %rs.movenext%%pagesize1=pagesize1+1%%num=(1)*rs.pagesize+pagesize1% %loop%%totalpage=int(rs.recordcount/pagesize) if (rs.recordcount mod pagesize)0 then totalpage=totalpage+1 end if if totalpage=1 then response.write共1页 else% %select case page case 1%