数据库设计以及源代码

上传人:第*** 文档编号:34523029 上传时间:2018-02-25 格式:DOC 页数:10 大小:737KB
返回 下载 相关 举报
数据库设计以及源代码_第1页
第1页 / 共10页
数据库设计以及源代码_第2页
第2页 / 共10页
数据库设计以及源代码_第3页
第3页 / 共10页
数据库设计以及源代码_第4页
第4页 / 共10页
数据库设计以及源代码_第5页
第5页 / 共10页
点击查看更多>>
资源描述

《数据库设计以及源代码》由会员分享,可在线阅读,更多相关《数据库设计以及源代码(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

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 办公文档 > 解决方案

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号