<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
复制某目录下所有文件至指定目录Set fso=CreateObject("Scripting.FileSystemObject")
Set Cur_Folder = fso.getfolder(Server.MapPath(SourcePath)) ''源文件夹
Distination_Path="c: est"
Set sub_files = Cur_Folder.files
for each each_file in sub_files
sub_file_path=each_file.name
fso.CopyFile Server.MapPath(SourcePath)&"/"&sub_file_path,Distination_Path&"/"&sub_file_path,True
Next
本文介绍了一段使用VBScript实现的脚本代码,该脚本能将指定目录下的所有文件复制到另一个指定目录中。具体操作包括创建文件系统对象、获取源文件夹路径、遍历文件并进行复制。
917

被折叠的 条评论
为什么被折叠?



