[求助]删除文件夹的代码怎么写？

知难而进发布于 2006-06-16 20:24， 892 次点击

删除指定的文件夹用什么代码啊？

我想通过窗体删除系统中某个文件夹，但不知代码怎么写，高手帮帮我啊。

4 回复

icecool2006-06-16 21:49

Sub DeleteAFolder(fpath)
Dim fsodelford
Set fsodelford = CreateObject("Scripting.FileSystemObject")
fsodelford.DeleteFolder(fpath)
response.write "<font size=2 color=#ff0000>删除文件夹成功!</font>"
End Sub

参数FPATH是指定的绝对路径，如：“c:\123”

知难而进2006-06-16 22:45

谢谢版主的回复，代码如果全部用上的话会出现差错，不知什么原因。

我用了下面两句代码成功了

Dim fsodelford
Set fsodelford = CreateObject("Scripting.FileSystemObject")
fsodelford.DeleteFolder(fpath)

icecool2006-06-16 23:16

全部是写成一个函数好调用的，
呵呵

知难而进2006-06-17 22:02

谢谢版主