进入快盘 | 申领稿费  |  新人报到  |  意见建议 | 购买卡币    

卡巴斯基技术论坛's Archiver

dnyh 发表于 2008-6-3 21:30

【分享】牛人.学ASP只需一小时!

<P>我同学发给我的,看了之后,真有这总感觉.会了不少,简单.易懂.全部学会也要一点时间,牛人真的不一般,看看你们能在一个小时看懂.学会.这方面我虽不是高手.也懂得大部分.以后有什么问题一起来讨论<BR></P>
<P>下面就是内容.写得很细.</P>
<P>&lt;% <BR>语句 <BR>…… <BR>%&gt; <BR>&lt;2&gt;定义变量dim语句 <BR>&lt;% <BR>dim a,b <BR>a=10 <BR>b=”ok!” <BR>%&gt; <BR>注意:定义的变量可以是数值型,也可以是字符或者其他类型的 <BR>&lt;3&gt;简单的控制流程语句 <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>&lt;1&gt;.数据库连接(用来单独编制连接文件conn.asp) <BR>&lt;% <BR>Set conn = Server.CreateObject("ADODB.Connection") <BR>conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &amp; Server.MapPath("\bbs\db1</P>
<P>\user.mdb") <BR>%&gt; <BR>(用来连接bbs\db1\目录下的user.mdb数据库) <BR>&lt;2&gt;显示数据库记录 <BR>原理:将数据库中的记录一一显示到客户端浏览器,依次读出数据库中的每一条记录 <BR>如果是从头到尾:用循环并判断指针是否到末 使用: not rs.eof <BR>如果是从尾到头:用循环并判断指针是否到开始 使用:not rs.bof <BR>&lt;!--#include file=conn.asp--&gt; (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <BR>&lt;% <BR>set rs=server.CreateObject("adodb.recordset") (建立recordset对象) <BR>sqlstr="select * from message" ----&gt;(message为数据库中的一个数据表,即你要显示的数据所存放的</P>
<P>数据表) <BR>rs.open sqlstr,conn,1,3 ----&gt;(表示打开数据库的方式) <BR>rs.movefirst ----&gt;(将指针移到第一条记录) <BR>while not rs.eof ----&gt;(判断指针是否到末尾) <BR>response.write(rs("name")) ----&gt;(显示数据表message中的name字段) <BR>rs.movenext ----&gt;(将指针移动到下一条记录) <BR>wend ----&gt;(循环结束) <BR>------------------------------------------------------ <BR>rs.close <BR>conn.close 这几句是用来关闭数据库 <BR>set rs=nothing <BR>set conn=nothing <BR>------------------------------------------------------- <BR>%&gt; <BR>其中response对象是服务器向客户端浏览器发送的信息 <BR>&lt;3&gt;增加数据库记录 <BR>增加数据库记录用到rs.addnew,rs.update两个函数 <BR>&lt;!--#include file=conn.asp--&gt; (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <BR>&lt;% <BR>set rs=server.CreateObject("adodb.recordset") (建立recordset对象) <BR>sqlstr="select * from message" ----&gt;(message为数据库中的一个数据表,即你要显示的数据所存放的</P>
<P>数据表) <BR>rs.open sqlstr,conn,1,3 ----&gt;(表示打开数据库的方式) <BR>rs.addnew 新增加一条记录 <BR>rs("name")="xx" 将xx的值传给name字段 <BR>rs.update 刷新数据库 <BR>------------------------------------------------------ <BR>rs.close <BR>conn.close 这几句是用来关闭数据库 <BR>set rs=nothing <BR>set conn=nothing <BR>------------------------------------------------------- </P>
<P>%&gt; <BR>&lt;4&gt;删除一条记录 <BR>删除数据库记录主要用到rs.delete,rs.update <BR>&lt;!--#include file=conn.asp--&gt; (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库) <BR>&lt;% <BR>dim name <BR>name="xx" <BR>set rs=server.CreateObject("adodb.recordset") (建立recordset对象) <BR>sqlstr="select * from message" ----&gt;(message为数据库中的一个数据表,即你要显示的数据所存放的</P>
<P>数据表) <BR>rs.open sqlstr,conn,1,3 ----&gt;(表示打开数据库的方式) <BR>------------------------------------------------------- <BR>while not rs.eof <BR>if rs.("name")=name then <BR>rs.delete <BR>rs.update 查询数据表中的name字段的值是否等于变量name的值"xx",如果符合就执行删除, <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>%&gt; <BR>&lt;5&gt;关于数据库的查询 <BR>(a) 查询字段为字符型 <BR>&lt;% <BR>dim user,pass,qq,mail,message <BR>user=request.Form("user") <BR>pass=request.Form("pass") <BR>qq=request.Form("qq") <BR>mail=request.Form("mail") <BR>message=request.Form("message") <BR>if trim(user)&amp;"x"="x" or trim(pass)&amp;"x"="x" then (检测user值和pass值是否为空,可以检测到空格</P>
<P>) <BR>response.write("注册信息不能为空") <BR>else <BR>set rs=server.CreateObject("adodb.recordset") <BR>sqlstr="select * from user where user="&amp;user&amp;"" (查询user数据表中的user字段其中user字段为字</P>
<P>符型) <BR>rs.open sqlstr,conn,1,3 <BR>if rs.eof then <BR>rs.addnew <BR>rs("user")=user <BR>rs("pass")=pass <BR>rs("qq")=qq <BR>rs("mail")=mail <BR>rs("message")=message <BR>rs.update <BR>rs.close <BR>conn.close <BR>set rs=nothing <BR>set conn=nothing <BR>response.write("注册成功") <BR>end if <BR>rs.close <BR>conn.close <BR>set rs=nothing <BR>set conn=nothing <BR>response.write("注册重名") <BR>%&gt; <BR>(b)查询字段为数字型 <BR>&lt;% <BR>dim num <BR>num=request.Form("num") <BR>set rs=server.CreateObject("adodb.recordset") <BR>sqlstr="select * from message where id="&amp;num (查询message数据表中id字段的值是否与num相等,其</P>
<P>中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("删除成功") <BR>end if <BR>rs.close <BR>conn.close <BR>set rs=nothing <BR>set conn=nothing <BR>response.write("删除失败") <BR>%&gt; <BR>&lt;6&gt;几个简单的asp对象的讲解 <BR>response对象:服务器端向客户端发送的信息对象,包括直接发送信息给浏览器,重新定向URL,或设置</P>
<P>cookie值 <BR>request对象:客户端向服务器提出的请求 <BR>session对象:作为一个全局变量,在整个站点都生效 <BR>server对象:提供对服务器上方法和属性的访问 <BR>(a) response对象的一般使用方法 <BR>比如: <BR>&lt;% <BR>resposne.write("hello, welcome to asp!") <BR>%&gt; <BR>在客户端浏览器就会看到 hello, welcome to asp! 这一段文字 <BR>&lt;% <BR>response.Redirect("<A href="http://www.sohu.com">www.sohu.com</A>") <BR>%&gt; <BR>如果执行这一段,则浏览器就会自动连接到 “搜狐” 的网址 <BR>关于response对象的用法还有很多,大家可以研究研究 <BR>request对象的一般使用方法 <BR>比如客户端向服务器提出的请求就是通过request对象来传递的 <BR>列如 :你在申请邮箱的所填写的个人信息就是通过该对象来将 <BR>你所填写的信息传递给服务器的 <BR>比如:这是一段表单的代码,这是提供给客户填写信息的,填写完了按 <BR>“提交”传递给request.asp文件处理后再存入服务器数据库 <BR>&lt;form name="form1" method="post" action="request.asp"&gt; <BR>&lt;p&gt; <BR>&lt;input type="text" name="user"&gt; <BR>&lt;/p&gt; <BR>&lt;p&gt; <BR>&lt;input type="text" name="pass"&gt; <BR>&lt;/p&gt; <BR>&lt;p&gt; <BR>&lt;input type="submit" name="Submit" value="提交"&gt; <BR>&lt;/p&gt; <BR>&lt;/form&gt; <BR>那么request.asp该如何将其中的信息读入,在写入数据库,在这里就要用到 <BR>request对象了,下面我们就来分析request.asp的写法 <BR>&lt;% <BR>dim name,password (定义user和password两个变量) <BR>name=request.form(“user”) (将表单中的user信息传给变量name) <BR>password=request.form(“pass”) (将表单中的pass信息传给变量password) <BR>%&gt; <BR></P>
<P>通过以上的几句代码我们就将表单中的数据读进来了,接下来我们要做的就是将 信息写入数据库了,写入数据库的方法上面都介绍了,这里就不一一复述了</P>
<P>&nbsp;</P>
<P>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <FONT face=楷体_GB2312 color=red size=5><STRONG>人不可有傲气,但必须有傲骨</STRONG></FONT></P>

落岸之鱼 发表于 2008-6-3 23:58

看不懂。。:@1#

页: [1]

Powered by Discuz! Archiver 6.1.0  © 2001-2007 Comsenz Inc.