如何用VB编程监控指定文件夹下指定文件是否新增或修改?

发布网友发布时间：2022-08-31 02:22

共2个回答

热心网友时间：2024-03-15 01:41

Private Sub Form_Load()
Timer1.Interval = 30000
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Static ft As Date, fn As Long
If FileDateTime("C:\temp\pptt.flv") <> ft Then
    ft = FileDateTime("C:\temp\pptt.flv")
    fn = fn + 1
    FileCopy "C:\temp\pptt.flv", "D:\flv\" & Format(fn, "00000") & ".flv"
End If
End Sub

窗体上要放一个Timer1控件

热心网友时间：2024-03-15 01:42

获取文件的MD5值..每一次修改后MD5值会变的.追问能否写个完整程序？

追答http://www.newxing.com/Tech/Program/VisualBasic/417.html
这里有一个源码.你自己下载下来.写下就OK了..文件每次修改后的MD5是不一样的..

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com