aboutsummaryrefslogtreecommitdiff
path: root/ShiftOS-TheRevival/Functions/InGame/FileManagement.vb
diff options
context:
space:
mode:
authorEverythingWindows <[email protected]>2022-11-19 06:54:01 +0700
committerEverythingWindows <[email protected]>2022-11-19 06:54:01 +0700
commit1d1722345b99abe7f52e999994ccb3e088cbd3c2 (patch)
tree327c1bd028102ddcec8c71d8a5229740f35f089e /ShiftOS-TheRevival/Functions/InGame/FileManagement.vb
parente73d05d3b013924c89c6c8824f8bf338ec52ffbd (diff)
downloadshiftos-therevival-old-1d1722345b99abe7f52e999994ccb3e088cbd3c2.tar.gz
shiftos-therevival-old-1d1722345b99abe7f52e999994ccb3e088cbd3c2.tar.bz2
shiftos-therevival-old-1d1722345b99abe7f52e999994ccb3e088cbd3c2.zip
Rename function implemented
Diffstat (limited to 'ShiftOS-TheRevival/Functions/InGame/FileManagement.vb')
-rw-r--r--ShiftOS-TheRevival/Functions/InGame/FileManagement.vb4
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