主题:  如何用ASP删除指定目录中的文件

ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#12003/6/16 10:49:48
如何用ASP删除指定目录中的文件?

例如: 有DOC目录,里面有ABC.TXT文件,如何用ASP代码来删除该文件?

请高手指教!!!!



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#22003/6/16 12:59:10
没人知道?



=ridincal=

职务:管理员
等级:7
金币:20.0
发贴:5886
注册:2004/1/13 11:47:04
#32003/6/16 14:31:28
需要FSO(File System Object)帮你转到Asp和.Net区。



{ 在指尖上绽放的花朵 }

职务:普通成员
等级:5
金币:14.0
发贴:3209
注册:2002/7/25 21:24:11
#42003/6/16 17:51:59
FSO 对象模式各有两种方法移动、复制和删除文件,如下表所述。
任务 | 方法
----------------------------------------------------------------------------------------
移动文件 | File.Move 或 FileSystemObject.MoveFile
----------------------------------------------------------------------------------------
复制文件 | File.Copy 或 FileSystemObject.CopyFile
----------------------------------------------------------------------------------------
删除文件 | File.Delete 或 FileSystemObject.DeleteFile
----------------------------------------------------------------------------------------

下面给出一个功能完整的fso例子,演示各种操作:

下面的 VBScript 示例,在驱动器 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 "Writing file
"
' 写一行。
f1.Write ("This is a test.")
' 关闭文件。
f1.Close
Response.Write "Moving file to c:\tmp
"
' 获取 C 的根目录(C:\)中的文件的句柄。
Set f2 = fso.GetFile("c:\testfile.txt")
' 把文件移动到 \tmp 目录。
f2.Move ("c:\tmp\testfile.txt")
Response.Write "Copying file to c:\temp
"
' 把文件复制到 \temp 目录。
f2.Copy ("c:\temp\testfile.txt")
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 "All done!"
End Sub

by wincheer



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#52003/6/17 10:03:14
谢谢,我非常喜欢这里,哦也!



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#62003/6/17 10:25:56
如何删除服务器上的文件!



{ 在指尖上绽放的花朵 }

职务:普通成员
等级:5
金币:14.0
发贴:3209
注册:2002/7/25 21:24:11
#72003/6/17 11:28:55
eral在上个帖子中说
引用:
谢谢,我非常喜欢这里,哦也!


eral在上个帖子中说
引用:
如何删除服务器上的文件!


这到底是什么意思捏? 



沉默是金

职务:普通成员
等级:6
金币:11.2
发贴:4357
注册:2004/2/18 11:17:25
#82003/6/18 8:52:55
dim fso
fso=createobject("scripting.filesystemobject")
fso.deletefile(server.MapPath(文件路径及文件名))


难人一个……

ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#92003/6/18 17:12:10
fso怎么用? 需要另外安装吗?



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#102003/6/18 17:14:11
Microsoft VBScript 运行时错误 (0x800A01B6)
对象不支持此属性或方法

一用就这样!》》》》



janlay

职务:管理员
等级:7
金币:28.0
发贴:7244
注册:2003/11/27 18:07:11
#112003/6/18 17:55:45
可能你的服务器不支持 FSO

FSO本来是系统自带的一个组件,但很多空间提供商担心它会影响服务器安全,就把这个组件注销或改名了



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#122003/6/18 18:02:07
如何删除文件问题2

如果文件名是变化的怎么办? 变量!

比方从数据库中读文件名 <%=rs("path")%> 路径是 /doc/

应该怎么写?



{ 在指尖上绽放的花朵 }

职务:普通成员
等级:5
金币:14.0
发贴:3209
注册:2002/7/25 21:24:11
#132003/6/18 21:58:15
引用:
dim fso
fso=createobject("scripting.filesystemobject")
fso.deletefile(server.MapPath(文件路径及文件名))



如果您看懂了这段程序,上面那个根本不是问题。



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#142003/6/19 9:17:03
set rs=server.createobject("adodb.recordset")
Set fso = CreateObject("Scripting.FileSystemObject")
fso.deletefile(server.MapPath("\doc\"+server.URLEncode(&path)))



ERAL

职务:普通成员
等级:1
金币:1.0
发贴:208
注册:2002/5/14 15:29:18
#152003/6/19 10:26:16
已经搞定了,谢谢啦!