- 首先需要调用组件: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”%>
总结ASP操作文件夹和文件(转)
最新推荐文章于 2013-06-22 22:38:08 发布