ASP网页编程之ASP编程进门进阶（十六）：FSO组件之驱...

缺点：安全性不是太差了，还行，只要你充分利用系统自带的工具；唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。fso|编程|驱动器|fso|驱动器FSO，正如UFO般使人冲动、使人向往，固然更多的亦是让人欢乐让人忧。君不见某空间服务商告白：100MB空间只需60RMB/年，撑持数据库，撑持甚么甚么……一问不撑持FSO，立马气馁。那FSO事实是甚么器材，它的力气又是怎样伟大，其操纵的道理又是怎的怎的呢？此次来个完全的了解。

起首，FSO是FileSystemObject的简称。固然也就是我们的俗称FSO组件了，该组件能够用来处置驱动器、文件夹和文件。

它能够检测并显现出体系驱动器的信息分派情形；还可以创立、改动、挪动和删除文件夹，并能探测一些给定的文件夹是不是存在，若存在，还能提掏出该文件夹的信息，如称号、被创立或最初一次修正的日期，等等。FSO还使得对文件的处置变得很简单。

1、fso.GetDrive

正如别的组件的创建一样，FSO的援用也必需创建毗连。


Setfso=Server.CreateObject("Scripting.FileSystemObject")



注重CreateObject的外部不再是MSWC了，而是Scripting。
那上面就能够经由过程fso来处置驱动器了。好比fso.GetDriveName提取驱动器名，fso.GetDrive一样提取尺度驱动器名。好比：

1，fso.asp


<%Setfso=Server.CreateObject("Scripting.FileSystemObject")%>
<%=fso.GetDriveName("d:")%><br>
<%=fso.GetDrive("d:")%>



你会发明GetDriveName("d:")就是“d:”，而GetDrive("d:")则为尺度的“D:”，以是我们一样平常如许写fso.GetDrive(fso.GetDriveName(drvPath))来提取某个详细的驱动盘。

2、drv.GetInfo
下面已把某个特定的驱动器提取了，那接着是否是提取该驱动盘的详细信息。

2，drv.asp


<%
Setfso=Server.CreateObject("Scripting.FileSystemObject")
Setdrv=fso.GetDrive(fso.GetDriveName("d:"))
%>
该盘的空间巨细：<%=drv.TotalSize%><br>
该盘的残剩空间巨细：<%=drv.FreeSpace%>



以上只是提取的D盘驱动器的信息，来个通用的函数，持续分离测试本人的驱动吧。

3，drvinfo.asp


<%
FunctionShowDriveInfo(drvPath)
Dimfso,drv,s
Setfso=CreateObject("Scripting.FileSystemObject")
Setdrv=fso.GetDrive(fso.GetDriveName(drvPath))
s="驱动盘"&drv&"的卷标是："
s=s&drv.VolumeName&"<br>"
s=s&"总计空间："&drv.TotalSize&"<br>"
s=s&"残剩空间："&drv.FreeSpace&"<br>"
s=s&"文件范例："&drv.DriveType&"<br>"
s=s&"文件体系："&drv.FileSystem
Response.Writes
EndFunction
%>
<%
onerrorresumenext
whatpath=request.form("path")
ifwhatpath""then
ShowDriveInfo(whatpath)
endif%>
<formaction="drvinfo.asp"method="post">
<inputname="path">
<inputtype="submit">
</form>




个中的drv.TotalSize和drv.FreeSpace前往的是字节数，我们能够用FormatNumber()函数处置下。好比FormatNumber(Drive.TotalSize/1024,0)失掉一眼就知磁盘几G的值。

另有一个文件范例：drv.DriveType最多的时分是显现数值“2”，实在“2”就暗示的“硬盘驱动器”，“1”暗示“软盘驱动器”，“4”暗示“光盘驱动器”……

上面就用一个程序遍历显现本人呆板上一切驱动器的信息

4，showall.asp


<%
Functiontran(Driver)
SelectCaseDriver
Case0:tran="设备没法辨认"
Case1:tran="软盘驱动器"
Case2:tran="硬盘驱动器"
Case3:tran="收集硬盘驱动器"
Case4:tran="光盘驱动器"
Case5:tran="RAM假造磁盘"
EndSelect
EndFunction
setfso=Server.CreateObject("Scripting.FileSystemObject")
%>

<tableborder=1width="100%">
<tr>
<td>盘符</td>
<td>范例</td>
<td>卷标</td>
<td>总计巨细</td>
<td>可用空间</td>
<td>文件体系</td>
<td>序列号</td>
<td>是不是可用</td>
<td>路径</td>
</tr>
<%
onerrorresumenext
Foreachdrvinfso.Drives
Response.Write"<tr>"
Response.Write"<td>"&drv.DriveLetter&"</td>"
Response.write"<td>"&tran(drv.DriveType)&"</td>"
Response.write"<td>"&drv.VolumeName&"</td>"
Response.write"<td>"&FormatNumber(drv.TotalSize/1024,0)&"</td>"
Response.write"<td>"&FormatNumber(drv.Availablespace/1024,0)&"</td>"
Response.write"<td>"&drv.FileSystem&"</td>"
Response.write"<td>"&drv.SerialNumber&"</td>"
Response.write"<td>"&drv.IsReady&"</td>"
Response.write"<td>"&drv.Path&"</td>"
Response.Write"</tr>"
Next
setfs=nothing
%>
</tabl</p>优点：简单易学、开发速度快、有很多年“历史”，能找到非常多别人做好的程序来用、配合activeX功能强大，很多php做不到的asp+activeX能做到，例如银行安全控件

ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题：

ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题：

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。