使用FSO对文件与文件夹的操作

检查指定的磁盘、文件夹、或是文件是否存在：

<% dim objfso 
    set objfso=server.createobject("scripting.filesystemobject") 
    if objfso.driveexists("c:") then 
    response.write"磁盘C是存在的" 
    else 
    response.write"磁盘C是不存在的" 
    end if  
    if objfso.folderexists(server.mappath("Inetpub")) then 
    response.write"Inetpub文件夹是存在的" 
    else 
    response.write"Inetpub文件夹是不存在的" 
    end if 

    if objfso.fileexists(server.mappath("ww.asp")) then 
    response.erite"ww.asp文件是存在的" 
    else 
    response.write"ww.asp文件是不存的" 
    end if  

    set objfso=nothing 
    %>

对文件的操作--建立、移动、删除文件夹

对文件夹的建立

<% 
    dim objfso 
    set objfso=server.createobject("scripting.filesystemobject") 
    objfso.createfolder(server.mappath("newfolder")) 
    response.write"新文件夹的实际路为"&server.mappath("newfolder") 
    set objfso=nothing 
    %> 
    对文件夹的移动

<% 
    dim objfso 
    set objfso=server.createobject("scripting.filesystemobject") 
    if objfso.folderExists(server.mappath("folder1")) then 
    objfso.moveFolder server.mappath("folder1"),server.mappath("folder2") 
    else 
    response.write"floder1文件夹不存在无法移动" 
    end if 
    set objfso=nothing 
    %> 
    对文件夹的删除

<% 
    dim objfso 
    set objfso=server.createobject("scripting.filesystemobject") 
    if objfso.folderExists(server.mappath("folder1")) then 
    objfso.deletefolder server.mappath("folder1") 
    else 
    response.write"文件夹不存在，无法删除" 
    end if 
    set objfso=nothing 
    %>