删除文件夹内所有文件为何为提示？
Inquire(directory='PView_Csv',exist=isExist)IF(isExist) Then
Call system("del .\PView_Csv")
!Call system("del .\PView_Csv\*")
!Call system("del .\PView_Csv\*.csv")
!Call system("rd .\PView_Csv")
Else
DirName = "mkdir "//".\PView_Csv"
Call system(trim(adjustl(DirName)))
End IF
我想要的功能是：查询是否存在PView_Csv文件夹。如果存在，则删除其内所有文件。如果不存在，则创建此文件夹。代码如上。但运行上面代码后，却要还输入Y/N。如下图所示
我想要的是直接删除，不再询问Y/N。由于这个文件夹里有很多*.csv文件，所以我就尝试了 !Call system("del .\PView_Csv\*.csv") 这行代码，可以直接把所有*.csv文件删除。但我觉得需要把这个文件夹里的所有类型文件，都按照这样来一行一行地写出来，才能删除干净，似乎是麻烦了些。后来我又尝试了 !Call system("del .\PView_Csv\*") 这行代码，同样会询问Y/N。就想请教大家，有没有命令可以直接把这个文件夹内的所有文件全部删除，不再询问Y/N。我尝试了 !Call system("rd .\PView_Csv")不起作用，因为这个文件夹里有文件的话，这行代码不能执行。
del/?可以查看帮助
/Q 安静模式。删除全局通配符时，不要求确认
试试这个选项
del/q .\PView_Csv\*.csv necrohan 发表于 2023-2-25 17:54
del/?可以查看帮助
/Q 安静模式。删除全局通配符时，不要求确认
试试这个选项
非常感谢，我试试
页:
[1]