vb.net文件監(jiān)控 vbnet doevent
vb.net中如何設(shè)計一個監(jiān)控程序？
以記事本為例
目前創(chuàng)新互聯(lián)建站已為1000+的企業(yè)提供了網(wǎng)站建設(shè)、域名、虛擬主機、綿陽服務(wù)器托管、企業(yè)網(wǎng)站設(shè)計、橋東網(wǎng)站維護等服務(wù)，公司將堅持客戶導(dǎo)向、應(yīng)用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶和合作伙伴齊心協(xié)力一起成長，共同發(fā)展。
Public Class Form1
Public Sub ShellAndWait(ByVal ProcessPath As String)
Dim objProcess As System.Diagnostics.Process
Try
objProcess = New System.Diagnostics.Process()
objProcess.StartInfo.FileName = ProcessPath
objProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal
objProcess.Start()
objProcess.WaitForExit()
objProcess.Close()
Catch
MessageBox.Show("無法執(zhí)行文件 " ProcessPath, "錯誤")
End Try
End Sub
'監(jiān)視程序就可以了，若果監(jiān)視別的窗體的話，用SPY++ 找到句柄，配合FindWindowEx，SendMessage根據(jù)其屬性做
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ShellAndWait("Notepad.exe")
MessageBox.Show("筆記本被關(guān)閉后我才會出現(xiàn)")
End Sub
End Class
vb.net監(jiān)控路徑上的任一文件夾，當(dāng)重命名時觸發(fā)事件。
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
FileSystemWatcher1.NotifyFilter = IO.NotifyFilters.DirectoryName Or IO.NotifyFilters.FileName‘監(jiān)控文件夾和文件。
FileSystemWatcher1.IncludeSubdirectories = True’監(jiān)控子文件夾
End Sub
Private Sub FileSystemWatcher1_Renamed(sender As Object, e As IO.RenamedEventArgs) Handles FileSystemWatcher1.Renamed
MsgBox(e.FullPath vbCrLf e.Name)
End Sub'捕獲新路徑
你監(jiān)控test不就好了，若要排除其他文件夾，IncludeSubdirectories 設(shè)為假，用多個FileSystemWatcher就行了，用數(shù)組或其他方式創(chuàng)建。
VB.NET中怎么調(diào)用攝像頭
給你個工程自己看...
運行后可以看到自己...
點按鈕保存到c:\1.bmp
vb.net，用FileSystemWatcher監(jiān)視一個文件的屬性變化，例如d:\test.doc，如果test.doc修改時間變動就Msg
這個還需要代碼么?
VB不會.C#大約像這樣:
從工具箱上拖一個該控件.
設(shè)置屬性如下:
最后注冊該控件的Change事件即可
新聞名稱：vb.net文件監(jiān)控 vbnet doevent
網(wǎng)頁鏈接：http://www.jiaotiyi.com/article/ddogpch.html