100分 ASP修改文件名

dim fpath '路径
fpath=server.mappath(".")
if right(fpath,2)="\." then
fpath=left(fpath,len(fpath)-2)
end if
fpath=fpath&"\"
'以上代码可以获得当前网页所在的目录

dim fname1,fname2 '两个变量，一个表示源文件名，一个表示修改后的文件名

Set fso = Server.CreateObject("Scripting.FileSystemObject")
fso.movefile fpath&"images\"&fname1,fpath&"images\"&fname2
这句代码的意思就是：把当前网页所在目录下的images文件夹中的第一个文件名的文件改为第二个文件名。如果你想修改的文件与当前网页在同一个文件夹中，可改为：
fso.movefile fpath&fname1,fpath&fname2

f盘写出来是绝对地址，你用相对地址即可。
比如site是所有网页代码所在的文件夹，那你就写../images/001.jpg，第二章图就是../images/001.jpg

<%
mdbFile="001.jpg"
dbFile=server.MapPath(mdbFile)
set fso=Server.CreateObject("Scripting.FileSystemObject")
set file=fso.GetFile(dbFile)
file.name="002.jpg"
%>