#VISUAL BASIC 2017 FILEWATCHER CONTROL WINDOWS#

If SampleSubType 'AA' And SampleSubType 'SP' Then WriteLog('ERROR: Invalid Heat Number in ') WriteLog('ERROR: Invalid Blend Number in ')ĮlseIf Mid(ioLineData(1), 1, 1) = 'B' Or Mid(ioLineData(1), 1, 1) = 'C' Then WriteLog('ERROR: is not in the correct file format.') 'The file may not be ready for opening yet as FileCreated fires at start of creation, 'so we'll have to keep trying till it's ready: Max of 1 minute, then give up Private Sub _Watcher_Created(sender As Object, e As FileSystemEventArgs) Handles _Watcher.Createdĭim SampleType As String = '' 'Blend or Heatĭim SampleSubType As String = '' 'AA or SPĭim SampleID As String = '' 'BlendID or HeatIDĭim blnIsFirst As Boolean = True 'is this Value1 or Value2?ĭim strLogSetting As String = ('LogErrorsOnly')

_Watcher.NotifyFilter = NotifyFilters.FileName _Watcher = New FileSystemWatcher(strDir, strFilter) Protected Overrides Sub OnStart(ByVal args() As String)ĭim strDir As String = ('ImportDirPath') Here is the code:ĭim WithEvents _Watcher As FileSystemWatcher I would appreciate any ideas about what could be going wrong. It is handling files exported by a lab machine - there is at least 5 minutes between files being added and there are only about 20 files in a day. The only thing I found online about issues with the FileSystemWatcher had to do with its internalīuffer but I don't believe that is the problem because this is not a high volume directory. It has now been running for two days without issue but obviously it's just a matter of time before it happens again.

I stopped and restarted the service and it started working again.

#VISUAL BASIC 2017 FILEWATCHER CONTROL WINDOWS#

There were no errors in the windows event log or in my program generated log file. Responding to new files in the watched directory.

This was running flawlessly for about a week, then 1 day it stopped I created a windows service project which instantiates a FileSystemWatcher in the OnStart event and then responds to the file created event whenever a file is created in the watched directory.

Visual basic 2017 filewatcher control