登陆ASP网页登陆密码及用户名检测(VB ACCESS)

eset nod32 最新用户名和密码  时间:2021-02-15  阅读:()

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

%>

spinservers:圣何塞10Gbps带宽服务器月付$109起,可升级1Gbps无限流量

spinservers是Majestic Hosting Solutions LLC旗下站点,主营国外服务器租用和Hybrid Dedicated等,数据中心在美国达拉斯和圣何塞机房。目前,商家针对圣何塞部分独立服务器进行促销优惠,使用优惠码后Dual Intel Xeon E5-2650L V3(24核48线程)+64GB内存服务器每月仅109美元起,提供10Gbps端口带宽,可以升级至1Gbp...

vpsdime7美元/月,美国达拉斯Windows VPS,2核4G/50GB SSD/2TB流量/Hyper-V虚拟化

vpsdime怎么样?vpsdime是2013年成立的国外VPS主机商,以大内存闻名业界,主营基于OpenVZ和KVM虚拟化的Linux套餐,大内存、10Gbps大带宽、大硬盘,有美国西雅图、达拉斯、新泽西、英国、荷兰机房可选。在上个月搞了一款达拉斯Linux系统VPS促销,详情查看:vpsdime夏日促销活动,美国达拉斯vps,2G内存/2核/20gSSD/1T流量,$20/年,此次推出一款Wi...

LOCVPS新上韩国KVM,全场8折,2G内存套餐月付44元起_网络传真服务器

LOCVPS(全球云)发布了新上韩国机房KVM架构主机信息,提供流量和带宽方式,适用全场8折优惠码,优惠码最低2G内存套餐月付仅44元起。这是一家成立较早的国人VPS服务商,目前提供洛杉矶MC、洛杉矶C3、和香港邦联、香港沙田电信、香港大埔、日本东京、日本大阪、新加坡、德国和荷兰等机房VPS主机,基于KVM或者XEN架构。下面分别列出几款韩国机房KVM主机配置信息。韩国KVM流量型套餐:KR-Pl...

eset nod32 最新用户名和密码为你推荐
显卡温度多少正常显卡温度多少算正常淘宝店推广如何推广淘宝店ios7固件下载ios 7及以上固件请在设备上点“信任”在哪点?雅虎天盾我机器上有瑞星杀毒和防火墙 我用雅虎天盾来查杀木马怎样?淘宝网页显示不正常淘宝网显示不正常ejb开发什么是EJB?它是干什么的?和JAVA,JSP有关系吗?他们各有什么特点和用途?机械键盘轴打游戏用机械键盘到底什么轴好?什么是云平台云平台和云计算的区别是什么?rewritebasehttp怎么做自动跳转https声母是什么22个声母是什么
唯品秀 google镜像 华为云主机 dropbox网盘 网站实时监控 论坛空间 华为4核 网站木马检测工具 ntfs格式分区 国外免费asp空间 paypal注册教程 怎么建立邮箱 腾讯总部在哪 河南移动梦网 东莞主机托管 lamp的音标 实惠 可外链的相册 万网注册 免费主页空间 更多