<%
a=1
b=4
c=2
'判断最大值
if a>b then
if a>c then
response.write a
else
response.write c
end if
else
if b>c then
response.write b
else
response.write c
end if
end if
'判断最小值
if aif a
else
response.write c
end if
else
if b
else
response.write c
end if
end if
%>
A1) 安装web服务器程序后，在地址栏输入服务器的IP地址，可以访问站点默认文档T2) ASP的包含文件命令可以添加在脚本命令的任何位置。
F3) ASP代码既可以运行于Web服务器端，也可以运行于客户端浏览器。
F4) ASP程序其实是以扩展名为.asp的纯文本形式存在于Web服务器上，可以用任何文本编辑器打开。
T5) ASP 脚本中向客户端输出信息的方式可以是<%=变量名%>，也可以是<%Response.write“输出内容” %>。
T6) ASP 网页，运行时在客户端可以通过‘查看'菜单的‘源文件 '查看到真实的ASP 源代码。
7) Application 对象仅用于存储共享数据，而Session 对象还可用于存储指定用户数据。
8) *Application 对象的Lock 和Unlock 方法可以确保同一时刻仅有一个用户修改或存取Application变量。
T9) Application 对象可应用于如统计网站访问的人数、创建聊天室等。
T10) Application 和Session对象都具有Lock 和UnLock 方法。
F11) 192.168.0.256 在互联网上是一个正确的IP 地址。
F12) Access2000 是Asp 支持的数据库类型。
T13) Access 数据库属于关系型数据库TB1) B/S计算模式可以认为是基于Web技术的三层C/S计算模式。
2) 表格和单元格的背景色可以同时设置。
3) 编写.html 格式的网页时从兼容角度出发，脚本语言易选用JavaScript 。
T4) 病毒是一种自我复制代码，具有一定的破坏性。
C参照完整性数据库的主键可以为空。
TCall 语句用于Sub 或Function 过程的调用。
TCStr 函数可以将数值转换为字符串。
TD1) 对于For/Next 循环结构，当循环控制变量的值大于终值时，结束循环。
页面之间传递值的几种方式页面传值是学习初期都会面临的一个问题，总的来说有页面传值、存储对象传值、ajax、类、model、表单等。
但是一般来说，常用的较简单有QueryString，Session，Cookies，Application，Server.Transfer。
一、QueryStringQueryString是一种非常简单的传值方式，他可以将传送的值显示在浏览器的地址栏中。
如果是传递一个或多个安全性要求不高或是结构简单的数值时，可以使用这个方法。
但是对于传递数组或对象的话，就不能用这个方法了。
这种方法的优点：1.使用简单，对于安全性要求不高时传递数字或是文本值非常有效。
这种方法的缺点：1.缺乏安全性，由于它的值暴露在浏览器的URL地址中的。
2.不能传递对象。
使用方法：1.在源页面的代码中用需要传递的名称和值构造URL地址。
2.在源页面的代码用Response.Redirect(URL);重定向到上面的URL地址中。
3.在目的页面的代码使用Request.QueryString["name"];取出URL地址中传递的值。
例子：(1)a.aspxprivate void Button1_Click(object sender, System.EventArgs e){string s_url;s_url = "b.aspx?name=" + Label1.Text;Response.Redirect(s_url);}(2)b.aspxprivate void Page_Load(object sender, EventArgs e){Label2.Text = Request.QueryString["name"];}二、Session想必这个肯定是大家使用中最常见的用法了，其操作与Application类似，作用于用户个人，所以，过量的存储会导致服务器内存资源的耗尽。
ASP连接Access数据库几种常见方法在弹出来的“自定义连接字符串”对话框中，"连接名称"随便写一个。
“连接字符串”就要好好填写了。
当"使用此计算机上的驱动程序"时应用绝对路径：DRIVER={Microsoft Access Driver (*.mdb)};DBQ=d:\newgn\database\cnbruce.mdb否则“使用测试服务器上的驱动程序”采用Mappath转换路径："Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.mappath("/newgn/database/cnbruce.mdb")注：如果将要上传到网上去的页子就可以直接采用Mappath了点击“测试”，出现成功即爽。
附注：需要更多了解的，可以打开DW的帮助教程。
第一种连接和记录集分开声明<%db="db/darden.mdb"set conn=server.createobject("ADODB.connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("" & db & "")conn.open connstr%><%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingconn.closeset conn=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")Response.Redirect "homepage.asp"%>第二种连接和记录集一同声明<%set rs=server.createobject("adodb.recordset")sql="select * from ebook order by id desc"conn = "DBQ=" + server.mappath("book.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"rs.open sql,conn,3,3rs.addnew............rs.update (rs.delete)rs.closeset rs=nothingresponse.write("<center><a href=viewdatabase.asp>显示文字</a></center>")%>ASP数据库简单*作教程<1>.数据库连接(用来单独编制连接文件conn.asp)<%Set conn = Server.CreateObject(ADODB.Connection)conn.Open DRIVER={Microsoft Access Driver (*.mdb)}; DBQ= & Server.MapPath(\bbs\db1\user.mdb)%>(用来连接bbs\db1\目录下的user.mdb数据库)<2>显示数据库记录原理：将数据库中的记录一一显示到客户端浏览器，依次读出数据库中的每一条记录如果是从头到尾：用循环并判断指针是否到末使用: not rs.eof如果是从尾到头：用循环并判断指针是否到开始使用：not rs.bof <!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%set rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.movefirst ---->(将指针移到第一条记录)while not rs.eof ---->(判断指针是否到末尾)response.write(rs(name)) ---->(显示数据表message中的name字段)rs.movenext ---->(将指针移动到下一条记录)wend ---->(循环结束)------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%>其中response对象是服务器向客户端浏览器发送的信息<3>增加数据库记录增加数据库记录用到rs.addnew,rs.update两个函数<!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%set rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)rs.addnew 新增加一条记录rs(name)=xx 将xx的值传给name字段rs.update 刷新数据库------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><4>删除一条记录删除数据库记录主要用到rs.delete,rs.update<!--#include file=conn.asp--> (包含conn.asp用来打开bbs\db1\目录下的user.mdb数据库)<%dim namename=xxset rs=server.CreateObject(adodb.recordset) (建立recordset 对象)sqlstr=select * from message ---->(message为数据库中的一个数据表，即你要显示的数据所存放的数据表)rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)-------------------------------------------------------while not rs.eofif rs.(name)=name thenrs.deleters.update 查询数据表中的name字段的值是否等于变量name的值xx，如果符合就执行删除，else 否则继续查询,直到指针到末尾为止rs.movenextemd ifwend------------------------------------------------------------------------------------------------------------rs.closeconn.close 这几句是用来关闭数据库set rs=nothingset conn=nothing-------------------------------------------------------%><5>关于数据库的查询(a) 查询字段为字符型<%dim user,pass,qq,mail,messageuser=request.Form(user)pass=request.Form(pass)qq=request.Form(qq)mail=request.Form(mail)message=request.Form(message)if trim(user)&x=x or trim(pass)&x=x then (检测user值和pass 值是否为空，可以检测到空格)response.write(注册信息不能为空)elseset rs=server.CreateObject(adodb.recordset)sqlstr=select * from user where user='&user&' (查询user数据表中的user字段其中user字段为字符型)rs.open sqlstr,conn,1,3if rs.eof thenrs.addnewrs(user)=userrs(pass)=passrs(qq)=qqrs(mail)=mailrs(message)=messagers.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write(注册成功)end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write(注册重名)%>(b)查询字段为数字型<%dim numnum=request.Form(num)set rs=server.CreateObject(adodb.recordset)sqlstr=select * from message where id=&num (查询message 数据表中id字段的值是否与num相等，其中id为数字型) rs.open sqlstr,conn,1,3if not rs.eof thenrs.deleters.updaters.closeconn.closeset rs=nothingset conn=nothingresponse.write(删除成功)end ifrs.closeconn.closeset rs=nothingset conn=nothingresponse.write(删除失败)。
