我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net文件监控 vbnet doevent

vb.net中如何设计一个监控程序?

以记事本为例

目前创新互联建站已为1000+的企业提供了网站建设、域名、虚拟主机绵阳服务器托管、企业网站设计、桥东网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

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("无法执行文件 " ProcessPath, "错误")

End Try

End Sub

'监视程序就可以了,若果监视别的窗体的话,用SPY++ 找到句柄,配合FindWindowEx,SendMessage根据其属性做

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

ShellAndWait("Notepad.exe")

MessageBox.Show("笔记本被关闭后我才会出现")

End Sub

End Class

vb.net监控路径上的任一文件夹,当重命名时触发事件。

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

FileSystemWatcher1.NotifyFilter = IO.NotifyFilters.DirectoryName Or IO.NotifyFilters.FileName‘监控文件夹和文件。

FileSystemWatcher1.IncludeSubdirectories = True’监控子文件夹

End Sub

Private Sub FileSystemWatcher1_Renamed(sender As Object, e As IO.RenamedEventArgs) Handles FileSystemWatcher1.Renamed

MsgBox(e.FullPath vbCrLf e.Name)

End Sub'捕获新路径

你监控test不就好了,若要排除其他文件夹,IncludeSubdirectories 设为假,用多个FileSystemWatcher就行了,用数组或其他方式创建。

VB.NET中怎么调用摄像头

给你个工程自己看...

运行后可以看到自己...

点按钮保存到c:\1.bmp

vb.net,用FileSystemWatcher监视一个文件的属性变化,例如d:\test.doc,如果test.doc修改时间变动就Msg

这个还需要代码么?

VB不会.C#大约像这样:

从工具箱上拖一个该控件.

设置属性如下:

最后注册该控件的Change事件即可


本文题目:vb.net文件监控 vbnet doevent
网页路径:http://shouzuofang.com/article/ddogpch.html

其他资讯