日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問(wèn)題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
講述VB.NET使用FileSystemWatcher

學(xué)習(xí)VB.NET時(shí)，你可能會(huì)遇到VB.NET使用FileSystemWatcher問(wèn)題，這里將介紹VB.NET使用FileSystemWatcher問(wèn)題的解決方法，在這里拿出來(lái)和大家分享一下。

我們提供的服務(wù)有：成都網(wǎng)站設(shè)計(jì)、成都網(wǎng)站建設(shè)、外貿(mào)網(wǎng)站建設(shè)、微信公眾號(hào)開(kāi)發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、陽(yáng)曲ssl等。為上千余家企事業(yè)單位解決了網(wǎng)站和推廣的問(wèn)題。提供周到的售前咨詢和貼心的售后服務(wù)，是有科學(xué)管理、有技術(shù)的陽(yáng)曲網(wǎng)站制作公司

VB.NET使用FileSystemWatcher

偵聽(tīng)文件系統(tǒng)更改通知，并在目錄或目錄中的文件發(fā)生更改時(shí)引發(fā)事件。VB.NET使用FileSystemWatcher 監(jiān)視指定目錄中的更改?？杀O(jiān)視指定目錄中的文件或子目錄的更改。該組件可以監(jiān)視本地計(jì)算機(jī)、網(wǎng)絡(luò)驅(qū)動(dòng)器或遠(yuǎn)程計(jì)算機(jī)上的文件。（當(dāng)然只讀的媒體介質(zhì)比如cd和dvd，它們文件的屬性不會(huì)改變，所以也就不能觸發(fā)事件）

若要監(jiān)視所有文件中的更改，請(qǐng)將 Filter 屬性設(shè)置為空字符串 ("")。若要監(jiān)視特定的文件，請(qǐng)將 Filter 屬性設(shè)置為該文件名。例如，若要監(jiān)視文件 MyDoc.txt 中的更改，請(qǐng)將 Filter 屬性設(shè)置為“MyDoc.txt”。也可以監(jiān)視特定類型文件中的更改。例如，若要監(jiān)視文本文件中的更改，請(qǐng)將 Filter 屬性設(shè)置為“*.txt”。

可監(jiān)視目錄或文件中的若干種更改。例如，可監(jiān)視文件或目錄的 Attributes、LastWrite 日期和時(shí)間或 Size 方面的更改。通過(guò)將VB.NET使用FileSystemWatcher.NotifyFilter 屬性設(shè)置為 NotifyFilters 值之一來(lái)達(dá)到此目的。

可監(jiān)視文件或目錄的重命名、刪除或創(chuàng)建。例如，若要監(jiān)視文本文件的重命名，請(qǐng)將 Filter 屬性設(shè)置為“*.txt”，并調(diào)用 WaitForChanged 方法之一，調(diào)用時(shí)給出 WatcherChangeTypes 值的 Renamed。

新建一個(gè)project，選擇windows 服務(wù)類型，命名為WinServiceFileWatching，我們看到project的引用中自動(dòng)添加了System.ServiceProcess 名空間（這就是創(chuàng)建一個(gè)服務(wù)的函數(shù)集）。從工具中的組件中選擇FileSystemWatcher1，拖放到service1的設(shè)計(jì)模式上.

然后添加以下代碼：

 
 
 
    
  
  
  
  1. Protected Overrides Sub OnStart(ByVal args() As String) 
    2. 
  
  
  
  2. ' 在此處添加啟動(dòng)服務(wù)的代碼。此方法應(yīng)設(shè)置具體的操作 
    3. 
  
  
  
  3. ' 以便服務(wù)可以執(zhí)行它的工作。 
    4. 
  
  
  
  4. FileSystemWatcher1.EnableRaisingEvents = True
    5. 
  
  
  
  5. ' 我們也可以根據(jù)輸入的參數(shù)args動(dòng)態(tài)設(shè)定要監(jiān)視的對(duì)象 
    6. 
  
  
  
  6. 'FileSystemWatcher1.path= args(0) 
    7. 
  
  
  
  7. End Sub 
    8. 
  
  
  
  8. ' 創(chuàng)建文件（夾）時(shí)候觸發(fā)，記錄創(chuàng)建信息到e:\log.txt中 
    9. 
  
  
  
  9. Private Sub FileSystemWatcher1_Created(ByVal sender As Object, 
    ByVal e As System.IO.FileSystemEventArgs) Handles FileSystemWatcher1.Created 
    10. 
  
  
  
  10. Dim fs As New FileStream("e:\log.txt", FileMode.Append) 
    11. 
  
  
  
  11. Dim sw As New StreamWriter(fs) 
    12. 
  
  
  
  12. sw.WriteLine(Now() & Microsoft.VisualBasic.vbTab & "創(chuàng)建" & e.FullPath) 
    13. 
  
  
  
  13. sw.Close() 
    14. 
  
  
  
  14. fs.Close() 
    15. 
  
  
  
  15. End Sub
    16.

分享名稱：講述VB.NET使用FileSystemWatcher
本文來(lái)源：http://www.5511xx.com/article/cdohooi.html