can't check in file : file is open by another application

Loui,

Maybe try something like what is suggested here: http://stackoverflow.com/questions/11287502/vb-net-checking-if-a-file-is-open-before-proceeding-with-a-read-write

Imports System.IO
Imports System.Runtime.InteropServices

Private Function IsFileOpen(ByVal file As FileInfo) As Boolean


    Dim stream As FileStream = Nothing
    Try
        stream = file.Open(FileMode.Open, FileAccess.ReadWrite, FileShare.None)
        stream.Close()

    Catch ex As Exception

        If TypeOf ex Is IOException AndAlso IsFileLocked(ex) Then
            Return True
        End If
    End Try
    Return False
End Function

Private Shared Function IsFileLocked(exception As Exception) As Boolean
    Dim errorCode As Integer = Marshal.GetHRForException(exception) And ((1 << 16) - 1)
    Return errorCode = 32 OrElse errorCode = 33
End Function