diff options
| author | EverythingWindows <[email protected]> | 2022-11-14 13:50:43 +0700 |
|---|---|---|
| committer | EverythingWindows <[email protected]> | 2022-11-14 13:50:43 +0700 |
| commit | bd4c45f316d11e124fe5d21d9c5f66e21149fc5d (patch) | |
| tree | c9b1a4ad85f7d8c6b3cbe05f7769cb04f907dfa3 /ShiftOS-TheRevival/MainForms/FileManagement.vb | |
| parent | b37a6e60c9ffa266fc1fc9afc13cada7704100b0 (diff) | |
| download | shiftos-therevival-old-bd4c45f316d11e124fe5d21d9c5f66e21149fc5d.tar.gz shiftos-therevival-old-bd4c45f316d11e124fe5d21d9c5f66e21149fc5d.tar.bz2 shiftos-therevival-old-bd4c45f316d11e124fe5d21d9c5f66e21149fc5d.zip | |
More organized
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 |