删除指定的文件夹用什么代码啊?
我想通过窗体删除系统中某个文件夹,但不知代码怎么写,高手帮帮我啊。
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”
谢谢版主的回复,代码如果全部用上的话会出现差错,不知什么原因。
我用了下面两句代码成功了
Dim fsodelford Set fsodelford = CreateObject("Scripting.FileSystemObject") fsodelford.DeleteFolder(fpath)
全部是写成一个函数好调用的,呵呵
谢谢版主