asp fso操作类

    End Sub

    Public Function IsFolder(ByVal Str)
        IsFolder = FileSystemObject.FolderExists(Str)
    End Function

    
    Public Function ShowFolder(ByVal Str)
        Dim Obj_Folder,Obj_File
        Set Obj_Folder = FileSystemObject.GetFolder(Server.MapPath(Str))
        Set ShowFolder = Obj_Folder.Files
        Set Obj_Folder = Nothing
    End Function

End Class
%>

您可能感兴趣的文章:

asp结合fso实现文件或文件夹创建删除等操作的函数asp下利用fso实现文件夹或文件移动改名等操作函数使用FSO修改文件夹的名称实现文件转移防盗链fso asp生成静态html的代码ASP+FSO可视化目录编历（可增、删、改）下载asp下用ADODB.Stream代替FSO读取文本文件设置FSO权限功能的说明ASP FSO文件操作函数代码（复制文件、重命名文件、删除文件、替换字符串）