总结ASP操作文件夹和文件(转)

首先需要调用组件：Set FSO = Server.CreateObject("Scripting.FileSystemObject")
生成绝对路径：Path = Server.MapPath(Path)
文件夹的操作：
1.检查文件夹是否存在：FSO.FolderExists(Path)
2.生成一个新的文件夹：FSO.CreateFolder(Path)
3.复制文件夹内容：FSO.CopyFolder Path,NewPath,1
4.移动文件夹：FSO.MoveFolder Path,NewPath
5.删除文件夹：FSO.DeleteFolder(Path)
文件的操作：
1.检查文件是否存在：FSO.FileExists(Path)
2.生成一个新的文件：FSO.CreateTextFile(Path,True)
3.读取文件内容：
Set FS = FSO.OpenTextFile(Path, 1, False)
ConnText=FS.ReadAll
FS.Close
Set FS = Nothing
4.写入文件内容：
Set FS = FSO.CreateTextFile(Path,True)
         FS.WriteLine(TextContent) 'FS.Write(TextContent)
FS.Close
Set FS = Nothing
5.移动文件：FSO.MoveFile Path,NewPath
6.删除文件：FSO.DeleteFile(Path)

注：移动文件里的NewPath为文件地址而非文件夹地址，最后使用Set FSO = Nothing 释放资源

fso移动、复制和删除文件

FSO 对象模型各有两种方法移动、复制和删除文件，如下表所述。 

移动文件 File.Move 或 FileSystemObject.MoveFile 
复制文件 File.Copy 或 FileSystemObject.CopyFile 
删除文件 File.Delete 或 FileSystemObject.DeleteFile 





下面示例在驱动器 C 的根目录中创建一个文本文件，向其中写一些信息，然后把它移动到 \tmp 目录中，并在 \temp 中做一个备份，最后把它们从两个目录中删掉。

要运行下面的示例，需要先在驱动器 C 的根目录中创建 \tmp 和 \temp 目录：

<%

Sub ManipFiles 
Dim fso, f1, f2, s 
Set fso = CreateObject("Scripting.FileSystemObject") 
Set f1 = fso.CreateTextFile("c:\testfile.txt", True) 
Response.Write "写入<br>" 

f1.Write ("这是一个测试.") ' 写入一行。 
f1.Close ' 关闭写入到的文件。 
Response.Write "Moving file to c:\tmp <br>" 

Set f2 = fso.GetFile("c:\testfile.txt") ' 获取到 C:\ 根目录中文件的句柄。

f2.Move ("c:\tmp\testfile.txt") ' 将文件移到 \tmp 目录。 

Response.Write "Copying file to c:\temp <br>" 

f2.Copy ("c:\temp\testfile.txt") ' 将文件复制到 \temp。 

Response.Write "Deleting files <br>" 

Set f2 = fso.GetFile("c:\tmp\testfile.txt") ' 获得文件当前位置的句柄。 
Set f3 = fso.GetFile("c:\temp\testfile.txt") 

f2.Delete ' 删除文件。 

f3.Delete 
Response.Write "完成!" 
End Sub 
[JScript] 
function ManipFiles() 
{ 
var fso, f1, f2, s; 
fso = new ActiveXObject("Scripting.FileSystemObject"); 
f1 = fso.CreateTextFile("c:\\testfile.txt", true); 
Response.Write("Writing file <br>"); 

f1.Write("This is a test."); // 写入一行。

f1.Close(); // 关闭写入到的文件。

Response.Write("把文件移动到 c:\\tmp <br>"); 

f2 = fso.GetFile("c:\\testfile.txt"); // 获取到 C:\ 根目录中文件的句柄。 


f2.Move ("c:\\tmp\\testfile.txt"); // 将文件移到 \tmp 目录。 

Response.Write("把文件复制到c:\\temp <br>"); 

f2.Copy ("c:\\temp\\testfile.txt"); // 将文件复制到 \temp

Response.Write("Deleting files <br>"); 

f2 = fso.GetFile("c:\\tmp\\testfile.txt"); 
f3 = fso.GetFile("c:\\temp\\testfile.txt"); // 获得文件当前位置的句柄。 

f2.Delete(); 
f3.Delete(); // 删除文件。
Response.Write("完成!"); 
} 

'创建一个FileSystemObject的事例

Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)


IF MyFileObject.FileExists(“c:\test.txt”) '创建一个要进行操作的文件 

Response.write(“存在这个文件”)

Else

Response.write(“不存在这个文件”)

END IF

Set MyFile=MyFileObject.CreateTextFile(“c:\test.txt”)

MyFile.WriteLine(“Hello”)

MyFile.Close

MyFileObject.CopyFile “c:\test.txt” “c:\test2.txt” '复制文件操作

MyFileObject.MoveFile “c:\test.txt” “c:\test3.txt” '移动文件操作

MyFileObject.DeleteFile “c:\test.txt” '删除这些文件

MyFileObject.DeleteFile “c:\test3.txt”%>