asp利用fso给文件夹和文件改名的代码


<%
Dim fso,f,folder
    Set fso=Server.CreateObject("scripting.filesystemobject")
    改目录名
    Set folder=fso.getfolder(Server.Mappath("Old"))
    folder.name="New" 新名字

    改文件名
    Set f=fso.getfile(Server.Mappath("Old.asp"))
    f.name="New.asp" 新名字
释放
%>