<% Dimfso,f,folder Setfso=Server.CreateObject("scripting.filesystemobject") '改目錄名Setfolder=fso.getfolder(Server.Mappath("Old")) folder.name="New"'新名字'改文件名Setf=fso.getfile(Server.Mappath("Old.asp")) f.name="New.asp"'新名字'釋放%>