VB.NETを述べてFileSystem Watchを使います.


VB.NETを学ぶ時、VB.NETがFileSystem Watchを使う問題に出会うかもしれません.ここではVB.NETがFileSystem Watchを使う問題の解決方法を紹介します.ここで取り出して皆さんと分かち合います.
VB.NETはFileSystem Watchを使用します.
ファイルシステムの変更通知を聞き込み、ディレクトリやディレクトリのファイルが変更されたときにイベントが発生します.VB.NETは指定されたディレクトリの変更をFileSystem Watchで監視します.指定されたディレクトリのファイルまたはサブディレクトリの変更を監視することができます.このコンポーネントは、ローカルコンピュータ、ネットワークドライバ、またはリモートコンピュータ上のファイルを監視することができる.(もちろん読み取り専用のメディアメディアはcdやdvdなど、ファイルの属性は変わらないので、イベントをトリガすることはできません.)
すべてのファイルの変更を監視するには、Filter属性を空の文字列(")に設定してください.特定のファイルを監視する場合は、Filter属性をそのファイル名に設定してください.例えば、ファイルMyDoc.txtの変更を監視する場合は、Filter属性を「MyDoc.txt」に設定してください.特定タイプファイルの変更を監視することもできます.例えば、テキストファイルの変更を監視する場合は、Filter属性を「*.txt」に設定してください.
ディレクトリやファイルのいくつかの変更を監視できます.例えば、ファイルまたはディレクトリのAttributes、LastWrite日付および時間またはSizeの変更を監視することができます.この目的はVB.NETをFileSystem Watch.NotifyFilter属性をNotifyFilters値に設定することによって達成される.
ファイルまたはディレクトリの名前変更、削除、または作成を監視できます.例えば、テキストファイルの名前変更を監視する場合は、Filter属性を「*.txt」に設定し、WaitForChangedメソッドの一つを呼び出し、呼び出し時にWatch ChengpeType値のRenamedを与えてください.
新しいプロジェクトを作って、windowsサービスの種類を選んで、WinServiceFileWatchと名づけました.プロジェクトの参照にSystem.ServiceProcess名空間が自動的に追加されているのを見ました.ツールのセットからFileSystem Watch 1を選択し、service 1のデザインモードにドラッグします.
次のコードを追加します.
Protected Overrides Sub OnStart(ByVal) args() As String) 
  •  起動サービスのコードをここに追加します.この方法は具体的な操作を設定するべきです. 
  • ' サービスがその仕事を実行できるようにします. 
  • FileSystem Watch 1.EnbaleRaisingEvents = True 
  • ' 入力したパラメータに応じて、監視対象を動的に設定することもできます. 
  • 'FileSystem Watch 1.path= args(0) 
  • End Sub 
  •  ファイルを作成するときにトリガします.作成情報をe:\log.txtに記録します. 
  • Private Sub FileSystem Watch 1_Created(ByVal sender As Object ByVal e As System.IO.FileSystem EventArgs) Handles FileSystem Watch 1.reated 
  • Dim fs As New FileSteream(「e:\log.txt」、 FileMode.Apppend) 
  • ディム sw. As New Stream Writer(fs) 
  • sw.WriteLine(Now() & Microsoft.Visual Baic.vbTab & 「作成」 & e.FulPath) 
  • sw.C lose() 
  • fs.Close() 
  • End Sub  「ITPUBブログ」から、リンク:http://blog.itpub.net/12639172/viewspace-616647/転載する場合は、出典を明記してください.そうしないと法律責任を追及します.
    転載先:http://blog.itpub.net/12639172/viewspace-616647/