仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 453|回复: 8
打印 上一主题 下一主题

[学习教程] ASP教程之Asp完成单页查询数据库

[复制链接]
兰色精灵 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:11:55 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
结论:和PHP一样,ASP简单而易于维护,很适合小型网站应用,通过DCOM和MTS技术,ASP甚至还可以完成小规模的企业应用,但ASP的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。数据|数据库<!--#includefile="../conn.asp"-->
<%
dimrs,sql,x_name,x_pwd,x_count
IfRequest.Form("do")="ok"Then
IfRequest.Form("user_name")=""Then
Response.Write("<scriptLanguage=javascript>alert(对不起,请输出用户名!        );history.go(-1);</script>")
Response.End()
Else
x_name=Request.Form("user_name")
EndIf
↑叛断用户名是不是为空!
IfRequest.Form("user_pwd")=""Then
Response.Write("<scriptLanguage=javascript>alert(对不起,请输出用户暗码!        );history.go(-1);</script>")
Response.End()
Else
x_pwd=Request.Form("user_pwd")
EndIf
↑叛断用户暗码是不是为空!
setrs=Server.Createobject("adodb.recordset")
sql="select*from[user]whereuser_name="&x_name&"anduser_pwd="&x_pwd&""
rs.opensql,conn,1,1
ifnotrs.EofThen
session("s_name")=rs("user_name")
session("s_shen")=rs("shenfen")
session("s_shi")=rs("shijian")
Response.Redirect"infoin.asp"
Else
Response.Write("<scriptlanguage=javascript>alert(对不起,用户或暗码毛病!        );history.go(-1);</script>")
Response.End()
EndIf
Else
%>
<title>-->体系登录</title>
<styletype="text/CSS">
<!--
.zi{
font-family:Arial,Helvetica,sans-serif;
font-size:10pt;
}
-->
</style>
<p></p>
<p></p>
<p>  </p>
<p></p>   
  
<tablewidth="320"height="140"border="0"align="center"cellpadding="0"cellspacing="1"bgcolor="#33CCFF"class="zi">
<tr>
<tdcolspan="2">-->体系登录</td>
</tr>
<formname="form1"method="post"action="index.asp">
<trbgcolor="#FFFFFF">
<tdwidth="72"><divalign="center">帐号:</div></td>
<tdwidth="239">
<inputname="user_name"type="text"id="user_name">
</td>
</tr>
<trbgcolor="#FFFFFF">
<td><divalign="center">暗码:</div></td>
<td><inputname="user_pwd"type="password"id="user_pwd"></td>
</tr>
<trbgcolor="#FFFFFF">
<td></td>
<td><inputtype="submit"name="Submit"value="登录">
<inputtype="button"name="Submit"value="关闭">
<inputname="do"type="hidden"id="do"value="ok"></td>
</tr>
</form>
<tr>
<tdcolspan="2"><divalign="right">v1.00</div></td>
</tr>
</table>
<%EndIf%>
缺乏可以共同遵循的行业标准,ASP还处在发展初期,大家对它的理解不同,如产品和服务标准,收费标准等,不利于行业的健康发展。
沙发
发表于 2015-1-18 22:30:19 | 只看该作者
学习是为了用的,是为了让你的程序产生价值,把握住这个原则会比较轻松点。除此之外,课外时间一定要多参加一些社会实践活动,来锻炼自己的能力。
谁可相欹 该用户已被删除
板凳
发表于 2015-1-25 22:58:16 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
乐观 该用户已被删除
地板
发表于 2015-2-4 13:07:35 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
小魔女 该用户已被删除
5#
发表于 2015-2-9 22:58:54 | 只看该作者
代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。
小妖女 该用户已被删除
6#
发表于 2015-2-28 03:44:59 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
不帅 该用户已被删除
7#
发表于 2015-3-9 20:42:10 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
透明 该用户已被删除
8#
发表于 2015-3-17 01:09:02 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
蒙在股里 该用户已被删除
9#
发表于 2015-3-23 13:03:17 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 04:26

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表