ASP中常用的22个FSO文件操作函数整理

在ASP中，FSO的意思是File System Object，即文件系统对象。我们将要操纵的计算机文件系统，在这里是指位于web服务器之上。所以，确认你对此拥有合适的权限。理想情况下，你可以在自己的机器上建立一个web服务器，这样就能方便地进行测试。如果运行于Windows平台，请试一试微软公司的Web服务器iis。

FSO 模型对象

Drive Object：驱动器对象 供存取磁盘或者网络驱动器
FileSystemObject Object：文件系统对象 供存取计算机的文件系统
Folder Object：文件夹对象 供存取文件夹的所有属性
TextStream Object：文本流对象 供存取文件内容

你可以使用上面的对象做计算机上的任何事情，也包括破坏活动 ;-( 所以，请小心使用FSO。在web环境中，存储信息是非常重要的，比如用户信息，日志文件，等等。FSO提供了一个强大且简单的方法高效率地保存数据。FSO由微软公司提供支持，对于非Windows系统，大概不能再使用ASP。

1.文件操作，取文件大小

Function GetFileSize(FileName)'//功能：取文件大小'//形参：文件名'//返回值：成功为文件大小，失败为-1'//Dim fIf ReportFileStatus(FileName) = 1 ThenSet f = fso.Getfile(FileName)GetFileSize = f.SizeElseGetFileSize = -1End ifEnd Function 

2.使用FSO删除指定文件

Function deleteAFile(filespec)'//功能：文件删除'//形参：文件名'//返回值：成功为1，失败为-1'//If ReportFileStatus(filespec) = 1 Thenfso.deleteFile(filespec)deleteAFile = 1ElsedeleteAFile = -1End ifEnd Function 

3.FSO显示指定目录下的所有文件

Function ShowFileList(folderspec)'//功能：目录存在时显示此目录下的所有文件'//形参：目录名'//返回值：成功为文件列表，失败为-1'//Dim f, f1, fc, sIf ReportFolderStatus(folderspec) = 1 ThenSet f = fso.GetFolder(folderspec)Set fc = f.FilesFor Each f1 in fcs = s & f1.names = s & "|"NextShowFileList = sElseShowFileList = -1End ifEnd Function 

4.使用fso复制指定文件

Function CopyAFile(SourceFile,DestinationFile)'//功能：源文件存在时，才能对文件进行复制，目的文件无影响'//形参：源文件，目的文件'//返回值：成功为1，失败为-1'//Dim MyFileIf ReportFileStatus(SourceFile) = 1 ThenSet MyFile = fso.GetFile(SourceFile)MyFile.Copy (DestinationFile)CopyAFile = 1ElseCopyAFile = -1End ifEnd Function 

5.源文件存在时目的文件不存在时才能对文件进行移动

'Response.Write MoveAFile("f:/123/4561.exe","f:/123/4562.txt")Function MoveAFile(SourceFile,DestinationFile)'//形参：源文件，目的文件'//返回值：成功为1，失败为-1'//If ReportFileStatus(SourceFile)=1 AndReportFileStatus(DestinationFileORPath) =-1 Thenfso.MoveFile SourceFile,DestinationFileORPathMoveAFile = 1ElseMoveAFile = -1End ifEnd Function