动态网页--使用数据库的数据登录
第五十三----五十四课时
教学内容:
使用数据库的数据登录
教学目的:
1.掌握正确的使用数据库数据定位。
2.掌握循环嵌套的原理。
3.学会循环的思考方式。
教学重难点:
1.掌握正确的使用数据库数据定位。
2.掌握循环嵌套的原理。
3.学会循环的思考方式。
教学方法:
任务驱动法,引导法
教学学法:
探讨法,实践操作法
教学课时:
2课时
教学过程
一、引入
学习了connection对象和recordset对象,做一个综合练习,平时都是对
数据库的内容进行操作,具体使用还没练习,这一节课综合练习connection对
象和recordset对象的基础上,运用数据库数据。
二、新课
步骤:
1. 新建文件“a1.asp”如下图:
其中“用户登录”为华文彩云,“用户名”、“密码”为方正粗圆。
Css样式代码:
2. 新建文件“a3.asp”如下图:
。这是一个登陆成功后的一个处理页面~简单的输入了“欢迎来到船山职教中心首页!!!”.
3.新建文件“a2.asp”,判定来自a1.asp中的用户名,密码是否为数据库s.dmb中的账号或者用户,若不为,则提示“账号或者密码不能为空~”,并终止判定、返回首页;若账号不正确,则弹出对话框“请输入正确的账号~”并终止判定、返回首页,若账号正确,密码不正确,则弹出对话框“请输入正确的密码~”并终止判定、返回首页;若账号密码都正确,转到文件“a3.asp”中,终止程序判定。
对应代码:
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver
(*.mdb)};dbq="&server.mappath("a1.mdb")
%>
<%
a=cstr(request.Form("yhm"))
b=cstr(request.Form("mm"))
if a<>"" and b<>"" then
set rs=server.createobject("adodb.recordset")
cx="select * from yh where yh='"&a&"'"
rs.open cx,conn,1,3
if not rs.eof or not rs.bof then
if a=rs("yh") and b=rs("mm") then
response.redirect("a1.asp")
response.End
else
response.Write("")
response.End
end if
else
response.Write("")
response.End
end if
else
response.Write("")
response.End
end if
%>