Asp 单页查询数据库
发布时间:2010-05-11 20:11:00
<!-- #include file="../conn.asp" -->
<%
dim rs,sql,x_name,x_pwd,x_count
If Request.Form("do")="ok" Then
If Request.Form("user_name")="" Then
Response.Write("<script Language='javascript'>alert('对不起,请输入用户名!\t');history.go(-1);</script>")
Response.End()
Else
x_name = Request.Form("user_name")
End If
'↑ 叛断用户名是否为空!
If Request.Form("user_pwd")="" Then
Response.Write("<script Language='javascript'>alert('对不起,请输入用户密码!\t');history.go(-1);</script>")
Response.End()
Else
x_pwd = Request.Form("user_pwd")
End If
'↑ 叛断用户密码是否为空!
set rs = Server.Createobject("adodb.recordset")
sql="select * from [user] where user_name='"&x_name&"' and user_pwd='"&x_pwd&"'"
rs.open sql,conn,1,1
if not rs.Eof Then
session("s_name")=rs("user_name")
session("s_shen")=rs("shenfen")
session("s_shi")=rs("shijian")
Response.Redirect "infoin.asp"
Else
Response.Write("<script language='javascript'>alert('对不起,用户或密码错误!\t');history.go(-1);</script>")
Response.End()
End If
Else
%>
<title>-->系统登录</title>
<style type="text/css">
<!--
.zi {
font-family: Arial, Helvetica, sans-serif;
font-size: 10pt;
}
-->
</style>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<table width="320" height="140" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#33CCFF" class="zi">
<tr>
<td colspan="2">-->系统登录</td>
</tr>
<form name="form1" method="post" action="index.asp">
<tr bgcolor="#FFFFFF">
<td width="72"><div align="center">帐号:</div></td>
<td width="239">
<input name="user_name" type="text" id="user_name">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td><div align="center">密码:</div></td>
<td><input name="user_pwd" type="password" id="user_pwd"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td> </td>
<td><input type="submit" name="Submit" value="登 录">
<input type="button" name="Submit" value="关 闭" onClick="window.close()">
<input name="do" type="hidden" id="do" value="ok"></td>
</tr>
</form>
<tr>
<td colspan="2"><div align="right">v1.00</div></td>
</tr>
</table>
<%End If%>
猜你喜欢
- 在整个产品设计的过程中,视觉设计与交互设计的“工序”非常紧密,两者关系也是相辅相成,互相影响。而视觉界面作为最直接与用户交流的层面,如何把交
- 在网站建设中,分类算法的应用非常的普遍。在设计一个电子商店时,要涉及到商品分类;在设计发布系统时,要涉及到栏目或者频道分类;在设计软件下载这
- ExpiresAbsolute 属性指定缓存于浏览器中的页的到期日期和时间语法Response.ExpiresAbsolute [
- 一般现今ASP木马常通过以下四点来操作服务器,所以我们只要将一下四处设置好就能从一 前使用IIS服务器的站长很多,特别是对于ASP网站来说,
- 篇首语:原来改mdb为asp就能防下载是鬼话。 引子:昨天和animator试验了一下,把data.mdb文件改名为data.as
- 1.用CSS实现布局让我们一起来做一个页面,首先,我们需要一个布局。请使用CSS控制3个div,实现如下图的布局。考察应试者的基本布局知识—
- 本文回答了如下问题:“MySQL服务器有多稳定?”,以及“在本项目中我能依靠My
- 外观模式(Facade Pattern)是什么外观模式是一种结构型模式,它提供了一个简单的接口,隐藏了系统的复杂性,为客户端提供了一个简单的
- 异步操作数据的方式有两种常见的方式:XMLHttpRequest 和 iframe. 孰优孰劣在此我们不争论,只是想举一个例子说明在获取网片
- 今天帮助同事解决一个问题,问题是她做的一套页面在FF下显示正常,在IE6下样式却没有效果,也就是没有应用样式。最终发现是编码不匹配的问题,c
- 关于“登录”和“注册”的问题已经被很多设计师和交互设计上写过无数遍了,今天我在登录纳米盘网站时受到打击了所以写下此文。事情是这样的:当初租用
- ASP(英文全称Active Server Pages)是一个编程环境,在其中,可以混合使用HTML、脚本语言以及组件来创建服务器端功能强大
- 我今天晚上,做一个快印公司的网站布局,在Div镶套布局中,父标签DIV的高度不变。在IE下没有问题,但是在FIREFOX下就有问题了。如图:
- 1. 不要让用户先注册再去选商品。顾客们是来买东西的,不是来填表单的。所以需要确保用户在付款过程中完成了注册,而不是付款前就去注册,也不是让
- 从MySQL 5.0.2开始,通过mysql_stmt_attr_set() C API函数实现了服务器端光标。服务器端光标允许在服务器端生
- 用过QQ的人应该都知道软键盘,他可以增强我们密码的安全性,以保证我们的密码资料不被非法监听。现在软键盘也用在了很多的网站上,像早期银行的在线
- 本文总结了ASP初学者常犯的几个错误,希望对asp学习者有所帮助!1.记录集关闭之前再次打开:-----------------------
- 采用双重循环。把图片进行“.”分割后名字问前面部分,那其余数据库中的 图片路径记录进行对比 采用vb的InStr函数 如果存在的话返回值&g
- mysql数据库没有增量备份的机制,当数据量太大的时候备份是一个很大的问题。还好mysql数据库提供了一种主从备份的机制,其实就是把主数据库
- 升级了浏览器到IE9,今天进入公司网站后台突然发现有些页面进不去了,F12调试显示有JS错误:DOM Exception: INVALID_