導航:首頁 > 文件處理 > 檢測當前文件夾

檢測當前文件夾

發布時間:2024-04-04 15:28:21

Ⅰ 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相關版本,其他版本略有不同,可以根據實際情況進行設置!

閱讀全文

與檢測當前文件夾相關的資料

熱點內容
vi命令將文件創在桌面上 瀏覽:921
程序員做競價 瀏覽:696
江蘇中小學編程納入課程 瀏覽:730
單純形法包括動態規劃演算法 瀏覽:951
cpdf百度網盤 瀏覽:671
綜合布線工程中配線架的演算法 瀏覽:925
單片機碩士論文 瀏覽:329
股票預測演算法現狀 瀏覽:430
程序員三高 瀏覽:180
pythonfiddle 瀏覽:215
韓信分油總共有幾種演算法 瀏覽:941
程序員思維方案 瀏覽:970
編譯環境要裝c盤嗎 瀏覽:648
單片機生成pwm 瀏覽:206
線上租車有什麼app 瀏覽:908
php程序修改 瀏覽:684
下列能查找文件或文件夾的操作是 瀏覽:314
遙感科學與技術演算法待遇 瀏覽:136
cad標注半徑命令 瀏覽:367
打卡領購app邀請碼怎麼填 瀏覽:336