登陆ASP网页登陆密码及用户名检测(VB ACCESS)
ASP网页登陆密码及用户名检测(VB+ACCESS)
1.建立一个acces s数据库保存打开“使用表设计器创建表”详细如下
字段名称 数据类型id 自动编号username 文本passwo rd 文本
2. login.asp文件内容如下
<html>
<head>
<title>系统管理员登陆</title>
<meta http-eq uiv="Conte nt-Type" co nte nt="text/htm l ; cha rset=gb2312"><script Language="javaScript">function login_val idate()
{if (document.myform.username.value=="")
{alert("Error:请输入帐号 ");document.myform.username.focus();return false ;
}if (document.myform.password.value=="")
{alert("Error:请输入密码 ");docume nt.myform.password.focus();return false ;
}return true;
}
</script>
<style type="text/css">
<!--
b o d y,td {font-size: 12px;
}
-->
</style>
</head>
<body>
<p> </p>
<form action="checkmima.asp"method="post" NAME="myform" id="myform" onSubmit="returnlogin_val idate();">
<table width="250" border="0" al ign="center" cel lpadding="5" cel lspacing"style="border:1 px#cccccc sol id;">
<tr>
<td height=30 bgcolor="#eeeeee" al ign=center>∷管理员登陆∷</td>
</tr>
<tr>
<td al ign="center">用户名: <input name="Username" tabindex="1" typ e="text"id="username"></td>
</tr>
<tr>
<td al ign="center">密码: <input name="Password" tabindex="2" type="p asswo rd"i d="p a sswo rd"></td>
</tr>
<tr>
<td al ign="center"><input type="submit" name="Submit" value="登
陆"ta b i nd e x="3">
<input type="reset" name="Submit2" value="重置" tabindex="4"></td>
</tr>
</tab le>
</form>
</body>
</htm l>
3. checkmima.asp文件内容如下
<%db="数据库路径/数据库名称.mdb"
Set conn = Server.CreateObject("ADODB.Connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(""&db&"")
'connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver(*.mdb)};"conn.Open connstr
%>
<%dim sqldim rsdim usernamedim passwordusername=replace(trim(request("username")),"'","")password=rep lace(tri m(Req uest("password")),"'","")sql="select username,password,flag from zhuce where password='"&password&"' andusername='"&username&"'"set rs = conn.execute(sql)if not(rs.bof and rs.eof) thenif password=rs(1) then
session("admin")=rs(0)session("flag")=rs(2)
Response.Redirect "Default.asp" //登陆成功后要跳转到的页面elsecal l Errorend ifelsecal l Error()end ifsub Error()
Response.Write "<script language=javascript>"
Response.Write "alert(""登陆失败!帐号或密码错误 "");"
Response.Write "histo ry.back(-1);"
Response.Write "</script>"end subrs.closeconn.closeset rs=nothingset conn=nothing
%>
- 登陆ASP网页登陆密码及用户名检测(VB ACCESS)相关文档
- 密码nod32用户名密码
- 邮箱账号密码设置步骤
- 帐户nod32用户名密码
- 账号nod32用户名密码
- 选课nod32用户名密码
- 登陆地址:http://jwxt.zjnu.edu.cn.输入账号密码进入下图显示.
RackNerd美国大硬盘服务器促销：120G SSD+192TB HDD,1Gbps大带宽,月付$599，促销美国月付$服务器促销带宽
racknerd怎么样?racknerd最近发布了一些便宜美国服务器促销，包括大硬盘服务器，提供120G SSD+192TB HDD，有AMD和Intel两个选择，默认32G内存，1Gbps带宽，每个月100TB流量，5个IP地址，月付$599。价格非常便宜，需要存储服务器的朋友可以关注一下。RackNerd主要经营美国圣何塞、洛杉矶、达拉斯、芝加哥、亚特兰大、新泽西机房基于KVM虚拟化的VPS、...
AkkoCloud(60元/月 ),英国伦敦CN2 1核 768 MB 内存 10 GB SSD 硬盘 600GB 流量 英国伦敦CN2 1核 1.5G 300Mbps
官方网站：https://www.akkocloud.com/AkkoCloud新品英国伦敦CN2 GIA已上线三网回程CN2 GIA 国内速度优秀.电信去程CN2 GIALooking Glass:http://lonlg.akkocloud.com/Speedtest:http://lonlg.akkocloud.com/speedtest/新品上线刚好碰上国庆节 特此放上国庆专属九折循环优惠...
菠萝云：带宽广州移动大带宽云广州云：广州移动8折优惠,月付39元
菠萝云国人商家，今天分享一下菠萝云的广州移动机房的套餐，广州移动机房分为NAT套餐和VDS套餐，NAT就是只给端口，共享IP，VDS有自己的独立IP，可做站，商家给的带宽起步为200M，最高给到800M，目前有一个8折的优惠，另外VDS有一个下单立减100元的活动，有需要的朋友可以看看。菠萝云优惠套餐：广州移动NAT套餐，开放100个TCP+UDP固定端口，共享IP，8折优惠码：gzydnat-8...
-
金士顿内存怎么样金士顿内存条好吗相机内存卡数据恢复相机内存卡数据丢失怎么恢复租车平台哪个好共享汽车现在哪个平台的比较好？输入法哪个好用输入法哪种比较好用？麒麟820和980哪个好4415y处理器和麒麟980哪个好？迈腾和帕萨特哪个好新迈腾和新帕萨特哪个更好一点·哪个更实用一点 ···明白人给解释一下·闪迪和金士顿哪个好固态硬盘哪个好，是金士顿好还是闪迪的华为p40和mate30哪个好Huawei Mate30 和 P40 哪个好？机械表和石英表哪个好石英表和机械表哪个好浮动利率和固定利率哪个好房贷利率是固定的还是浮动的好？