<p>FSO使用教程3 -- FSO移动文件,重命名</p>
<p>如何使用FSO移动文件,重命名文件-FSO使用教程3<br />
从本篇开始,我们开始详细的讲解FSO的各大功能,让你系统性的对FSO有一个全面的了解,包括如何使用FSO复制文件,如何使用FSO删除文件,如何使用FSO移动文件,如何使用FSO重命名文件,如何使用FSO打开文件,如何使用FSO建立文件,如何使用FSO读取文件,如何使用FSO写入文件,如何使用FSO判断文件是否存在等等。<br />
三、FSO移动文件,重命名文件<br />
方法:MoveFile<br />
调用格式:<br />
FileSystemObject名.MoveFile 源文件, 目的文件<br />
注意事项:<br />
源文件:必须是已存在的文件,否则会产生“找不到源文件”的错误(错误编码:53)<br />
目的文件:(1)目的文件必须是不存在的文件,否则会产生“文件已存在”的错误(错误编号=58);(2)若目的文件的所在目录与源文件的的所在目录相同,则MoveFile的功能是变更文件名称;若目的文件的所在目录与源文件的所在目录不同,则MoveFile的功能是移动文件。<br />
源码实例:<br />
将与ASP文件同目录下的File1.txt更名为NewFile1.txt。<br />
程序如下:(MoveFile.asp)<br />
<%<br />
'==================================================<br />
'作者:阿里西西<br />
'网址:<a href="http://www.alixixi.com/">http://www.alixixi.com/</a><br />
'源码:FSO移动文件,重命名文件示例<br />
'时间:2005年12月17日<br />
'==================================================<br />
Set fs = Server.CreateObject("Scripting.FileSystemObject")<br />
SFile = Server.MapPath("File1.txt")<br />
NFile = Server.MapPath("NewFile1.txt")<br />
on Error Resume Next<br />
fs.MoveFile SFile, NFile<br />
If Err.Number = 53 Then<br />
Response.Write File & "文件不存在!"<br />
Response.End<br />
Elseif Err.Number = 58 Then<br />
Response.Write File & "文件已存在!"<br />
Response.End<br />
Elseif Err.Number <> 0 Then<br />
Response.Write "未知错误,错误编码:" & Err.Number<br />
Response.End<br />
Else<br />
Response.Write "成功重命名文件!" & SFile &"为" &NFile& ""<br />
End If<br />
%></p>