可安装的组件

一、目的和要求：
1、熟悉将FAT32的文件格式转换为NTFS的文件格式的方法；熟练掌握利用权限检测组件实现对某些页面的权限进行判断；
2、了解使用Counter计数器和Page Counters计数对象实现页面访问次数的统计方法；
3、了解和掌握FileSystemObject文件存取对象实现文件、驱动器、文件夹的各类操作，应达到“简单应用”的层次；
4、熟练掌握利用Jmail组件对象的属性、方法实现电子邮件的收发方法；

二、重点与难点：
1、Ad Rotator组件；
2、访问权限检测组件；
3、计数器组件
4、文件存取组件
5、Jmail组件对象的属性、方法；

三、教学进程：

1、除内置对象外，ASP还提供了一些可安装组件供用户选择使用，以增强ASP的开发应用能力。可安装组件的应用，一般要经过以下步骤：

1. 寻找和下载该组件，文件名为*.dll；
2. 将此文件拷贝到c:\windows\system目录下；
3. 使用命令：c:\windows\system>regsvr32  *.dll；
4. 在注册表中查看组件是否注册成功；
5. 在ASP页面中运用：server.createobject(“组件的名称”)；

注：有些组件在ASP安装后就已经安装好了，直接使用即可；如广告组件：Ad Rotator组件；
2、常用组件
1、Ad Rotator（主要由以下几个文件组成）
（chapter06/section1/ advertise.asp）
<%
set myad=server.CreateObject("mswc.adrotator")
response.Write myad.getadvertisement("adort.txt")
%>
adort.txt
edirect adredir.asp
width 400
height 60
border 1
*
adpic/press.gif
http://localhost/chapter08/section5/teacher.asp
清华大学出版社
40
adpic/myschool.gif
http://www.penctedu.cn
新思维网校
30
adpic/giga.gif
http://www.gigabyte.com.cn
技嘉中文网站
30
adredir.asp
<%
response.Redirect(request.QueryString("url"))
%>
还有几个广告图片文件

2、访问权限检测组件
在设计和维护网站时，常常需要限制用户对某些重要资源的访问，通常的做法是设计一个表单页面，要求用户输入用户名和密码；然后让专门的程序来访问用户数据库来检索输入的用户名和密码，并对是否具有访问某页面的权限进行判断，若有则允许访问，否则禁止访问。
也可以在访问某页面时，弹出网络密码输入窗口，强制用户登录到服务器的系统中，可以运用访问权限检测组件对输入的用户名和密码身份验证通过后，才允许访问和使用网站的资源。这种方式要求文件系统是NTFS格式；
1>windows 2000多用户多任务的系统:FAT32、NTFS
2>NTFS的特点：

1. 文件加密，它极大地增强了安全性。
2. 可以对单个文件设置权限，而不仅仅是对文件夹进行设置。
3. 磁盘活动恢复记录，可帮助您在断电或发生其他系统问题时，尽快地还原信息。
4. 磁盘配额，可用来监视和控制单个用户使用的磁盘空间量。
5. 可更好地支持大驱动器，NTFS 支持的最大驱动容量比 FAT 支持的容量大得多，但随着驱动器容量得增大，NTFS 的性能并不随之降低，而 FAT 的性能却急速下降。

将FAT32文件格式转化为NTFS格式：c:\>convert e: /fs:ntfs
举例：（chapter06/section2/ mainpage.asp）
站点中有一个manager.asp页面需要授权访问，仅允许用户名为：“03soft”用户，密码为：“123”的登陆用户访问。
实现的步骤与方法：

1. 在系统中创建用户名03soft，设置帐户密码：123
2. 设置manager.asp只有03soft用户可以访问
3. 设置一个mainpage.asp其中存放访问权限检测组件，只有Administrator和03soft用户可以访问；
4. 在IIS中，设置mainpage.asp页面的验证方式为“集成Windows验证”; 具体见案例：

3、计数器组件（chapter06/section2 / pagecounter.asp）
<%
set mypagecounter=server.CreateObject("mswc.pagecounter")
mypagecounter.pagehit
if mypagecounter.hits=20 then
response.Write  "<script language='javascript'>alert('恭喜你成为第20位访问者')</script>"
end if
response.Write "访问次数：" & mypagecounter.hits
%>

4、文件存取组件（更多操作见案例）
<%
set fso=server.CreateObject("scripting.filesystemobject")
filename=server.MapPath("counter.txt")
set txtstream=fso.createtextfile(filename)
txtstream.writeline("this is a test")
txtstream.close
set fso=nothing
response.Write("文件创建成功!")
%>

5、Jmail组件对象（邮件的收发）
邮件表单
<form method=post action=sendmail.asp>
请填写以下资料并按寄出键即可 <br>
<br>
姓　　名:
<input type=text size=20 name=name>
<font color=