VFP 愛用者社區

puby · 註冊時間: 2009-04-28 文章: 30 第 1 樓

小弟想要監視某個資料夾內容是否有異動，不論是資料夾內任何檔案遭新增、修改、刪除。

查詢說明文件後，似乎只找到 ADIR() 這個函數，取得陣列後再依日期、時間排序後，才能取得檔案最後存取時間。

可是這樣做似乎很沒效率，尤其資料夾內檔案很多的時候。
而且又產生了一個問題，刪除的檔案偵測不到 .....

請教各位高手，有無更有效的方式可以達成？

謝謝。

bx1166 · 註冊時間: 2011-12-06 文章: 273 第 2 樓

我的經驗是從源頭著手

所有的添加修改刪除使用者日期時間都用一個檔案記錄起來反正背景資料登記每個月或者每個星期登記的檔案就建立一個來避免單一個紀錄過多這樣子要追蹤就很簡單這個屬於主管階級的監視程式由主管的權限去開啟

如果有別的程式來更動那沒辦法只有定時去紀錄裡面的檔案內容
來做比較

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 3 樓

最快的方法，只要一秒鍾

第一次檢查 MyDir
run dir/s/b MyDir > a.txt
然後，把 a.txt 保留起來

之後的每一次監視
只要 dir/s/b MyDir > b.txt

如果 Filetostr(a.txt)<>FileToStr(b.txt)
就是該資料夾內任何檔案有遭新增、修改、刪除了。

bx1166 · 註冊時間: 2011-12-06 文章: 273 第 4 樓

這也是個方法很簡單也很好用

可惜, 只是知道檔案被刪了,
不知道什麼時候, 誰, 刪了檔案?

puby · 註冊時間: 2009-04-28 文章: 30 第 5 樓

puby · 註冊時間: 2009-04-28 文章: 30 第 6 樓

chilin · 發表於: 星期一十一月 05, 2012 2:57 pm 文章主題:

可利用MD5來比對檔案內容
dir /s/b MyDIR | xargs md5sum > a.txt
dir /s/b MyDIR | xargs md5sum > b.txt
假如a.txt<>b.txt，被異動修改

xargs 及 md5sum 是linux的指令，讓windows也可以使用linux命令可參考：
https://github.com/bmatzelle/gow/wiki
或直接下載安裝
https://github.com/downloads/bmatzelle/gow/Gow-0.7.0.exe

ckp6250 · 註冊時間: 2004-07-30 文章: 1645 第 8 樓

bx1166 · 註冊時間: 2011-12-06 文章: 273 第 9 樓

如果電腦的使用者會用很多種程式去存取這個資料夾
那麼要監視所有的異動只有從 basic I/O 著手才有可能知道,以及監視到每一筆的異動
工程很龐大需要動到windows系統

如果只是程式裡面的就上面幾位大大的方法都可以解決一部分.
只是有這麼複雜的需求的必要性嗎?

我的另一個經驗是

每天複製到新的資料夾資料夾就以日期命名
那就整個資料夾的東西都可以拿來比對 !

elleryq · 註冊時間: 2007-06-21 文章: 768 第 10 樓

用 win32 api 可以做到。參考這篇看看。
http://msdn.microsoft.com/zh-tw/library/windows/desktop/aa365261%28v=vs.85%29.aspx

bx1166 · 註冊時間: 2011-12-06 文章: 273 第 11 樓

我想樓主問這個題目

主要是要監視這個資料夾的一切更動包括原來是什麼現在改成了什麼

什麼被刪除了又添加了什麼整個資料的詳細內容我覺得從源頭著手紀錄一切

還有想辦法阻止別讓別的程式來更動這些資料也許也是另一個選擇

goodnight · 發表於: 星期五十一月 09, 2012 1:54 pm 文章主題:

如果是在 win server 聽說是可以做到的, 可以記錄在 log 裡

Austan · 註冊時間: 2005-08-01 文章: 8 第 13 樓

10樓那個 API 就是Windows 上的標準作法,

任何的異動包含, delete 都會觸發, 很好用. 只是我不知要如何用 Foxpro 來做,
我都是用 Delphi 來做 . 看有沒有高手用 Foxrpro 的 code 來寫 Smile