Ⅰ VB 檢測文件夾是否為空
有一個很簡單的方法,用RmDir 文件夾,直接刪除文件夾。
如果刪除出錯,那就表示文件夾不是空的。
代碼如下(以C: emp為例):
tmp="C: emp"
OnErrorGoToErr
RmDir(tmp)'刪除目錄,如果出錯表示不為空
MkDir(tmp)'重新建目錄
MsgBox"文件夾為空!"
ExitSub
Err:
MsgBox"文件夾不為空!"
Ⅱ 我想用vb 監控 某個文件夾下的文件是否有變化,如果出現了變化,進行報警並顯示內容
若只是監視文件夾下的 文件數目、名稱是否有改變的話 很容易。若要檢測文件夾下文件內容是否被改動,就需要檢測所有文件的修改日期了。先來個檢測文件夾下名稱、數量的吧。
在VB中要實現查找文件功能,我們可以利用VB的DIR函數進行遞歸來實現。每次使用DIR函數後,比較是否有要查找的文件,再檢查是否有子目錄,若有,利用遞歸繼續查找,這樣可對整個盤進行查找。
下面是一個例子,查找DOS目錄下的所有EXE文件,統計EXE文件的數目並列出文件名。本程序會查找當前路徑下的所有文件和子目錄,與WIN95的「包含子文件夾」的查找功能類似。
程序與注釋如下:
1.在窗體中加一命令按鈕Command1,Caption=查找示例,雙擊此按鈕,寫如下代碼:
Private Sub Command1_Click()
Dim ff() As String '定義一個字元串數組用來保存找到的文件名稱
Dim fn As Long '保存找到的文件數目
fn=TreeSearch("C:%%dos","*.exe",ff())
Print "找到文件數目為" & fn
For I=1 To fn
Print ff(I)
Next
End Sub
2.插入一模塊Molel.bas,寫如下代碼:
Option Explicit
Public Function TreeSearch(ByVal sPath As String,ByVal sFileSpec As String,sFiles() As String) As Long
Static 1Files As Long '文件數目
Dim sDir As String
Dim sSubDirs() As String '存放子目錄名稱
Dim 1Index As Long
If Right(sPath,1)<>"%%" Then sPath=sPath & "%%"
sDir=Dir(sPath & sFileSpec)
'獲得當前目錄下文件名和數目
Do While Len(sDir)
1Files=1Files+1
ReDim Preserve sFiles(1 To 1Files)
sFiles(1Files)=sPath & sDir
sDir=Dir
Loop
'獲得當前目錄下的子目錄名稱
1Index=0
sDir=Dir(sPath & "*.*",16)
Do While Len(sDir)
If Left(sDir,1)<>"." Then 'skip.and..
'找出子目錄名
If GetAttr(sPath & sDir)And vbDirectory Then
1Index=lIndex+1
'保存子目錄名
Redim Preserve sSubDirs(1 To 1Index)
sSubDirs(1Index)=sPath & sDir & "%%"
End If
End If
sDir=dir
Loop
For 1Index=1 To 1Index
'查找每一個子目錄下文件,這里利用了遞歸
Call TreeSearch(sSubDirs(1Index),sFileSpec,sFiles())
Next 1Index
TreeSearch=1Files
End Function
3.保存文件,按F5運行,單擊命令按鈕即可。
Ⅲ Python使用判斷,檢查是都存在1.TXT文件,如果不存在,返迴文字不存在!怎麼寫這段代碼
檢查文件是否存在的方法,在Python3文件操作中經常被用到,因為,只有文件存在,我們才可以對文件進行下一步處理,那麼,常用的檢查文件存在的方法有哪些呢?以下是Python3檢查文件是否存在的幾種方法。
一、 使用os庫
os庫方法可檢查文件是否存在,存在返回Ture,不存在返回False,且不需要打開文件。
1. os.path.isfile文件檢查
import os.path
filename='/oldboye.com/file.txt'
os.path.isfile(filename)
2. os.path.exists文件夾檢查
import os
a_path='/oldboye.com/'
if os.path.exists(a_path):
#do something
3. os.access文件許可權檢查
import os
filename='/oldboye.com/file.txt'
if os.path.isfile(filename) and os.access(filename, os.R_OK):
#do something
二、使用pathlib庫
使用pathlib庫也是一種檢查文件是否存在的方法,且從Python3.4開始,Python已經把pathlib加入了標准庫,無需安裝,即可直接使用!
1. 檢查文件是否存在
from pathlib import Path
my_file = Path("/oldboye.com/file.txt")
if my_file.is_file():
# file exists
2. 檢查文件夾是否存在
from pathlib import Path
my_file = Path("/oldboye.com/file.txt")
if my_file.is_dir():
# directory exists
3. 文件或文件夾是否存在
from pathlib import Path
my_file = Path("/oldboye.com/file.txt")
if my_file.exists():
# path exists
以上列舉Python3中檢查文件和文件夾的兩種常用的方法,適用於Python3相關版本,其他版本略有不同,可以根據實際情況進行設置!