在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
新聞熱點
疑難解答