Question

asp复制一个文件到指定文件夹，

asp复制一个文件到指定文件夹，

谁能给个实例和使用方法？

下面这个不会用，，，==============

<%
Public Function CopyAFile(SourceFile, DestinationFile)
Dim MyFile
If ReportFileStatus(SourceFile) = 1 Then
Set MyFile = objFSO.GetFile(SourceFile)
MyFile.Copy (DestinationFile)
CopyAFile = 1
Else
CopyAFile = -1
End if
End Function

%>
====================不会用，谁能告诉我怎么用的？？？

谢谢，最好能给个实例谢谢，，10分

Answer 1

用FSO对象的copy方法来进行复制
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine("This is a test.")
MyFile.Close
Set MyFile = fso.GetFile("c:\testfile.txt")
MyFile.Copy ("c:\windows\desktop\test2.txt")
这样就可以了。

Answer 2

这个就是一个FSO复制文件的函数
用法如下
CopyAFile(SourceFile, DestinationFile)
SourceFile你替换成你需要复制的文件路径
DestinationFile你替换成需要另一文件夹的路径

但这个函数中还用到了其它的函数，并且也没有注册FSO等语句，估计你抄写的这代码还有其它好多代码

这应该是在一个FSO组合功能中的一段
这个函数的写法的例子
CopyAFile("c:\boot.ini","d:\boot.inf")
这样就可以

Answer 3

这个就是一个FSO复制文件的函数
用法如下
CopyAFile(SourceFile, DestinationFile)
SourceFile你替换成你需要复制的文件路径--->Source就是源的意思
DestinationFile你替换成需要另一文件夹的路径--->Destination是目的地的意思

但这个函数中还用到了其它的函数，并且也没有注册FSO等语句，估计你抄写的这代码还有其它好多代码

这应该是在一个FSO组合功能中的一段
这个函数的写法的例子:CopyAFile("c:\boot.ini","d:\boot.inf") 就是说把C盘下的boot.ini复制到地盘，但是名字变成了boot.inf。

这种写法太常见了，多熟悉就知道了。

Answer 4

Function CopyFiles(SourcePath,CopyToPath)
Set Fso=Server.CreateObject("Scri"&"pting.File"&"Sys"&"temObject")
Fso.CopyFile Server.MapPath(SourcePath),Server.MapPath(CopyToPath)
Set Fso=nothing
End Function

引用：call CopyFiles("1/1.txt","3/2.txt")

其中目录1和3都存在

Answer 5

到底是复制还是上传？
复制 是服务器文件 到 服务器文件
上传是 本地文件 到服务文件