EgtUILib :
- resa pubblica funzione FileInUse.
This commit is contained in:
+2
-2
@@ -11,10 +11,10 @@
|
||||
'
|
||||
'----------------------------------------------------------------------------
|
||||
|
||||
Module Utilities
|
||||
Public Module Utilities
|
||||
|
||||
' Verifica se il file è in uso
|
||||
Public Function FileInUse( sFile As String) As Boolean
|
||||
Public Function FileInUse(sFile As String) As Boolean
|
||||
If System.IO.File.Exists(sFile) Then
|
||||
Try
|
||||
Dim F As Short = FreeFile()
|
||||
|
||||
Reference in New Issue
Block a user