日期:2011-12-24  浏览次数:20881 次

如何使用FSO复制文件-FSO使用教程1

从本篇开始,我们开始详细的讲解FSO的各大功能,让你系统性的对FSO有一个全面的了解,包括如何使用FSO复制文件,如何使用FSO删除文件,如何使用FSO移动文件,如何使用FSO重命名文件,如何使用FSO打开文件,如何使用FSO建立文件,如何使用FSO读取文件,如何使用FSO写入文件,如何使用FSO判断文件是否存在等等。以下先从如何使用FSO复制文件讲起:

一、FSO复制文件

方法:CopyFile

调用格式:

FileSystemObject名.CopyFile 源文件, 目的文件

注意事项:

  • 源文件:必须是已存在的文件,否则会产生“找不到源文件”的错误(错误编码:53)
  • 目的文件:如果目的文件已存在,则将覆盖。若文件属性为“只读”或“被锁定”,则会产生“没有使用权限”的错误(错误编码:70

源码实例:

将与ASP文件同目录下的File1.txt复制为File2.txt。
程序如下:(CopyFile.asp)

<%
'====================================================
'作者:爱易学习网
'网址:http://www.aiyiweb.com/
'源码:FSO复制文件示例
'时间:2005年12月17日
'====================================================
Set fs = Server.CreateObject("Scripting.FileSystemObject")
SFile = Server.MapPath("File1.txt")
TFile = Server.MapPath("File2.txt")
on Error Resume Next
fs.CopyFile SFile, TFile
If Err.Number = 53 Then
 Response.Write SFile & "文件不存在!"
 Response.End
Elseif Err.Number = 70 Then
 Response.Write TFile & "文件属性为只读!"
 Response.End
Elseif Err.Number <> 0 Then
 Response.Write "未知错误,错误编码:" & Err.Number
 Response.End
Else
 Response.Write "成功复制文件!" & TFile
End If
%>