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

来源：互联网发布：兼职做淘宝客服怎么样编辑：程序博客网时间：2024/05/16 07:26

首先需要调用组件：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 "写入 "
f1.Write ("这是一个测试.") ' 写入一行。
f1.Close ' 关闭写入到的文件。
Response.Write "Moving file to c:/tmp  "
Set f2 = fso.GetFile("c:/testfile.txt") ' 获取到 C:/ 根目录中文件的句柄。
f2.Move ("c:/tmp/testfile.txt") ' 将文件移到 /tmp 目录。
Response.Write "Copying file to c:/temp  "
f2.Copy ("c:/temp/testfile.txt") ' 将文件复制到 /temp。
Response.Write "Deleting files  "
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  ");
f1.Write("This is a test."); // 写入一行。
f1.Close(); // 关闭写入到的文件。
Response.Write("把文件移动到 c://tmp  ");
f2 = fso.GetFile("c://testfile.txt"); // 获取到 C:/ 根目录中文件的句柄。
f2.Move ("c://tmp//testfile.txt"); // 将文件移到 /tmp 目录。
Response.Write("把文件复制到c://temp  ");
f2.Copy ("c://temp//testfile.txt"); // 将文件复制到 /temp
Response.Write("Deleting files  ");
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”%>