vb.net運行并監(jiān)控,vbs監(jiān)控進程的腳本
vb.net中如何設(shè)計一個監(jiān)控程序？
以記事本為例
成都創(chuàng)新互聯(lián)10多年成都定制網(wǎng)站服務(wù);為您提供網(wǎng)站建設(shè),網(wǎng)站制作,網(wǎng)頁設(shè)計及高端網(wǎng)站定制服務(wù),成都定制網(wǎng)站及推廣,對成都水處理設(shè)備等多個方面擁有多年的網(wǎng)站設(shè)計經(jīng)驗的網(wǎng)站建設(shè)公司。
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)控SQL，指定表中特定字段中有新的數(shù)據(jù)寫入進來。謝謝！
這個監(jiān)控不好弄。
我想的辦法就是你寫一個觸發(fā)器，只要有新增的數(shù)據(jù)，就同時增加到另一個臨時表，然后再 VB.NET 里用計時器，每隔幾秒就對那個臨時表讀一次。如果有新增的，就會有提示。
如果不愿寫觸發(fā)器，也可以直接在 VB.NET 里寫上語句，將你需要監(jiān)控的幾個字段內(nèi)容先保存起來，然后再用最新讀取的紀(jì)錄進行比對，這樣也行。
vb.net 2008 怎樣進入調(diào)試模式？怎樣逐語句運行？怎樣添加監(jiān)視？
在VB環(huán)境中執(zhí)行源代碼，本身就是調(diào)試模式
按F8即可逐語句運行
點擊語句左端空白處，將其背景色變?yōu)樯罴t，就是添加斷點，運行到該語句會停下來
可以在變量、對象等語句上點擊右鍵，選擇“添加監(jiān)視”即可
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)建。
當(dāng)前題目：vb.net運行并監(jiān)控,vbs監(jiān)控進程的腳本
文章鏈接：http://m.jiaotiyi.com/article/dssecoe.html