asp显示数据的完整代码
此代码展示了从发送过来是数据,接收后判断数据库有没有此数据,然后写入session、cookie值,最后通过弹窗告诉用户登录成功,并跳转至指定页面
<%
dim name,pwd
name = request.form("name") //页面接收传过来的数据
pwd = request.form("pwd") //同上
set rs = server.createobject("adodb.recordset")
sql = "select * from [user] where [name]='"&&"' and [password]='"&md5(pwd)&"'"
//
rs.open sql,conn,1,1
if rs.eof then
call close_rs //sub程序,关闭实例化数据
call close_conn //关闭数据库连接
call back("数据不存在!")
else
//判断是不是管理员级别,如果是,写入session
if rs("level") = 10 then
session("bdkj") = rs("name")
end if
//写入cookie数据
response.cookies("bdkj")("user") = rs("name")
//sub程序,跳转到指定页面
call location("登录成功!","index.asp")
end if
%>