以前看书时记得一些笔记（三），很早了，现在再看都有些看不懂了
1.ASP内部对象可以分为下面几个：Request、Response、Session、Application、Server
Request对象的功能是获得用户端的数据（包括用户的表单，用户点击的超链接，用户Cookies，服务器环境变量信息和客户端身份验证）。
Response对象的功能是向客户端输出信息（包括显示一般页面，引导用户去另一个页面，输出二进制信息，清输用户缓存，终止ASP程序，送出缓存信息，
设置缓冲信息，设置用户Cookies等）
Session对象是用来记载特定客户的信息。（包括设置特定用户的信息，获得特定用户的信息
Application对象是用来记载所有客户信息，也就是说，这些信息对所有客户都是共享的。（包括设置和获得所有客户的信息，在写信息时加锁与写完后的解锁
功能）
Server对象是用来创建COM对象和Scripting信息（包括创建对象、应用对象、脚本、脚本对象的实例，还可以转化字符串，获得文件路径，执行asp程序等）
2.Request对象： （获取客户端的信息）
语法：Request[.数据集合|属性|.方法] (变量或字符串)
如：Request.Form(“user_name”) Request.QueryString(“user_name”)
Request对象的获取方法有：
QueryString ------- 查询字符串读取用户提交的数据，一般提效的信息写在超级链接中：如：
<a href = "4-1.asp?name=<%=use_name%>&age=<%Response.write use_age%>">显示</a> ‘In 4-2.asp 变量前的=符号与Response.Write功能相同
Response.write("your name is:")&Request.QueryString("name")&"<p></p>" ‘In 4-1.asp 查询提交上来的数据值
Response.Write("your age is :")&Request.QueryString("age")
Form ------- 取得客户端在FORM表单中所输入的信息. 想简洁的话，可以省去.Form，直接用Request（”User_name”）
ServerVariables ------- 取得服务器端环境变量信息，环境变量有好多属性，如：
Request.ServerVariables(“ALL_HTTP”) 客户端浏览器所发出的HTTP标题文件
Request.ServerVariables(“AUTH_TYPE”) 当访问被保护的脚本时，用以判断该用户是否合法
Request.ServerVariables(“CONTENT_LENGTH”) 发送到客户端的文件长度
Request.ServerVariables(“CONNTENT_TYPE”) 发送到客户端的文件类型
Request.ServerVariables(“LOCAL_ADDR”) 服务器端的IP地址
Request.ServerVariables(“LOGON_USER”) 记录客户端的信息
Request.ServerVariables(“QUERY_STRING”) HTTP请求后?后的内容
Request.ServerVariables(“REMOTE_ADDR”) 客户端IP地址
Request.ServerVariables(“REMOTE_HOST”) 客户端主机名
Request.ServerVariables(“REQUEST_METHOD”) 数据请求的方法，可以是GET,HEAD,POST等方法
Request.ServerVariables(“SCRIPT_NAME”) 当前ASP文件的虚拟路径
Request.ServerVariables(”SERVER_NAME”) 服务器端的IP地址或名称
Requst.ServerVariables(“SERVER_POST”) 用HTTP作数据请求时，所用到的服务器端的端口号
Requst.ServerVariables(“URL”) URL的相对网址
Cookies ------- 取得客户端浏览器的Cookies信息,如：
Response.Write Request.Cookies(“user_name”) ‘获得Cookies中user_name中的值，当然，你的Cookies要有这个变量，如没有，可以先存储进去
Response.Cookies(“user_name”)=”shipfi”
TotalBytes ------- 得到客户端响应数据的字节大小,如：
<% Response.Write Request.TotalBytes ‘输出客户端响应数据的字节的大小 %>
BinaryRead ------- 可以以二进制方式获取客户端用Post方法提交的数据：如:
<% Response.Write Request.BinaryRead(Request.TotalBytes) %>
3.Response对象 （向客户端输出信息）
Response对象的方法有：Write、Redirect、BinaryWrite、Clear、End、Flush。
Response对象的属性有：Buffer、ContentType
Write ------ 向客户端显示Write后面的内容
Redirect ------ 引导客户至另一个URL位置，如：
<% Response.Redirect “http://www.sina.com.cn” ‘引导至新浪网
Response.Redirect “other.asp” ‘引导至站内其它网页
theURL = “http://www.pku.edu.cn”
Response.Redirect theURL ‘引导至变量表示的网址
%>
END ------- 停止处理ASP程序，如：
<% Response.Write “这是第一句”
Response.End ‘终止ASP程序
Response.Write “这是第二句” ‘这名将不被处理
%>
Buffer属性 ------ 设置服务器是否将页面先输出到缓冲区，取值可以为TRUE或FALSE，如：
<% Response.Buffer = TRUE %>
BinaryWrite方法 ------ 输出二进制信息，它不进行任何二进制转换，直接输出。如：
Response.BinaryWrite 变量或字符串
Cookies方法 ------ 保存值到用户的Cookies。如：
Response.Cookies(“user_name”) = “shipfi”
Response.Cookies(“user_name”).Expires = #2005-4-1# ‘为Cookies设置有效期
Response.Cookies(“book”)(“name) = “windows programming” ‘类似数组的方式存储Cookies
Response.Cookies(“book”)(“auther”) = “Petzod”
关于获取Cookies，即用Request.Cookies后加变量名即可
4.Session对象 (记载特定客户的信息)
Session是针对一个客户的，不同的客户用不同的Session,而Application对象则是针对全部客户的，全部的客户共享一个Application对象，这是它们两个不同之处，至于其它的，则相差不大。
Session的属性有：SessionID和Timeout，SessionID是存储用户的Session ID,而TimeOut则是指Session的有效期时长。
Session的方法只有一个，Abandon，它是清除Session对象。
Session的事件有两个：Session_OnStart和Session_OnEnd，分别是指在一个Session对象开始前调用指定程序，或在一个Session对象结束后，调用指定程序。
Session事件一般在Global.asa文件中指定。
用Session存储信息：可以如下：
<% Session(“user_name”) = hisname
Session(“age”) = 23
Session(“School”)=”BeiJing Colloge” %>
以后获取Session中存储的信息的话，则可以如下：
<% Dim name,age,school
name = Session(“user_name”)
age = Session(“age”)
school = Session(“School”) %>
强制清除Session中的信息：
一般Session到期后会自动清除（到期时间可在Session.TimeOut中指定，默认为20分钟），但到期前可以用Abandon方法强行清除。如：
Session.Abandon
5.Aplication对象，（记载所有客户信息）
Appliation中的信息是为所有客户共享的，它只有一份。所以，一个客户更改Applciation中的数据，其它的客户再查看该数据时会看到更改后的值。
为了防止两个用户同时更改数据，一般Applciation在更改数据过过程中会Lock锁住数据，修改完后再解锁UnLock,如：
<% Application.Lock
Application(“show”) = Request(“pronunciation”)&<”br”>&Application(“show”)
Application.Unlock %>
6.Server对象 （处理服务器上的特定任务）
Server的属性有SciptTimeout，Server对象的方法有CreateObject、HTMLEncode、URLEncode、MapPath、Execute、Transfer.
ScriptTimeout用来规定脚本文件执行的最长时间。如果超过规定时间，脚本还没处理完，则停目执行。
CreateObject是Server对象中最重要的方法，主要用于创建组件、应用对象或脚本对象的实例，在存取数据库和存取文件时经常用到。如：
<% Set db=Server.CreateObject(“ADODB.Connection”) ‘建立数据库实例 %>
ExeCute用来停止执行当前网页，转到新的网页执行，执行完毕后返回原网页，继续执行ExeCute方法后面的语句。如：
Server.ExeCute(“6-4.asp”)
注意，与Response.Redirect不同的是，Redirect执行完新的网页后，并不会返回原网页再执行Redirect后的语句，但ExeCute不同，它会返回原网页执行ExeCute
后的语句。Redirect方法可以转向一个网页和其它网站，但ExeCute方法一般只能转到同一个应用程序的其它文件。
7.利用数据源和不利用数据源连接数据库
利用数据源连接数据库方便，简单。但是缺点是要在服务器上设置数据源，如果程序从一个服务器移植到另一个服务器，还需要在另一台服务器上设置数据源，比较麻烦。不利用数据源的话，可以免去上面的麻烦，但是连接时自己要设定参数。下面是它们的示例：
-----利用数据源连接（首先要自己要用ODBC配置好数据源）
<% '利用数据源连接数据库
dim db
set db = Server.CreateObject("ADODB.Connection")
db.Open "db1"
%>
------不利用数据源连接 （无需配置ODBC数据源）
<% '不利用数据源连接数据库
Dim db
set db = Server.CreateObject("ADODB.Connection")
db.Open "Dbq="e:\theweb\db1.mdb;driver={Microsoft Access Driver (*.mdb)}" ‘Driver和括号之间有一个空格
%>
8.实例：连接数据库并设置查询语句，并用表格显示出来。
<% '利用数据源连接数据库
dim db
set db = Server.CreateObject("ADODB.Connection")
db.Open "userdb" ‘用数据源连接
Dim strSql,rs
strSql = "Select * from wwwlink order by link_id desc"
Set rs = db.Execute(strSql) '记住：是db.Execute，而不是Server.Execute
%>
<table width="75%" align = "center" border="0" cellpadding="0" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#000000">
<% Do while Not rs.Eof %>
<tr bgcolor="#FFFFFF">
<td><%=rs("name") %></td>
<td><a href="<%=rs("URL")%>" target="_blank" ><% =rs("URL") %></a></td>
<td><% =rs("intro") %></td>
<td><% =rs("submit_date") %></td>
<td><a href="delete.asp?link_id=<%=rs("link_id")%>">删除</a></td>
<td><a href="update.asp?link_id=<%=rs("link_id")%>">更新</a></td>
</tr>
<%
rs.MoveNext
Loop
%>
9.Server中的Connection对象
Connection对象是用来连接数据库的。建立Connection对象的方法如下：
Dim db
set db=Server.CreateObject(“ADODB.Connection”)
Connection对象可以有Execute方法，可以用来执行SQL语名命令,但该方法有局限性：如：
db.Execute(“Select * from wwwlink”)
Connection对象可以有Open方法，可以用来打开数据库，如：
db.Open “Dbq=e:\theweb\dbq.mdb; Driver={Microsoft Access Driver (*.mdb)}”
以上用到了Open方法的两个参数，一个是Dbq参数，一个是Driver参数。还可以有其余的参数，如下：
Dsn --- ODBC数据源名称
User --- 数据库登录帐号
Password --- 数据库登录密码
Driver --- 数据库类型（驱动程序）
Dbq --- 数据库的物理路径
Provider --- 数据提供者
在Access中创建基于ODBC的连接，不设置数据源，可以用到Driver和Dbq参数，如下：
<%
Dim db
set db = Server.CreateObject(“ADODB.Connection”)
db.Open “Dbq=e:\theweb\db1.mdb; Driver={Microsoft Access Driver (*.mdb)}”
%>
但是，考虑到程序移植后的路径问题，一般在Dbq参数中不直接写绝对路径，而是用Server.mappath将虚拟路径转化为实际路么，如：
db.Open “Dbq=”&Server.Mappath(“db1.mdb”)&”; Driver={Microsoft Access Driver (*.mdb)}”
在Access中创建基于ODBC的连接，设置数据源，可以用DSN参数，如下：
<%
Dim db
Set db = Server.CreateObject(“ADODB.Connection”)
db.Open(“DSN=userdb”) ‘Dsn可以省略，直接可写成db.Open (“userdb”)
%>
在Access中创建基于OLE DB的连接，如下：
<%
Dim db
Set db = Server.CreateObject(“ADODB.Connection”)
db.Open “Provider=Microsoft.Jet.OLEDB.4.0; Data Source=E:\theweb\db1.mdb”
%>
Connection属性：
Attributes --- 设置Connection对象控制事务处理时的行为
CommandTimeOut --- Execute执行的最长时间，默认为30秒，如：
<% db.CommandTimeout=60 %>
ConnectionString --- 指定Connection对象的数据库连接信息,如：
<% Dim db
Set db = Server.CreateObject(“ADODB.Connection”)
db.ConnectionString = “dbq=”&Server.Mappath(“db1.mdb”)&”;Driver={Microsoft Access Driver (*.mdb)}”
db.Open
%>
ConnectionTimeout --- Open方法与数据库链接的执行的最长时间，默认为15秒,如：
<% db.ConnectionTimeout = 30 %>
CursorLocation --- 控制光标的类型
DefaultDatabase --- 指定Connection对象的缺省数据库名称
IsolationLevel --- 指定Connection对象事务处理的时机
Mode --- 设置连接数据库的权限,一般有0，1，2，3四种权限，分别为末定义、只读、只写、可读可写，如：
<% Dim db
Set db = Server.CreateObject(“ADODB.Connection”)
db.Mode = 1 ‘对该数据的操作为只读
db.Open “userdb”
%>
Provider --- 设置Connection对象内定的数据库管理程序名称
Version --- 显示ADO对象的版本信息，如：
<% Response.Write db.Version %>
Connection方法：
Open --- 建立与数据库的连接,只有与数据库连接之后，才可以执行各种操作。上面已举例
Close --- 关闭与数据库的连接,如：
<% db.Close
Set db = nothing
%>
Execute --- 执行数据库查询(可执行各种操作),它的语法有两种，一种是可以返回记录集，一种是不返回记录集，如
<% ‘返回记录集的数据库查询
Dim st
st = db.Execute(“Select * from wwwlink”) ‘返回记录集，st为查询后的记录集,它为一指针，指向第一行记录集
Do while Not rs.Eof
//....do something in st
st.MoveNext ‘指向下一行的记录集
Loop
%>
<% ‘不返回记录集的数据库的查询
strSql = “Delete From wwwlink where name=’李政’”
db.Execute strSql,number ‘number返加此次操作影响记录的条数。
Response.Write “共删除”&number&”条记录”
%>
BeginTrans --- 开始事务处理
CommitTrans --- 提交事务处理结果
RollbackTrans --- 取消事务处理结果
10.Connection对象中的Error对象：(数据库错误的信息)
Errors集合的属性 --- Connection对象.Errors.Count 可以获得数据库是否发生了错误，如果Count等于0，则表示没有错误发生，大于0，表示有错误发生。
<%
if db.Errors.Count=0 then
Db.CommitTrans ‘如果无错误，提交事务
else
Db.RollbackTrans ‘有错误，取消事务处理结果
end if
%>
Errors集合的方法：它有两个方法，一个是Item，一个是Clear，前者用来建立Error对象，后者用来清除Errors集合中所有的Error对象。如：
<% Set err = db.Errors.Item(0) %> ‘设置一个Error对象，代表Errors集合中第0个错误，创建对象后，就可以分析Error对象的各种属性了。
<%db.Errors.Clear %> ‘清除掉Errors集合中所有的Error对象。
Error对象的属性。 要区别Error对象和Errors集合的区别，一个Error对象是指Errors错误集合中的一个实体，有了Error对象，就可以对该错误进行
各种分析和操作。它的属性主要有Number(错误编号)、Description(错误描述)、Source(发生错误之原因)、HelpContext(错误的帮助提示文字)、
HelpFile(错误的帮助提示文件)、NativeError(数据库服务器产生的原始错误)
11.Command对象 （命令对象，是对数据库执行命令的对象，可以执行对数据库的查询，它可以添加、删除、修改记录等操作）
Command对象是介于Connection对象和Recordset对象之间的一个对象，它主要通过传递SQL指令，对数据库提出操作请求，把得到的结果返给Recordset对象。Command对象依赖于Connection对象，因为Command对象必须经过一个已经建立的Connection对象才能发生SQL指令。
建立Command对象：语法如下：
Set Command对象 = Server.CreateObject(“ADODB.Command”)
通过Connection对象建立Command对象：
<% Dim db,cmd
Set db=Server.CreateObject(“ADODB.Connection”)
db.Open “addr”
Set cmd=Server.CreateObject(“ADODB.Command”)
cmd.ActiveConnection = db
%>
不通过Connection对象建立Command对象 （其实还是要通过Connection对象的，只不过Connection对象隐藏起来罢了）
<% Dim cmd
set cmd = Server.CreateObject(“ADODB.Command”)
cmd.ActiveConnection = “addr” ‘addr是数据源
%> ‘注意，在此不能操纵Connection对象的一些功能。
Command对象的属性：
ActiveConnection --- 指定Connection连接对象属性
CommandText --- 指定数据库查询信息，可以有SQL语句，数据表名，查询名或存储过程名，具体是什么在CommandType中指定,如：
<% cmd.CommandType = 2 ‘指定查询信息为表名
cmd.CommandText = “wwwlink” ‘数据表名
cmd.CommandType=1 ‘指定查询信息为SQL语句
cmd.CommandText = “Select * from wwwlink “ ‘SQL语句
CommandType --- 指定数据库查询信息的类型，其中-1为默认，表示无法确定，程序本身去分析它；1为SQL语句；2为表名；3为查
询名或存储过程名。
Prepared --- 指定数据查询信息是否要先进行编译，存储。如：
<% cmd.Prepared = True %>
Command对象的方法：
有两个方法，一个是Execute，另一个是CreateParameter，前者表示执行数据库的各种操作，后者表示用来创建一个Parameter子对象。
Execute方法 --- 执行数据库的各种操作，语法如下：
Command对象.Execute number,parameters,options ‘注意，有三个参数。如：
<% ...
Set cmd = Server.CreateObject(“ADODB.Command”)
cmd.ActiveConnection = db
‘下面执行查询操作（用SQL语句）
cmd.CommandText = “Select * from wwwlink”
cmd.CommandType = 1
Set rs = cmd.Execute ‘Execute返回查询结果集
‘下面执行查询操作(用表名)
cmd.CommandText = “wwwlink”
cmd.CommandType=2
Set rs = cmd.Execute
‘下面执行删除操作
cmd.CommandText = “Delete From wwwlink”
cmd.CommandType = 1
cmd.Execute
%>
Command三个参数中number表示返回本次操作符合条件的记录总数,parameters用来输入查询参数数组，options可以设定CommandType类型。如
上面的删除操作可以用下面来表示，并可以返回影响的行数。
<%
cmd.CommandText = “Delete From wwwlink”
cmd.Execute (number,,1) ‘number为影响的行数，第二参数没指定，第三参数表示为CommandType为1.
%>
CreaParameter行为在后面讨论
12.ASP中的时间函数
Now()函数同时返回当前的日期和时间。Date()函数返回当前的日期，Time()函数返回当前的时间。
Year(Date())返回当前的年份，Date后面的括号可以省略。Month(Date)返回当前的月份,Day(Date)返回这个月的号数，WeekDay(Date)函数返回星期几。
WeekDay默认是从星期天开始的，也就是说，星期天返回”1”，星期一返回”2”，可以在后面指定基数，如WeekDay(Date,vbMonday)
Year,Month,Day,WeekDay后面可以指定日期常数，常数的格式可以有：WeekDay(#12/25/2000#)或WeekDay(“12-25-2000”)
可以返回日期的字符串，如MonthName(date)，如果今天是四月，它会返回”April”,WeekDayName(Date),如今天是星期一，它会返回Monday
Hour(Time)返回当前的小时，Minute(Time)返回当前的分钟，Second(Time)返回当前的秒数.
可以指定参数为常数，如Minute(#12:34:15#)，或Minute(“12:34:15”)它返回34,
把字符串转化成日期格式的函数为DateValue()。
可以把日期和时间作加法和减法运算，它们用DateAdd函数，如DateAdd(“ww”,6,Date),意思是说把当前的日期加上六个星期。DateAdd(“s”,15,Time)意思是
把当前的时间加上15秒。
DateAdd的第一个参数可以有:”yyyy”表示年，”q”表示季度，”m”表示月，”y”/”d”/”w”表示天，”ww”表示星期，”h”表示小时，”m”表示分钟，”s”表示秒。
可以用DateDiff函数表示时间的间隔：
如DateDiff(“d”,”1/1/1998”,Date)表示1998-1-1到今天的天数。
13.格式化货币函数FormatCurency()
如：ad_revenue=3000 formatCurrency(ad_revenue)在中国则为￥3,000.00。计算机区域不同有不同的设置。在美国则为$3,000.00
14.Request.Form语法解释
Request.Form(element) [ (index) | Count ]
其中element我们知道是表单中元素的名称，但index,Count究竟是什么意思呢？index表示如果一个元素名称有多个实例，那么index就是其中的第几项，
而Count表示得则是这个名字有多少个实例。比如：
<input type="text" name="hobby">
<input type="checkbox" name="hobby" value="足球">足球</p>
<input type="checkbox" name="hobby" value="蓝球">蓝球 </p>
<input type="checkbox" name="hobby" value="乒乓">乒乓 </p>
<input type="checkbox" name="hobby" value="排球">排球 </p>
<input type="submit" name="Submit" value="提交">
上面是在表单中载下来的一些项，基中name为Hobby的有五项，如果直接用Request.Form(“hobby”)的话，虽然也能一一列举出来，但是要逗号输出。另外，其中有个type类型和checkbox类型的，text类型不写的话，他还会在最前面加一个逗号，意思也不是很明显。如果我们用index加Count来控制输出的话，意思就明显多了，如下：
<%
for i=1 Request.Form(“hobby”).Count ‘Count表示名字hobby被选中的有几项。
Response.Write Request.Form(“hobby”)(i) ‘表示输出第几项。
Next
%>
以上代码可以见E:\TheWeb\Client\main.asp
