Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject") '
fso.DeleteFolder "F:\ABCDE", True
fso.creatfolder "F:\ABCD"
End Sub
这样才能达到楼主所说的删除某一文件夹下的所有文件夹 而用shell语句的话 不应该用del 而是 rd或者rmdir命令 后面也加/S删除目录后记得再用 md 建立该文件夹
在vb中,如何用代码删除指定目录下的所有文件?
直接用VB自带函数kill Kill "C:\\abc\\*.*" '表示删除C盘abc目录下的所有文件。如果要将文件夹删除只需加上以下语句：RmDir "C:\\abc"
vb怎么删除文件夹里面的所有文件
shell "cmd \/C del \/Q e:\\aa\\*.*" ,vbhide 本语句使用了\/Q参数，del命令的其他参数为：\/P 删除每一个文件之前提示确认。\/F 强制删除只读文件。\/S 从所有子目录删除指定文件。\/Q 安静模式。删除全局通配符时，不要求确认。\/A 根据属性选择要删除的文件。用KILL，不能删除文件夹，只能删除文件...
VB删除文件夹
'首先添加一个模块（Module），里面是如下代码：PublicConstBIF_RETURNONLYFSDIRS = 1PublicConstBIF_DONTGOBELOWDOMAIN = 2PublicDeclareFunctionSHBrowseForFolder Lib"shell32.dll"Alias"SHBrowseForFolderA"(LpBrowseInfo AsBROWSEINFO) AsLongPublicDeclareFunctionSHGetPathFromIDlist Lib"shell32.dll"Alias"SHGetPa...
VB怎么删除某文件夹里的所有文件夹
Private Sub Command1_Click()Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'fso.DeleteFolder "F:\\ABCDE", True fso.creatfolder "F:\\ABCD"End Sub 这样才能达到楼主所说的删除某一文件夹下的所有文件夹 而用shell语句的话 不应该用del 而是 rd或者rmdir命令 ...
VB如何删除指定文件夹内的所有文件和子文件?
strPathName = InputBox("请输入需要删除的文件夹名称∶", "删除文件夹")If strPathName = "" Then Exit Sub On Error GoTo ErrorHandle SetAttr strPathName, vbNormal '此行主要是为了检查文件夹名称的有效性 RecurseTree strPathName Label1....
VB 如何删除当前目录下的某个文件夹里的文件
你好，vb删除文件用Kill就可以。Private Sub Form_Load() Kill app.path &"\\123\\456.txt"end sub这样就可以了
VB删除目录里面的文件夹和文件
KILL 删除文件 RmDir path 删除目录或文件夹 如果没有指定驱动器，则RmDir会在当前驱动器上删除目录或文件夹。如果想要使用RmDir删除一个含有文件的目录或文件夹，则会发生错误。只有用Kill语句删除所有文件后，才能用来RmDir删除目录或文件夹 问题补充：照你的意思 看来一句话完成你想要的命令是不行的。
用vbs删除某文件夹下的所有文件怎么写?
可以使用批处理简单 echo off for \/d %%i in(*) do rmdir \/s \/q "%%i"保存成bat后缀名的文件，你试试。以上是删除文件夹及子文件夹的 你可以参考这个网页，肯定会有帮助的，不过要新建一个文件夹，并在其中运行，因为这段代码会删除所有当前目录的文件，小心！http:\/\/zhidao.baidu.com\/...
vb怎么删除文件夹里面的所有文件
Else '若不是目录或文件夹则对文件进行处理 '删除本目录所有文件 'Print DirName Kill FilePath & DirName End If DirName = Dir() '下一个目录或文件 Loop '--- '循环得到所有子目录 For i = i + 1 To DirSum FilePath = DirPath...
vb中如何用代码实现删除命令
1、kill 文件 '删除文件 rmdir 文件夹 '删除文件夹 如果想要使用 RmDir 来删除一个含有文件的目录或文件夹，则会发生错误。在试图删除目录或文件夹之前，先使用 Kill 语句来删除所有文件。2、或者用对象的方法:Set fs = CreateObject("Scripting.FileSystemObject")fs.deletefile 删除文件 fs.deletefolder...
