设为首页

广西经贸职业技术学院论坛

 忘记密码
 免费注册
查看: 2238|回复: 21
打印 上一主题 下一主题

1小时ASP入门,非常简单

[复制链接]

该用户从未签到

跳转到指定楼层
楼主
发表于 2004-4-24 19:06:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
<%<br/> 语句<br/> ……<br/> %><br/> <2>定义变量dim语句<br/> <%<br/> dim a,b<br/> a=10<br/> b=”ok!”<br/> %><br/> 注意:定义的变量可以是数值型,也可以是字符或者其他类型的<br/> <3>简单的控制流程语句<br/> 1. If 条件1 then<br/> 语句1<br/> elseif 条件2 then<br/> 语句2<br/> else<br/> 语句3<br/> endif<br/> 2.while 条件<br/> 语句 <br/> wend<br/> 3.for count=1 to n step m<br/> 语句1<br/> exit for<br/> 语句2<br/> next <br/> 二.ASP数据库简单*作教程<br/> <1>.数据库连接(用来单独编制连接文件conn.asp)<br/> <%<br/> Set conn = Server.CreateObject(&quot;ADODB.Connection&quot;)<br/> conn.Open &quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=&quot; & Server.MapPath(&quot;\bbs\db1\user.mdb&quot;) <br/> %><br/> (用来连接bbs\db1\目录下的user.mdb数据库)<br/> <2>显示数据库记录<br/> 原理:将数据库中的记录一一显示到客户端浏览器,依次读出数据库中的每一条记录<br/> 如果是从头到尾:用循环并判断指针是否到末 使用: not rs.eof<br/> 如果是从尾到头:用循环并判断指针是否到开始 使用:not rs.bof</p><p> <!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<br/> <%<br/> set rs=server.CreateObject(&quot;adodb.recordset&quot;) (建立recordset对象)<br/> sqlstr=&quot;select * from message&quot; ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)<br/> rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)<br/> rs.movefirst ---->(将指针移到第一条记录)<br/> while not rs.eof ---->(判断指针是否到末尾)<br/> response.write(rs(&quot;name&quot;)) ---->(显示数据表message中的name字段)<br/> rs.movenext ---->(将指针移动到下一条记录)<br/> wend ---->(循环结束)<br/> ------------------------------------------------------ <br/> rs.close<br/> conn.close 这几句是用来关闭数据库<br/> set rs=nothing<br/> set conn=nothing<br/> -------------------------------------------------------<br/> %><br/> 其中response对象是服务器向客户端浏览器发送的信息<br/> <3>增加数据库记录<br/> 增加数据库记录用到rs.addnew,rs.update两个函数<br/> <!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<br/> <%<br/> set rs=server.CreateObject(&quot;adodb.recordset&quot;) (建立recordset对象)<br/> sqlstr=&quot;select * from message&quot; ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)<br/> rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)<br/> rs.addnew 新增加一条记录<br/> rs(&quot;name&quot;)=&quot;xx&quot; 将xx的值传给name字段<br/> rs.update 刷新数据库 <br/> ------------------------------------------------------ <br/> rs.close<br/> conn.close 这几句是用来关闭数据库<br/> set rs=nothing<br/> set conn=nothing<br/> ------------------------------------------------------- </p><p> %><br/> <4>删除一条记录<br/> 删除数据库记录主要用到rs.delete,rs.update<br/> <!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<br/> <%<br/> dim name<br/> name=&quot;xx&quot;<br/> set rs=server.CreateObject(&quot;adodb.recordset&quot;) (建立recordset对象)<br/> sqlstr=&quot;select * from message&quot; ---->(message为数据库中的一个数据表,即你要显示的数据所存放的数据表)<br/> rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)<br/> ------------------------------------------------------- <br/> while not rs.eof<br/> if rs.(&quot;name&quot;)=name then<br/> rs.delete<br/> rs.update 查询数据表中的name字段的值是否等于变量name的值&quot;xx&quot;,如果符合就执行删除,<br/> else 否则继续查询,直到指针到末尾为止<br/> rs.movenext<br/> emd if<br/> wend<br/> ------------------------------------------------------<br/> ------------------------------------------------------ <br/> rs.close<br/> conn.close 这几句是用来关闭数据库<br/> set rs=nothing<br/> set conn=nothing<br/> ------------------------------------------------------- <br/> %><br/> <5>关于数据库的查询<br/> (a) 查询字段为字符型<br/> <%<br/> dim user,pass,qq,mail,message<br/> user=request.Form(&quot;user&quot;)<br/> pass=request.Form(&quot;pass&quot;)<br/> qq=request.Form(&quot;qq&quot;)<br/> mail=request.Form(&quot;mail&quot;)<br/> message=request.Form(&quot;message&quot;)<br/> if trim(user)&&quot;x&quot;=&quot;x&quot; or trim(pass)&&quot;x&quot;=&quot;x&quot; then (检测user值和pass值是否为空,可以检测到空格)<br/> response.write(&quot;注册信息不能为空&quot;)<br/> else<br/> set rs=server.CreateObject(&quot;adodb.recordset&quot;)<br/> sqlstr=&quot;select * from user where user=&#39;&quot;&user&&quot;&#39;&quot; (查询user数据表中的user字段其中user字段为字符型)<br/> rs.open sqlstr,conn,1,3<br/> if rs.eof then<br/> rs.addnew<br/> rs(&quot;user&quot;)=user<br/> rs(&quot;pass&quot;)=pass<br/> rs(&quot;qq&quot;)=qq<br/> rs(&quot;mail&quot;)=mail<br/> rs(&quot;message&quot;)=message<br/> rs.update<br/> rs.close<br/> conn.close<br/> set rs=nothing<br/> set conn=nothing<br/> response.write(&quot;注册成功&quot;)<br/> end if <br/> rs.close<br/> conn.close<br/> set rs=nothing<br/> set conn=nothing<br/> response.write(&quot;注册重名&quot;)<br/> %><br/> (b)查询字段为数字型<br/> <%<br/> dim num<br/> num=request.Form(&quot;num&quot;)<br/> set rs=server.CreateObject(&quot;adodb.recordset&quot;)<br/> sqlstr=&quot;select * from message where id=&quot;&num (查询message数据表中id字段的值是否与num相等,其中id为数字型)<br/> rs.open sqlstr,conn,1,3<br/> if not rs.eof then<br/> rs.delete<br/> rs.update<br/> rs.close<br/> conn.close<br/> set rs=nothing<br/> set conn=nothing<br/> response.write(&quot;删除成功&quot;)<br/> end if<br/> rs.close<br/> conn.close<br/> set rs=nothing<br/> set conn=nothing<br/> response.write(&quot;删除失败&quot;)<br/> %><br/> <6>几个简单的asp对象的讲解<br/> response对象:服务器端向客户端发送的信息对象,包括直接发送信息给浏览器,重新定向URL,或设置cookie值<br/> request对象:客户端向服务器提出的请求<br/> session对象:作为一个全局变量,在整个站点都生效<br/> server对象:提供对服务器上方法和属性的访问 <br/> (a) response对象的一般使用方法<br/> 比如:<br/> <%<br/> resposne.write(&quot;hello, welcome to asp!&quot;)<br/> %><br/> 在客户端浏览器就会看到 hello, welcome to asp! 这一段文字<br/> <%<br/> response.Redirect(&quot;www.sohu.com&quot;)<br/> %><br/> 如果执行这一段,则浏览器就会自动连接到 “搜狐” 的网址<br/> 关于response对象的用法还有很多,大家可以研究研究<br/> request对象的一般使用方法<br/> 比如客户端向服务器提出的请求就是通过request对象来传递的<br/> 列如 :你在申请邮箱的所填写的个人信息就是通过该对象来将<br/> 你所填写的信息传递给服务器的<br/> 比如:这是一段表单的代码,这是提供给客户填写信息的,填写完了按<br/> “提交”传递给request.asp文件处理后再存入服务器数据库<br/> <form name=&quot;form1&quot; method=&quot;post&quot; action=&quot;request.asp&quot;><br/> <p><br/> <input type=&quot;text&quot; name=&quot;user&quot;><br/> </p><br/> <p> <br/> <input type=&quot;text&quot; name=&quot;pass&quot;><br/> </p><br/> <p><br/> <input type=&quot;submit&quot; name=&quot;Submit&quot; value=&quot;提交&quot;><br/> </p><br/> </form> <br/> 那么request.asp该如何将其中的信息读入,在写入数据库,在这里就要用到<br/> request对象了,下面我们就来分析request.asp的写法<br/> <%<br/> dim name,password (定义user和password两个变量)<br/> name=request.form(“user”) (将表单中的user信息传给变量name)<br/> password=request.form(“pass”) (将表单中的pass信息传给变量password)<br/> %> <br/> 通过以上的几句代码我们就将表单中的数据读进来了,接下来我们要做的就是将<br/> 信息写入数据库了,写入数据库的方法上面都介绍了,这里就不一一复述了。<br/> (通过上面的学习大家完全可以自己做一个留言版了) <br/> 看看我做的留言本:http://ppl.gxgxxx.edu.cn/wyzz/w_cbb/wyg/book.htm
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

沙发
发表于 2004-5-18 07:50:00 | 只看该作者
什么啊!
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

地板
发表于 2004-5-18 07:59:00 | 只看该作者
PSA 是什么呀
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

4
发表于 2004-5-21 08:13:00 | 只看该作者
呵呵<br/> ASP是动态网站编写语言
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

5
发表于 2004-5-26 10:44:00 | 只看该作者
外星知道的东西就是多~~~~
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

6
发表于 2004-5-27 08:20:00 | 只看该作者
那肯定人家是外星人啊
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

7
 楼主| 发表于 2004-6-13 08:52:00 | 只看该作者
谁是外星人~~~~~
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

8
发表于 2004-6-14 11:06:00 | 只看该作者
你自己想咯~~~
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

9
发表于 2004-6-15 07:57:00 | 只看该作者
哈哈
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

10
发表于 2004-6-15 16:55:00 | 只看该作者
偶不懂C语言
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

11
 楼主| 发表于 2004-10-13 21:30:00 | 只看该作者
像路焦一样
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

12
发表于 2004-10-15 00:20:00 | 只看该作者
什么?
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

13
 楼主| 发表于 2004-11-3 20:17:00 | 只看该作者
不懂就算了!!!!!!!!!!!!!像路焦一样!!!!!!!我俾你三秒时间,滚!
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

14
发表于 2004-11-24 11:21:00 | 只看该作者
老师,没教到 <br/> 不过看起来蛮实用的<br/> 顶你了。。。。
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~

该用户从未签到

15
发表于 2004-11-25 10:39:00 | 只看该作者
这个我顶。。。。真的不错的哦。。
常上飞翔,梦想飞扬!经贸是我家,建设靠大家~ 人们都说:不在大学论坛里灌过水的大学都像是没读过大学~
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

QQ|版主考核中心|『经贸在线』 ( 桂ICP备15001539号-2  

GMT+8, 2025-5-14 06:09

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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