ASP FSO文件处理函数大全

代码如下:<% ‘建立文件夹函数 Function CreateFolder(strFolder)’参数为相对路径     ‘首选判断要建立的文件夹是否已经存在     Dim strTestFolder,objFSO     strTestFolder = Server.Mappath(strFolder)     Set objFSO = CreateObject(“Scripting.FileSystemObject”)     ‘检查文件夹是否存在     If not objFSO.FolderExists(strTestFolder) Then   ‘如果不存在则建立文件夹   o