怎么样对一个文件改名。
---------------------------------------------------------------
重命名
JUST A JOKE
用FSO 啊
---------------------------------------------------------------
有二种方法,一个是用fso的复制方法
copyfile(原文件路径,目录文件路径,false or true)
然后用deletefile(文件名,false)删除原文件
另一个是写文件写到别的一个新建文件,再删除原文件
set MyFileObject=server.CreateObject("Scripting.FileSystemObject")
filename=server.MapPath("文件名")
Set myTextFile=MyFileObject.OpenTextFile(filename)
While not myTextFile.AtEndOfStream
Mytext=mytext+MytextFile.Readall
Wend
再创建一个文件
filename=server.MapPath("新文件名")
Set myTextFile=MyFileObject.OpenTextFile(filename,2,true,-2)
'the 2 meaning forwriting
'the ture meaning 如果页面不存在,就创建一个新的页面
mytextfile.writeline mytext
然后再用deletefile("原文件名",false)删除原文件
---------------------------------------------------------------
set objfs=server.createobject("scripting.filesystemobject")
objfs.copyfile old_file_name,new_file_name
set objfs=nothing
---------------------------------------------------------------
同意楼上的
---------------------------------------------------------------
set objfs=server.createobject("scripting.filesystemobject")
objfs.copyfile old_file_name,new_file_name
set objfs=nothing