用ASP制作网站登录系统 - 比特币今日价格

wangjia

用ASP制作网站登录系统 环境：DW+ASP+ACCESS+IIS 作者：lanier(x8.Maicoo.com-麦客学吧)
一、数据库的建立
打开ACCESS2000，新建数据库（lanier_db.mdb），表名：login
Login表包函的字段：Id;userid(用户名);pwd(密码)
二、打开Dreamweaver MX 新建conn.asp页面.然后把下面的代码复制到conn.asp里。
以下为程序代码： %dim connset conn=Server.createobject("adodb.connection")conn.open "provider=microsoft.jet.oledb.4.0;data source=" server.mappath("lanier_db.mdb")If err.number 0 thenResponse.write("连接数据库时产生错误！")Response.EndEnd if% 用到此页面时包括即可： !--#include file="conn.asp"--
三、新建Login.asp页
以下为程序代码：…… form method="post" action="check.asp" 用户名: input type="text" name="userid" size="20" 密 码: input type="text" name="pwd" size="20" input type="submit" name="submit1" value="登录" input type="reset" name="button1" value="清除" /form ……将此页的用户名及密码提交到check.asp进行校验.
四、建立check.asp页
以下为程序代码： !--#include file="conn.asp"-- %Dim Rs,Sql,Userid,PwdUserid=Request.form("Userid") ’提取login.asp页面的用户名；Pwd=Request.form("pwd") ’提取login.asp页面的密码；Set Rs=Server.Createobject("adodb.recordset")Sql="select * from login where userid=’" Userid "’ "Rs.open sql,conn,1,1 If rs.eof and rs.eof then ’判断用户名是否存在Response.write " script language=javascript alert(’用户不存在’);history.go(-1); /script "Response.EndElseif Rs("pwd") pwd then ’判断密码是否正确Response.write " script language=javascript alert(’密码错误’);history.go(-1); /script "Response.EndElseSession("userid")=userid ’把用户名写入sessionResponse.redirect("index.asp")End if% 把用户名写入Session("userid")是为了防上非法登录,只要在受限页面的头部加入下面代码:
以下为程序代码： %if session("userid")="" thenresponse.write(" script language=javascript alert(’对不起,你没有查看该页的权限或已超时,请重新登录!’);location.href=’loging.asp’ /script ")End%
简单吧,
有问题请到论坛里讨论:/
okex登录网站