diff options
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/FileManagement.vb')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/FileManagement.vb | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/ShiftOS-TheRevival/MainForms/FileManagement.vb b/ShiftOS-TheRevival/MainForms/FileManagement.vb deleted file mode 100644 index b84a2a0..0000000 --- a/ShiftOS-TheRevival/MainForms/FileManagement.vb +++ /dev/null @@ -1,25 +0,0 @@ -Imports System.IO - -Module FileManagement - Public Sub CatFile(filename As String) - If File.Exists(Console.CurrentDirectory & "\" & filename) = True Then - Dim ContentsFinal As String = File.ReadAllText(Console.CurrentDirectory & "\" & filename) - NewLine(ContentsFinal) - End If - End Sub - - Public Sub DeleteFile(filename As String) - If File.Exists(Console.CurrentDirectory & "\" & filename) = True Then - File.Delete(Console.CurrentDirectory & "\" & filename) - End If - End Sub - - Public Sub SaveFile(filename As String) - 'If File.Exists(Terminal.CurrentDirectory & "\" & filename) = False Then - ' File.WriteAllText(Terminal.CurrentDirectory & "\" & filename, Terminal.TextBox1.Text) - 'Else - ' File.WriteAllText(Terminal.CurrentDirectory & "\" & filename, Terminal.TextBox1.Text) - 'End If - File.WriteAllText(Console.CurrentDirectory & "\" & filename, Console.TextBox1.Text) - End Sub -End Module |