网页数据库教务系统

数学科学学院大三年级1070500050 黄鹤

网页数据库教务系统

通过做这个数据库教务系统网页，我受用匪浅。我依据phone，info文件夹，并且加入了一些我自己的思考，把数据库教务系统网页建立得完整起来。以下就是网页的实现步骤与作用。

1.先做一个主页main.htm,它的作用为使进入S,T,C和教务处查询系统。程序为：

其中黑体字为关键字，他们分别与S_project.asp,T_project.asp,C_project.asp和jiaowuchu.htm链接。

2.再做一个S_project.asp，它的作用为查询数据库中S的内容。程序为：

<%

vname=trim(request.form("A1"))

set myconn=server.createobject ("adodb.connection")

myconn.open "driver={microsoft access Driver (*.mdb)};dbq="& server.mappath("1.mdb")

set myrs=server.createobject ("adodb.recordset")

myrs.activeconnection=myconn

if(vname="all") then

myrs.open "select * from S"

<%

while not myrs.eof

%>

<%

myrs.movenext

wend

%>

<%end if%>

<%if(vname<>"all")then

myrs.open "select * from S where sname='"&vname&"'"

if myrs.eof and myrs.bof then

response.write "
 

当前表内无此人！

%>

<%

else

%>

end if

end if

%>

<%

set myconn=nothing

set myrs=nothing

%>

返回主页

3.再做一个SC_lianjie.asp，与S_project.asp链接，它的作用为查询SC的内容。程序为：

<%

vsno=request.querystring("q")

set myconn=server.createobject ("adodb.connection")

myconn.open "driver={microsoft access driver (*.mdb)};dbq="& server.mappath("1.mdb")

set myrs=server.createobject ("adodb.recordset")

set myrs.activeconnection=myconn

myrs.open "select * from SC where sno="&vsno

%>

4.再做一个T_project.asp，它的作用为查询数据库中T的内容。这一过程与1相似。

5.再做一个TC_lianjie.asp，与T_project.asp链接，它的作用为查询TC的内容。这一过程与2相似。

6.再做一个C_project.asp，它的作用为查询数据库中S的内容。这一过程与1，4相似。

7.再做一个网页jiaowuchu.htm,它的作用为使进入S,T和C查询系统。程序为：

请将您的信息填入下表
学号:
姓名:
性别:
年龄:
系别: