diff options
Diffstat (limited to 'ShiftOS-TheRevival/Functions/InGame/FileManagement.vb')
| -rw-r--r-- | ShiftOS-TheRevival/Functions/InGame/FileManagement.vb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb b/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb index b84a2a0..8ce69ff 100644 --- a/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb +++ b/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb @@ -5,12 +5,16 @@ Module FileManagement If File.Exists(Console.CurrentDirectory & "\" & filename) = True Then Dim ContentsFinal As String = File.ReadAllText(Console.CurrentDirectory & "\" & filename) NewLine(ContentsFinal) + Else + NewLine("File is not exist") End If End Sub Public Sub DeleteFile(filename As String) If File.Exists(Console.CurrentDirectory & "\" & filename) = True Then File.Delete(Console.CurrentDirectory & "\" & filename) + Else + NewLine("File is not exist") End If End Sub |