《数据库设计以及源代码》由会员分享,可在线阅读,更多相关《数据库设计以及源代码(10页珍藏版)》请在金锄头文库上搜索。
1、系统建设详细设计1.数据库设计管理员用户表信息:字段名称 类 型 大 小 字段描述管理员 ID 自动编号 长整型 管理员身份识别管理员名称 文本 50 管理员登陆名称密码 文本 50 管理员登陆的密码身份 文本 50 有别于学生登陆界面学生用户表:字段名称 类 型 大 小 字段描述学生 ID 自动编号 长整型 学生学号学生名称 文本 50 学生名称密码 文本 50 学生登陆的密码身份 文本 50 有别于管理员登陆界面学生信息表:字段名称 类 型 大 小 字段描述学生 ID 自动编号 长整型 学生学号学生名称 文本 50 学生名称电子邮箱 文本 50 学生的电子邮箱备注 / / 学生的其他信息性
2、别 文本 50 性别入学时间 文本 50 学生入学的时间班级 文本 50 所在班级专业 文本 50 所学专业2 系统程序文件设计与编写与数据库连接的代码:登陆界面代码:代码为: thenset rs=server.createobject(adodb.recordset) sql=SELECT username,password from users where username=&request(username)&rs.open sql,conn,1,3if rs.bof and rs.eof thenmsg=错误:用户名不存在elseif rs(password)=request(pas
3、sword) thenSession(admin)=trueresponse.redirect index.asp?users=adminelsemsg=错误:密码不正确end ifend ifrs.closeset rs=nothingConn.closeSet conn = Nothingend if%管理员学生信息管理系统管理员:密码:用户类型:管理员学生显示信息:代码为:true and Session(“student”)true then Response.Redirect “student_login.asp”end if%学生信息学生信息管理系统首页查询添加管理退出”Respo
4、nse.Write “”Response.Write “姓名:”Response.Write “” + Rs(“Username”) + “”修改 删除 链接if users = “admin” thenResponse.Write “” + “修改 删除” + “”elseResponse.Write “”end ifResponse.Write “”Response.Write “”Response.Write “性别:”Response.Write “” + Rs(“Sex”) + “”Response.Write “”Response.Write “”Response.Write “班
5、级:”Response.Write “” + Rs(“Class”) + “”Response.Write “”Response.Write “”Response.Write “专业:”Response.Write “” + Rs(“Major”) + “”Response.Write “”Response.Write “”Response.Write “入学时间:”Response.Write “” + strDateandtime + “”Response.Write “”Response.Write “”Response.Write “评语:”Response.Write “” + Rs
6、(“Content”) + “”Response.Write “”Response.Write “”Response.Write “E-mail:”Response.Write “” + Rs(“Email”) + “”Response.Write “”Response.Write “”Response.Write “”if users = “admin” then Response.Write “” Response.Write “删除” Response.Write “”end ifResponse.Write “”Response.Write “”Response.Write “”Res
7、ponse.Write “”rs.MoveNext End If Nextend ifif rs.recordcount 0 then共有条学生信息条/页共页分页:I thenResponse.Write “”elseResponse.Write “” ”end ifnext%Else目前,没有任何学生信息! End if4、查询信息页面显示:代码为:true and Session(student)true then Response.Redirect student_login.aspend if%if studentid 0 thensql=SELECT * from liuyan where ID=&studentidset rs=server.createobject(adodb.recordset)rs.open sql,conn,1,3