数据库设计以及源代码文档格式.docx
《数据库设计以及源代码文档格式.docx》由会员分享，可在线阅读，更多相关《数据库设计以及源代码文档格式.docx（10页珍藏版）》请在冰豆网上搜索。
学生的其她信息
性别
入学时间
学生入学的时间
班级
所在班级
专业
所学专业
2系统程序文件设计与编写
与数据库连接的代码:
<
%
db="
message、mdb"
setConn=server、createobject（"
adodb、Connection"
）
conn、open"
Provider=Microsoft、Jet、OLEDB、4、0;
DataSource="
&
server、mappath（db）
%>
登陆界面代码:
代码为:
!
--#includefile="
conn、inc"
-->
ifrequest（"
Submit"
）<
>
"
then
setrs=server、createobject（"
adodb、recordset"
sql="
SELECTusername,passwordfromuserswhereusername='
request（"
username"
）&
'
rs、opensql,conn,1,3
ifrs、bofandrs、eofthen
msg="
错误:
用户名不存在"
else
ifrs（"
password"
）=request（"
）then
Session（"
admin"
）=true
response、redirect"
index、asp?
users=admin"
密码不正确"
endif
rs、close
setrs=nothing
Conn、close
Setconn=Nothing
endif%>
html>
head>
<
title>
管理员<
/title>
scriptlanguage="
JavaScript"
type="
text/JavaScript"
--functionMM_jumpMenu（targ,selObj,restore）{//v3、0
eval（targ+"
、location='
+selObj、options[selObj、selectedIndex]、value+"
）;
if（restore）selObj、selectedIndex=0;
}
//-->
/script>
LINKhref="
style、css"
rel=Stylesheettype=text/css>
/head>
center>
spanclass="
style1”>
学生信息管理系统<
/span>
/center>
/td>
/tr>
tr>
tdcolspan="
2"
<
管理员:
inputname="
text"
maxlength="
10"
密码:
>
inputtype="
submit"
name="
value="
登录"
reset"
Submit2"
重置"
用户类型:
selectname="
menu1"
onChange="
MM_jumpMenu（'
parent'
this,0）"
optionvalue="
admin_login、asp"
selected>
/option>
student_login、asp"
学生<
/select>
br>
fontcolor=red>
%=msg%>
/font>
/table>
/form>
/body>
/html>
显示信息:
--#includefile=”conn、inc”→
%ifSession（“admin”）<
trueandSession（“student”）<
truethen
Response、Redirect“student_login、asp”
endif%>
doctypehtmlpublic“-//W3C//DTDHTML4、0Transitional//EN”>
学生信息<
LINKhref=”style、css”rel=Stylesheettype=text/css>
/style>
tablealign=center>
tdcolspan=”2”>
spanclass=”style1”>
tdcolspan=”5”>
ahref=”#”>
[<
b>
首页<
/b>
]<
/a>
ahref=”search、asp”>
[查询]<
atitle=”需要管理员权限”href=”post、asp”>
[添加]<
ahref=”admin_login、asp”>
[管理]<
ahref=”logout、asp”>
[退出]<
%users=Request（“users”）
Ifrequest（“PageNo”）=””then
PageNo=1
Else
PageNo=int（request（“PageNo”））
EndIf
sql=”SELECT*fromliuyanorderbyIDdesc”
setrs=server、createobject（“adodb、recordset”）
rs、opensql,conn,1,3
ifnot（rs、eofandrs、bof）then
rs、Pagesize=3
rs、absolutepage=PageNo
x=0
Forx=1tors、Pagesize
ifxmod2then
tr_color=”#EBEBEB”
else
tr_color=”#ffffff”
endif
Ifrs、eofthen
ExitFor
Else
ifisNull（Rs（“Dateandtime”））then
strDateandtime=“”
else
strDateandtime=Cstr（Rs（“Dateandtime”））
endif
‘Username,Email,Content,Sex,Dateandtime
Response、Write“<
tablewidth=50%border=0align=centercellpadding=0cellspacing=0bgcolor=”+tr_color+“>
”
tdwidth=20%nowrap>
姓名:
tdwidth=60%class=Tab>
”+Rs（“Username”）+“<
‘修改删除链接
ifusers=“admin”then
Response、Write“<
tdwidth=20%class=Tabalign=right>
”+“<
ahref=post、asp?
users=”+users+“&
id=”+cstr（Rs（“ID”））+“>
fontcolor=blue>
修改<
ahref=delete、asp?
删除<
tdwidth=20%class=Tab>
td>
性别:
tdcolspan=2>
”+Rs（“Sex”）+“<
”Response、Write“<
”
班级:
”+Rs（“Class”）+“<
专业:
”+Rs（“Major”）+“<
入学时间:
”+strDateandtime+“<
评语:
”+Rs（“Content”）+“<
E-mail:
”+Rs（“Email”）+“<
tableborder=0align=center>
‘ifusers=“admin”then
‘Response、Write“<
tdalign=rightbgcolor=”+tr_color+“>
fontcolor=red>
”‘endif
tdheight=1>
rs、MoveNext
EndIf
Next
endif
ifrs、recordcount>
0then
共有<
%=rs、recordcount%>
条学生信息&
nbsp;
%=rs、pagesize%>
条/页&
共<
%=rs、pagecount%>
页<
tdalign=”right”class=”Tab”>
分页:
<
%fori=1tors、pagecount
ifpageno<
Ithen
Response、Write“<
Ahref=index、asp?
pageno=”+cstr（i）+“>
”&
i&
”<
else
”&
I&
“<
”endif
next%>
marquee>
目前,没有任何学生信息！
/marquee>
<
Endif
%rs、close
setrs=nothing
Conn、close
Setconn=Nothing%>
4、查询信息页面显示:
%ifSession（"
trueandSession（"
student"
Response、Redirect"
ifstudentid<
0then
SELECT*fromliuyanwhereID="
studentid
setrs=server、createobject（"
rs、close
Setconn=Nothing
升级会员 